[求助]这样写为什么不行啊?
Private Sub Image1_Click(Index As Integer)
Select Case Index
Case 0
Image2.Picture = "" & App.Path & "\back1.bmp"
End Select
End Sub
版主,我这样写是不是有语法错误啊,怎么改啊
Private Sub Image1_Click(Index As Integer)
Select Case Index
Case 0
Image2.Picture = "" & App.Path & "\back1.bmp"
End Select
End Sub
版主,我这样写是不是有语法错误啊,怎么改啊
2006-12-28 10:17
[此贴子已经被作者于2006-12-28 10:50:37编辑过]
2006-12-28 10:50