vb 定义一个5×5二维数组 随机产生25个二位数存于此数组中，统计数组对
vb 定义一个5×5二维数组 随机产生25个二位数存于此数组中，统计数组对
日期：2016-05-23 17:08:25 人气：1
VB6新建一工程，在窗体上拖入一个命令按钮。然后进入代码区，删除所有代码后，粘贴以下代码即可：
1
Option Explicit
Private Sub Command1_Click()
Dim a(4, 4) As Long
Dim I As Long, J As Long
Dim K As Long, S1 As Long, S2 As Long
Randomize
Me.AutoRedraw = True
For I = 0 To