请问各位老师：窗口1有2个按钮（审核、撤审），想实现点击审核显示图片“已审核”，点击撤审显示图片“未审核”。现在只能显示审核按钮的已审核图片，撤审按钮的未审核图片不显示。但是里面的撤审代码能执行。什么问题？谢谢！
审核chick：
Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1")
pbx.ImageFile = "E:\图标\Images\已审核.jpg"
pbx.SizeMode = ImageSizeMode.StretchImage
Tables("表1").Current.Locked = True
撤审chick：
Dim pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1")
pbx.SizeMode = ImageSizeMode.StretchImage
If Tables("表1").Current.Locked = True Then
pbx.ImageFile = “”
Tables("表1").Current.Locked = False
pbx.ImageFile = "E:\图标\Images\未审核.jpg"
End If
[此贴子已经被作者于2019/11/28 22:17:14编辑过]
加好友 
发短信
Post By：2019/11/28 22:02:00 [只看该作者]
