网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

编写如下程序: 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.a1b2c3d45e

B.a5b4c3d2e1

C.e1d2c3b4a5

D.1a2b3c4d5e


参考答案

更多 “ 编写如下程序: 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 ” 相关考题
考题 下列程序的功能是将字符串“abcde”逆序打印出来。请填写空白处以完善程序。 Munction rev(str1)As String B = Mid(,1,1) If B =""Then rev ="" Else rev = rev(Mid(str1,2))+b End If End Function Private Sub Form_Click() old ="abcde" Print rev(old) End Sub

考题 (24)在窗体上画一个名为Command1德命令按钮,然后编写下列程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1,2,3,4,5) j=1 For i=5 To 1 Step -1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果是 A.54321 B.123 C.12345 D.345

考题 在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果为( )。A.54321B.123C.12345D.345

考题 有如下程序: include using namespace std; class TestClass { private: int x,y; pu 有如下程序: #include<iostream> using namespace std; class TestClass { private: int x,y; public: TestClass (int i,int j) { x=i; y=j; } void print() { cout<<"print1"<<end1; } void print()const { cout<<"print2"<<end1; } }; int main() { const TestClass a(1,2); a.print(); return 0; } 该程序运行后的输出结果是( )。A.print1B.print2C.print1 print2D.程序编译时出错

考题 在窗体上画一个名为Command1的命令按钮,然后编写下列程序:Option Base 1Private Sub Command1_Click()Dim ArrArr=Array(1,2,3,4,5)j=1For i=5 To 1 Step-1S=S+Arr(i)*jj=j*10NextPrint SEnd Sub程序运行后,单击命令按钮,输出结果是( )。A.54321B.123C.12345D.345

考题 在窗体上画一个名为Command 1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1, 2, 3, 4, 5) j=1 For i=5 To 1 Step -1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果为( )。A.54321B.123C.12345D.345

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n : 4 TO 0 Step -1 x(n)= n + 1 Print x(n); Next n End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.54321B.4C.54321D.0

考题 在窗体上面画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) a$="321":b$="abc" For j=l To 5 Print Mid$(a$,6-j,1)+Mid$(b$,j,1); Next j End Sub 程序运行后,输出的结果是A.alb2c3B.ablc23C.clb2a3D.a12bcl

考题 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="321":b$="abc" For j=1 To 5 Print Mid$(a$,6 -j,1)+Mid$(b$,j,1); Next i End Sub 程序运行后,输出的结果是;A.a1b2c3B.ab1c23C.c1b2a3D.a12bc1