上交医学院:如何使vb命令只执行一次

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 04:43:02
比如
if text1.text=1
list1.AddLtem="3"
end if
如何使list1里的内容停止不断刷新

if text1.text=1
list1.AddLtem="3"
end if

少了“then”啊,还有是list1.additem "3",L错了,而且不能用“=”,打个空格就行了

你的问题不太清楚,我看来,你可以使用 list1.clear清空list控件,然后再使用 additem方法添加内容

放在TIMER里面
private sub timer1_timer()
if text1.text="1" then
list1.additem "3"
end if
end sub

我的一向的方法:

if list1.tag <> "F" then
if text1.text=1 then
list1.AddLtem "3"
list1.tag = "F"
end if
end if