题目内容
（23 ）有下面的程序段，其功能是按图 1 所示的规律输出数据
Dim a (3 , 5 ) As Integer
For i=1 To 3
For j=1 To 5
A (i,j ) =i+j
Print a (i,j ) ;
Next
Print
Next
若要按图 2 所示的规律继续输出数据，则接在上述程序段后面的程序段应该是
A ）
For i=1 To 5
For j=1 To 3
Print a （j,i ） ;
Next
Print
Next
B ）
For i=1 To 3
For j=1 To 5
Print a （j,i ） ;
Next
Print
Next
C ）
For j=1 To 5
For i=1 To 3
Print a （j,i ） ;
Next
Print
Next
D ）
For i=1 To 5
For j=1 To 3
Print a （i,j ） ;
Next
Print
Next
查看答案
搜索结果不匹配？点我反馈
更多问题
● 某计算机指令字长为 16 位，指令有双操作数、单操作数和无操作数3 种格式， 每个操作数字段均用 6
（35 ） 在窗体上有一个名称为 Check1 的复选框数组（含 4 个复选框），还有一个名称为 Text1 的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的方字罗列在文本框中 （见图） 。下面能实现此功能的事件过程是
A ） Private Sub Check1_Click(Index As Integer)
Text1.Text =""
For k = 0 To 3
If Check1(k).value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " " ' 双引号中是空格
End If
Next k
End Sub
B ） Private Sub Check1_Click(Index As Integer)
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " " ' 双引号中是空格
End If
Next k
End Sub
C ） Private Sub Check1_Click(Index As Integer)
Text1.Text = ""
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(Index).Caption & " " ' 双引号中是空格
End If
Next k
End Sub
D ） Private Sub Check1_Click(Index As Integer)
Text1.Text = ""
For k = 0 To 3
If Check1(k).Value = 1 Then
Text1.Text = Text1.Text & Check1(k).Caption & " " ' 双引号中是空格
Exit For
End If
Next k
End Sub
● 假设某硬盘由 5 个盘片构成(共有 8 个记录面)，盘面有效记录区域的外直径为30cm，内直径为 10cm ，记录位密度为 250 位/mm，磁道密度为 16 道/mm，每磁道分16个扇区，每扇区512字节，则该硬盘的格式化容量约为 （2） MB。
● 对以下箭线图，理解正确的是（56）。
（56）
微信支付 
支付宝支付