Question

求解释，帮帮忙吧，这是个VB制作连连看的程序代码，我想知道他的具体解释，看不懂哦，谢谢你拉

，还有一个控件是command1，写的中文是“开始”

Option Explicit
Dim img(50) As Integer
Dim imgArray(5, 10) As Integer '定义变量
Const imgMax = 14
Const imgWidth = 585
Const imgHeigth = 675
Dim TFlag As Integer
Dim i As Integer
Dim Stack(100) As Integer
Dim StackPoint As Integer
Dim stackPointBack As Integer
Dim a(50) As Integer

Dim b() As Integer

Dim samed As Boolean
Private Sub Form_Load()
TFlag = -1 '载入图片
For i = 0 To 50
img(i) = -1
Next i
For i = 0 To 100
Stack(i) = 0
Next
StackPoint = -1
End Sub

Private Sub Image1_Click(Index As Integer)
If Image1(Index).Visible = True Then
If TFlag = -1 Then
Image1(Index).Picture = LoadPicture(App.Path & "\image\" & img(Index) & "_Mask.jpg") '点击图片显示
TFlag = Index

Else

Answer 1

我没做过连连看哎，如果你把完整的代码拿来我愿意试着帮你理解一下，只看这些没头绪哎。