以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]按钮图标变换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137487)

--  作者:天一生水
--  发布时间:2019/7/7 18:40:00
--  [求助]按钮图标变换
想点击按钮,循环变换按钮的图标。
按钮的click代码如下,但报错,请老师指教如何处理?
谢谢!

If e.Sender.Image = GetImage("lock_open.png") Then
    e.Sender.Image = GetImage("lock.png")
Else
    e.Sender.Image = GetImage("lock_open.png")
End If


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看



--  作者:有点蓝
--  发布时间:2019/7/7 21:20:00
--  
不能直接比较图片的

If e.Sender.text = “打开” Then
    e.Sender.Image = GetImage("lock.png")
   e.Sender.text = “关闭” 
Else
    e.Sender.Image = GetImage("lock_open.png")
   e.Sender.text = “打开 
End If