
提问人:网友d*******1
发布时间:2022年5月2日 01:12
[]
17. 下面程序运行后,单击命令按钮,在窗体上显示的内容是______。Sub mat(m,n,a) For m=1 To 3 For n=1 To 3 Print a(m,n) ; Next n Next mEnd SubPrivate Sub Command1_Click( ) Dim a(1 To 3, 1 To 3) , x x = Array (1,4,7,2,2,5,8,3,6,9) For m = 1 To 3 For n=1 To 3 a(m,n)=x(m*n-1) Next n Next m Call mat(m, n, a)End Sub
17. 下面程序运行后,单击命令按钮,在窗体上显示的内容是______。Sub mat(m,n,a) For m=1 To 3 For n=1 To 3 Print a(m,n) ; Next n Next mEnd SubPrivate Sub Command1_Click( ) Dim a(1 To 3, 1 To 3) , x x = Array (1,4,7,2,2,5,8,3,6,9) For m = 1 To 3 For n=1 To 3 a(m,n)=x(m*n-1) Next n Next m Call mat(m, n, a)End Sub

