【文件属性】:
文件名称:随机矩阵置换【VB】
文件大小:225B
文件格式:TXT
更新时间:2012-07-21 09:24:14
随机矩阵置换【VB】
Dim a(1 To 5, 1 To 5) As Integer, i As Integer, j As Integer, temp As Integer
Private Sub Command1_Click()
For i = 1 To 5
For j = 1 To 5