![]() |
#2
xiangyue05102017-10-27 16:01
|
Dim a1(0 To 100000, 0 To 100000) As Byte
Private Sub Form_Load()
Dim i, j As Long
For i = 0 To 100000
For j = 0 To 100000
a1(i, j) = 255
Next j
Next i
End Sub