Question

VB的课设，可是我完全不知道那些代码是什么意思，我选的是数字拼图游戏，希望好心人帮我解释一下

Private Sub Com_Click(Index As Integer)
Select Case Index
Case 0
If Com(Index + 1).Visible = False Then
Com(Index + 1).Visible = True
Com(Index + 1).Caption = Com(Index).Caption
Com(Index).Visible = False
Com(Index).Caption = ""
Else
If Com(Index + 3).Visible = False Then
Com(Index + 3).Visible = True
Com(Index + 3).Caption = Com(Index).Caption
Com(Index).Visible = False
Com(Index).Caption = ""
End If
End If
Case 1

Answer 1

Select Case Index '选择语句，这里根据不同INDEX值来选择
Case 0 ’index 为0时候
If Com(Index + 1).Visible = False Then ‘如果COM应该是个控件名字，如果控件com1不可见
Com(Index + 1).Visible = True ’则 com1变成可见
Com(Index + 1).Caption = Com(Index).Caption‘com1的标题变成COM0的标题
Com(Index).Visible = False‘com0变成不可见
Com(Index).Caption = "" ‘com0的名称变为空
Else
If Com(Index + 3).Visible = False Then ’如果COM(INDEX+3)不可见
Com(Index + 3).Visible = True ‘则COM(INDEX+3)变成可见
Com(Index + 3).Caption = Com(Index).Caption’把COM(INDEX)的标题赋给COM(INDEX+3)
Com(Index).Visible = False 'COM(INDEX)变成不可见
Com(Index).Caption = "" ‘com(index)标题变成空
End If
End If
Case 1 ‘index 为1的时候

追问

解释的很清楚，非常感谢O(∩_∩)O
还有一个问题，com控件是什么啊
我做的课设是数字拼图，可是一块一块的拼图是用什么控件做的呢？是用命令按钮(⊙_⊙)？
真是一头雾水啊