单项选择题

下列程序 Private Sub Command1_Click( )　x = "abcd"　y = "1234"　　For i = 1 To 4　　　　z = z + Mid(x, i, 1)+ Left(y, 1)　Next i　　Print zEnd Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（）。

A.abcd1234
B.a1b2c3d4
C.a1b1c1d1
D.1234abcd

<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后输写如下程序：Private Sub Command1_Click() Dim x，y，z As Integer x=5 y=7 z=0 Text1.Text= Call Funl(x,y,z) Text1.Text=Str(z)End SubSub Funl(ByVal a As Integer，ByVal b As Integer，c As Integer) C=a+b End Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是（）

A.0
B.12
C.Str(Z)
D.没有显示
单项选择题
执行以下程序段 a$= abbacddcba For i=6 To 2 Step-2 X=Mid(a,i,i) Y=Left(a,i) Z=Right(a,i) z=UCase(X&Y&z) Next i Print z 输出结果为( )
A．ABC
B．BBABBA
C．ABBABA
D．AABAAB
相关试题