Private Sub Image1_Click(Index As Integer)
Select Case Index
Case 0
Image2.Picture = "" & App.Path & "\back1.bmp"
End Select
End Sub
版主,我这样写是不是有语法错误啊,怎么改啊