
vb编程 编写一个产生n*m个1到100的随机数存入二维数组的通用过程
1个回答
展开全部
Dim n, m As Integer
n = InputBox("请输入二维数组的行数")
m = InputBox("请输入二维数组的列数")
Dim a(n, m) As Integer
For i = 1 To n
For j = 1 To m
a(i, j) = Int(Rnd() * 100 + 1)
Next
Next
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询