black

登录

未知题型

在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer Dim a(10, 10)As Integer For i=1 To 3 For i=1 To 3 a(i,j)=(i-1) *3+j Print a(i,j); Next i Print Next i End Sub 程序运行后,单击命令按钮,窗体上显示的是
A.1 2 3 246 3 69
B.2 3 4 3 4 5 4 5 6
C.1 4 7 2 5 8 3 6 9
D.1 2 3 4 5 6 7 8 9

A.1
B.2
C.1
D.1
【参考答案】

D
解析:本题仍然是使用For循环对二维数组赋值。由于有For,循环的嵌套,当i等于1时,Forj循环执行三次,......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)

相关考题

未知题型 在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1.Text) if n/2=n/2 Then f=f1(n) Else f=f2(n) End If Print f;n End Sub Public Function f1(ByRef x) x = x * x f1 =x + x End Function Public Function f2(ByVal x) x = x + x f2=x+x+x End Function 程序运行后,在文本框中输入6,然后单击命令按钮,窗体上显示的是A.72 36B.108 36C.72 6D.108 6

不定项选择 唐太宗时期,修定《姓氏录》,广开制科,大增进士等措施,提高普通地主阶层的社会地位。‌ ‏‌

未知题型 在窗体上绘制一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() Dim c As Integer,d As Integer d=0 c=6 x=Array(2,4,6,8,10,12) For i=1 To 6 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为D.20

All Rights Reserved 版权所有©在线考试题库网(zxkao.com)

备案号:湘ICP备14005140号-7

经营许可证号:湘B2-20140064