以下程序输出的结果是（）。OptionBase1PrivateSubCommand1Click( ）Dima%(3,3)Fori=1To3Forj=1To3_刷题宝

题干

以下程序输出的结果是（）。
Option Base 1
Private Sub Command1 Click( ）
Dim a%(3,3)
For i=1 To 3
For j=1 To 3
a(i,j)=i*j
Print a(i,j);〃〃;
Next j
Print
Next i
End Sub

A．1 2 3
2 3 1
3 2 3

B．1 2 3
1 2 3
1 2 3

C．1 2 3
2 4 6
3 6 9

D．1 1 1

上一题下一题 0.99难度选择题更新时间:2019-09-12 12:53:42

答案(点此获取答案解析）

同类题1

在Visual Basic程序设计中,For语句"For计数变量=初值To终值Step步长”中步长为0时，会造成死循环。( )

同类题2

有一个单击按纽过程，其作用是产生50个60～100的随机数，统计其中被6整除余2的个数，并将这些数输出。请补充下面的程序：

Private Sub command1_click( )

Dim X, N As Integer
Dim count As Integer ' count用来保存能被6整除余2的数据的个数
Randomize Timer ' 随机数初始化，以时钟为随机数种子

For N = 1 To 50

X = ___________ + int(Rnd * 40) ' 随机产生50个60～100的随机数

If X Mod 6 = 2 Then

List1.AddItem Str(X)

_______________

Next N

Label1.Caption = str (count)

End Sub

同类题3

有如下VB程序段：
s=“Good Luck 2019!”
n=0：m=0：k=0
For i=1 To Len(s)

ch=Mid(s，i，1)

If ch >=”0”And ch<=”9” Then

Else If ch>="a” And ch<=”z” Then

Else

End If

Next i
执行该程序段后，变量k的值为( )

同类题4

有一个VB程序，其程序界面中有一个按钮Command1及一个文本框Text1，并且其程序代码如下：

当点击Command1后，Text1中将显示( )

A．3	B．4
C．5	D．6

同类题5

现有如下Visual Basic程序段：

Dim a(1 To 10) As Integer

a(10) = 1

a(9) = 2

For x = 8 To 1 Step -1

a(x) = a(x + 1) + a(x + 2)

Next x

该程序段运行后，a(6)的值是（）

相关知识点