vb题目:随机产生20个正整数存入二维数组A(4,5),并输出到文本框Text1...答:Private Sub Command1_Click()Dim i, j, A(1 To 4, 1 To 5) As Integer, p, B(), n, temp Text1 = ""For i = 1 To UBound(A, 2)For j = 1 To UBound(A, 1)Randomize A(j, i) = Int(Rnd * 100) '0-99的正整数 Text1 = Text1 & A(j, i) & " "If fc(A(...