主题：如何使FORM上的一个COMMAND只可以用一次
yzai
[专家分：20] 发布于 2008-10-12 14:42:00
如何使FORM上的一个COMMAND用一次后COMMAND等于FALSE，`
如何写代码？
回复列表 （共19个回复）
11 楼
yzai [专家分：20] 发布于 2008-10-24 15:27:00
糊涂了``楼上的？？
12 楼
btxdlibin [专家分：2430] 发布于 2008-10-24 20:44:00
可见性也怕克星,只要有句柄在就可以克了.
13 楼
merry05 [专家分：8920] 发布于 2008-10-24 21:34:00
[quote]可见性也怕克星,只要有句柄在就可以克了.
[/quote]
那也就是说VB的东西是被克定了，没有幸免的可能。
VB在设计时“画”上去的东西，是没办法完全卸载，即使用的是DestroyWindow。
除非从头开始都用API编写
14 楼
老大徒伤悲 [专家分：29120] 发布于 2008-10-26 15:23:00
说了这么多，那就只有使用信息文件了。当然这是一次点击永远（哪怕关闭程序后再启动）不可再用。
如果像每次启动程序都可用一次，就用变量。
我以后者为例。前者道理一样，就是稍微麻烦了点（我就偷懒了）。
Dim 点过 As Boolean
Private Sub Command1_Click()
If 点过 Then
Exit Sub
Else
'你的本来过程代码：例如：
Print "点到了"
点过 = True
End If
End Sub
Private Sub Form_Load()
点过 = False
End Sub
15 楼
啊远 [专家分：2610] 发布于 2008-10-27 10:48:00
如果真的只用一次的话!就怕人家再用你的按钮用的就K掉它!
Private Declare Function DestroyWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Command1_Click()
MsgBox "我要K掉Command1按钮了!"
DestroyWindow (Command1.hwnd)
End Sub
16 楼
hongbawudi [专家分：260] 发布于 2008-10-27 16:35:00
你在formload里面加载，用了弄掉它
17 楼
yzai [专家分：20] 发布于 2008-10-31 22:32:00
能不能就是一天用一次呢````
18 楼
yzai [专家分：20] 发布于 2008-11-02 08:21:00
[quote]如果真的只用一次的话!就怕人家再用你的按钮用的就K掉它!
Private Declare Function DestroyWindow Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Command1_Click()
MsgBox "我要K掉Command1按钮了!"
DestroyWindow (Command1.hwnd)
End Sub
[/quote]
着个方法是隐藏`而且还是关闭程序在驱动的时候也可以看到````
可不可以一天只可以用一次COMMADND 一天用了之后就变假`
19 楼
hongbawudi [专家分：260] 发布于 2008-11-02 15:45:00
使用注册表吧！
我来回复
您所在位置：社区首页 — Visual Basic讨论区 — 如何使FORM上的一个COMMAND只可以用一次