本文主要是介绍VB项目中必需的几点技巧，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
1. 点击右上角的关闭按钮，要弹出“提示”，是否关闭，但用右键关闭时，不能重复提示
在vb中找到这个事件 Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) If MsgBox("是否要退出", vbYesNo + vbDefaultButton2, "提示") = vbNo Then Cancel = True End If End Sub
2. 计算器中退格键的使用
假定backSpace按钮的name属性是：cmdBack
输出窗口textbook的name属性是：dataout
Private Sub cmdBack_Click()
If dataout.Caption = "0" Then
Exit Sub
End If
If (dataout.Caption <> "") Then
dataout.Caption = Mid(dataout.Caption, 1, Len(dataout.Caption) - 1)
ElseIf dataout.Caption = "" Then
dataout.Caption = "0"
End If
'----如果显示的是结果，那么清零
‘当没有计算时，要把结果标志位置1
If res Then
dataout.Caption = "0"
End If
End Sub
3. VB软件皮肤控件的使用
添加：在控件工具栏上右键，单击部件，然后在弹出的窗口里面“控件”标签下选择“浏览”，添加你所需要的xxx.OCX，记得前面复选框要打勾。
删除：在控件工具栏上右键，单击部件，然后在弹出的窗口里面“控件”标签下选择“浏览”，将你将要除去的xxx.OCX控件前面的复选框勾去除（前提：这个删除的控件你不能正在使用中）
4. 项目结束退出的问候语
MsgBox "谢谢使用" & vbCrLf & "再见！", vbOKOnly, "二期项目XXX"
5. 如何注册OCX控件
32位系统： 将文件放到c:\windows\system目录 注册 运行：Regsvr32 c:\windows\system\xxx.ocx 取消注册运行：Regsvr32.exe /u c:\windows\system\xxx.ocx64位系统注册32位文件： 将文件放到 c:\windows\sysWOW64目录 运行：Regsvr32.exe c:\windows\sysWOW64\xxx.ocx
当然，也可以写一个注册表：
该文件夹下有这两个文件：
xxx.ocx和注册xxx.cmd;
其中xxx.cmd中写：
copy xxx *.* %windir%\system32\ /y
Regsvr32 %windir%\system32\XP xxx.ocx /s
pause
这篇关于VB项目中必需的几点技巧的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
