VB里CheckBox出现 实时424错误

来源:百度知道 编辑:UC知道 时间:2024/05/16 20:38:04
Private Sub Command1_Click()
If CheckBox2.Value = 1 Then
MsgBox "由于有部分程序带有消息钩子,注册表以下位置出现不正常数值:", , "检测结果"
MsgBox "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", , "检测结果"
MsgBox "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows\AppInit_DLLs", , "检测结果"
MsgBox "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL", , "检测结果"
MsgBox "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\ShellExecuteHooks", , "检测结果"
MsgBox "清除成功!", , "提示"
Else
MsgBox "请先选择选项", , "提示"
End If
End Sub
按钮也有 选框也有 选框原名是Check2 我在代码里也用了Check2

现在上面显示在VALUE这里"未找到方法或数据成员"....是不是要存入数据库的 怎么处理....

你得画一个CheckBox控件,名字就叫CheckBox2。
你控件名字是叫CheckBox2吗?你得把名字改成CheckBox2的。
我测试过的,运行正常的。还有一个按钮你画了吗?

If CheckBox2.Value = 1 Then
MS 绘制 了CheckBox这个控件 他的名称只是在Check往上叠加
你把CheckBox2改成Check2