VB中 问题

来源：百度知道 编辑：UC知道 时间：2024/06/24 18:50:56
初始设置Image1显示,Image2隐藏,Image3隐藏。。。。

command1点第一下Image1隐藏,Image2显示
command1点第二下Image2隐藏,Image3显示
。。。。
这样的完全代码。。谢谢。我菜鸟，具体点

Private Sub Command1_Click()
Static n As Integer
n = n + 1
Select Case n
Case 1
Image1.Visible = False
Image2.Visible = True
Case 2
Image2.Visible = False
Image3.Visible = True
Case 3
Image3.Visible = False
Image4.Visible = True
'………………
End Select
End Sub

private sub form_load()
image1.enables=false
image2.enabled=false
inmge1.enabled=false
end sub
private sub cmd1_click()
image1.enables=false
image2.enabled=true
end sub
private sub cmd2_click()
image2.enables=false
image3.enabled=true
end sub

1楼正解，我不回复了