vb 求解.....................................................................

显示全部楼层 · 2011-6-23 09:41:13

4　7　10
5　8　11
6　9　12
Private Sub Form_Click()
Dim a(3,3)

For j=1 To 3

For k=1 To 3

a(j,k) = ______

Print a(j,k)

Next k

Print

Nextj
End Sub

千问 · 2011-6-23 09:41:13

▲▲朋友，以后提问请讲清楚一点，否则很难明白你是什么意思的。思考了一下，补充的代码如下，并且运行通过。你打的代码应该少了一个逗号或分号，全部补充好了。代码如下：Private Sub Form_Click()Dim a(3, 3)
For j = 1 To 3
For k = 1 To 3
a(j, k) = 3 * k + j
Print a(j, k);
'这里应该增加一个分号
Next k
Print
Next jEnd Sub其输出的结果是： 4710 ...

千问 · 2011-6-23 09:41:13

a(j,k) = __3*k+j____...

千问 · 2011-6-23 09:41:13

你这个是什么意思啊，能说明白点不...