编写如下程序: Private Sub Form. Click() a$=: "4321": b$="abcd" For 3=1 To 4 Print Mid$(a$,5-j,1)+Nid$(b$, j, 1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。A.alb2c3d4B.b4c3d2elC.eld2c3b4D.la2b3c4d

编写如下程序: Private Sub Form. Click() a$=: "4321": b$="abcd" For 3=1 To 4 Print Mid$(a$,5-j,1)+Nid$(b$, j, 1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。

A.alb2c3d4

B.b4c3d2el

C.eld2c3b4

D.la2b3c4d


相关考题:

在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程: Private Sub Commandl_click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 D CD BCD ABCD 则在______处填入的内容为。A. Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

在窗体上画一个名称为Command1命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c = “ABCD”For n= 1 To 4Print ( )NextEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容( )。DCDBCDABCD则在( )处填入的内容为。A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

在窗体上绘制一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()c="ABCD"For n=1 To 4 Print__Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容:DCDBCDABCD 则在横线处应填入的内容为A.Left(c.n) B.Right(c,n) C.Mid(c,n,1) D.Mid(c,n,n)

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) c="ABCD" For n = 1 To 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在 ______ 处应填入的内容为A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在 ______ 处应填入的内容为A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c="ABCD"For n=1 T0 4Print ______NextEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容:DCDBCDABCD则在______处应填入的内容为A.Left(c,n)B.Right(c,n)C.Mid(c,n,1)D.Mid(c,n,n)

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Coinmand1 Click( ) Dim a$,b$,c$,k% a="ABCD" b="123456" c="" k=1 Do While k=Len(a)Or k=Len(b) If k=Len(a)Then c=c&Mid(a,k,1) End If If k=Len(b)Then c=c&Mid(a,k,1) End If k=k+1 Loop Print c End Sub 运行程序,单击命令按钮,输出结果是( )。A.123456ABCDB.ABCD123456C.D6C584A321D.A1B2C3D456

编写如下程序: Private Sub Form_Click() a$="54321":b$="abcde" For j=1 To 5 Print Mid$(a$,6-j,1)+Mid$(b$,j,1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。A.a1b2c3d45eB.a5b4c3d2e1C.e1d2c3b4a5D.1a2b3c4d5e

编写如下程序: 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 z End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.abcd1234B.a1b2c3d4C.a1b1c1d1D.1234abcd