可以在mouseup事件中加一条判断语句不就可以了
解决方案 »
- Office2000到Office2003,Excel操作方法SaveAs(Filename)怎么改呢?
- VB2005文件夹的问题 HELP~~~~SOS
- 帮忙解释下一段VB程序
- 是否可以读取服务器上文本文件的内容 ?
- 用MMC控件作了个简单的录音程序, 发现录制的声音文件采样率很低, 效果很差. 如何设置录音的采样率等品质参数?
- 求助求助 ODBC SQL SERVER DRIVER]客户无法建立连接
- 如何用VB代码查询本地安装了哪些SQL Server服务器?
- 处理文件时 FileSystemObject和API选择哪个?
- 请问如何实现下面的功能?
- 征友
- 如何检测winsock connect失败
- 大虾们:急!比如说notepad.exe是用vb做的,运行notepad.exe a.txt,当打开notepad时,怎么得到a.txt这个参数呢?再给20分
若按钮按下则值为真,否则为假
在mouseup事件对该变量的值判断若为真则执行否则退出mouseup事件
Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, x As Single, Y As Single)
If Check1.Value = 1 Then
Exit Sub
Else
Richtextbox1.Text = 0
End If
End Sub