Question

vb中怎样使图像框的图片单击一下图像显示再单击一下图像隐藏





Answer 1

if pic.visible=true then
 pic.visible=false
else
 pic.visibled=true
end if

追问

如果一个过程只能写一条语句呢？该怎么写？

追答

一句很难实现。这个是标准结构。

Answer 2

设置一个全局变量，就是在控件事件外面定义一个变量
dim k as Bool
k=false
然后在按钮里写
picturebox1.visible=k
k=!k
就Ok了

追问

k=!k是啥意思？

追答

！是逻辑运算符
上面定义了
dim k as Bool
k=false
然后 !k就是 true
k=!k 也就是k=true了
这样写就是不用IF就可以使k的值在True和false之间变换了

Answer 3

'定义窗体级变量flag 
Dim flag As Boolean

Private Sub Form_Load()
    flag = False
End Sub

Private Sub Picture1_Click()
    flag = Not flag
    If flag Then
        Picture1.Picture = LoadPicture("C:\WINDOWS\Web\Wallpaper\bliss.jpg")
    Else
        Picture1.Picture = LoadPicture("")
    End If
End Sub

追问

如果一个过程只能用一条语句，该怎么办？