VB编程,有一个n × m的矩阵,其各元素的值由随机函数生成(范围50~150).编写程序,找出其中最大的元素

问题描述:

VB编程,有一个n × m的矩阵,其各元素的值由随机函数生成(范围50~150).编写程序,找出其中最大的元素

Private Sub Form_Click() Dim a() As Integer Dim i, j, max, n, m Randomize(time) n = InputBox("n=") m = InputBox("m=") ReDim a(n, m) max = 0 For i = 1 To n For j = 1 To m a(i, j) = Int(Rnd...