阿Q吧 > 用vb求数组每行的和并显示在文本框中怎么做啊？我做了之后只显示一行的和，另外几行显示不了

用vb求数组每行的和并显示在文本框中怎么做啊？我做了之后只显示一行的和，另外几行显示不了

是个5行5列的数组

2025-06-21 23:47:11

推荐回答（1个）

回答1：

'你首先要设置text的属性MultiLine = True，这个属性需要你在编程的时候在控件属性中更改，程序中不允许更改
Private Sub Command1_Click()
Dim a(4, 4) As Integer
'----------以下为对这个5行5列数组赋值并显示出来----------
For i = 0 To 4
For j = 0 To 4
a(i, j) = Int(Rnd * 90) + 10
Text1.Text = Text1.Text & a(i, j) & Space(1)
'Space(1)为用空格区分每个数字，也可以改为","等其它分隔符
Next
Text1.Text = Text1.Text & vbCrLf 'vbCrLf表示换行
Next
'----------以上为对这个5行5列数组赋值并显示出来----------
End Sub