试题

试题 试卷

logo
  • 题型:综合题 题类:常考题 难易度:普通

    “字符串合并”程序实现功能:在文本框Text1中输入字符串1,在文本框Text2中输入字符串2,单击“合并”按钮Command1,按如下规则依次从中取出各字符进行合并,合并后的结果显示在标签对象Label3中。

    合并规则如下:

    ⑴当字符串1的长度大于字符串2的长度时,将字符串2中的各个字符从左侧依次插入到字符串1中的各字符后方。例如字符串1为“abcdef”,字符串2为“123”时,合并后的字符串为“a1b2c3def”。

    ⑵当字符串2的长度大于等于字符串1的长度时,将字符串1中的各个字符从右侧依次插入到字符串2中的各个字符后方。例如字符串1为“abcd”,字符串2为“12345”时,合并后的字符串为“12d3c4b5a”。

    程序运行界面如图所示。

    (1)要使程序运行时,窗体Form1标题显示“字符串合并”,可在Form_Load事件过程中添加语句1(单选,填字母:A,Form1.Caption=“字符串合并”/B,Label3.Caption=“字符串合并”/C,Text1.Text=”字符串合并”)。

    【答案】
    (2)实现上述功能的VB程序如下,请在画线处填入合适的代码。

    Private Sub Command1_Click()

    Dim s1 As String,s2 As String,arts As String

    Dim n As Integer,m As Integer,i As Integer

         s1=Text1.Text

         s2=Text2.Text

       m=Len(s1)

         n=Len(s2)

         If m>n Then

             For i=1 To n

               ans=ans+Mid(s1,i,1)+Mid(s2,i,1)

             Next i

               ans=ans+Mid(s1,i,m-n)

             Else

               For i=1 To m

                 ans=    ①    +Mid(s1,i,1)+ans

               Next i

               ans=Mid(s2,1,n-m)+aFIS

        ②   

             Label3.Caption=”合并为”+ans

      End Sub

    1 ②2 

    【答案】
    (3)若在文本框Text1中输入“Word”,在文本框2中输入“Mini”,单击“合并”按钮后,标签Label3中显示的内容是1

    【答案】
    【考点】
    【解析】
      

    收藏 纠错

    组卷次数:1次 +选题

  • 举一反三
    返回首页

    试题篮

    共计:(0)道题