VB的保存文件对话框调用创建一例

本源码演示VB 6.0 如何将汉字转换为Unicode字符代码，在窗口中输入汉字，单击按钮，即可将汉字转换为Unicode字符，其实这个实现起来也比较简单，用VB内置函数AscW即可实现，代码的编写可参考如下： 　　Private Sub Command1_Click() 　　 Text2.Text = AscW(Text1) 　　End Sub 　　Private Sub Command2_Click() 　　 Unload Me 　　End Sub

vb 将数字格式化为金额，这个更像是一个自动计算程序，根据用户输入的单位、数量、价格等参数，自动计算出金额，这才是程序要表达的功能，相差代码： 　　Private Sub Text1_LostFocus(Index As Integer) 　　 Text1(Index).BackColor = &H80000005 　　 If Index = 3 Then Text1(3) = Format(Text1(3), "0.00") 　　End Sub

VB.NET 演示带Finally的Try Catch 异常处理用法演示，这个源码就是捕捉VB.NET运行错误的，结合了最常规的try catch组合，并且使用了Finally处理的情况，那么为什么要使用Finally呢？使用Finally的好处是，把资源释放或状态还原的代码放到finally块中，可以保证在try和catch语句执行完后，一定会执行finally语句块，而不用考虑各种复杂的跳转情况。

VB6为菜单制作添加分割线，在菜单项与菜单项之间显示一个分隔线，这个在Windows经典风格的窗口中，十分常见，像一个水平线那样，把菜单分成多个部分，这个水平线带有阴影效果，视觉效果更立体。 　　本窗口中的菜单，是一个企业综合管理系统的主界面面板，那些菜单都是测试用的，你可以看一下菜单中的分隔线是如何嵌入到菜单中的。

VB NET版 五子棋（人机对弈）,五子棋游戏源码，单击菜单中的开局即可开始游戏，人先走棋，电脑随后，每一步会有提示，游戏功能不算太复杂。源代码部分，主要实现了游戏数据初始化、获取鼠标单击位置值、绘制棋盘网格、定义图形类对象、重绘控件的控制等，可了解一下VB编写棋牌游戏的一些要领。

VB 演示创建视图 以及使用视图保存数据，数据库选择了MSSQL，根据各数据库字段创建视图，并使用这个视图进行数据保存，测试前请确保数据库连接成功。

VB.NET将任意图像文件设置为鼠标形状，变换光标，光标文件读取，支持自定义光标的图像文件格式为：图像文件（*.jpg;*.gif;*.png;*.bmp）。操作方法挺简单的，点击 按钮选择一个格式合适的光标文件即可，注意查看鼠标光标的变化。

VB简单实现磁性窗体，将窗体粘合，子窗体连接的任何窗体都粘合上，获取所有窗体的矩形区域，并重新设置粘合，连接窗体上的矩形。这种窗口多见于一些影音视频播放软件中，比如播放列表快接近播放主窗口时，自动吸附到主窗口上，紧贴主窗口边缘，像是有种磁性一样吸附在一起，本窗口中的三个子窗口，都具有自动吸附的磁性感觉，有兴趣可下载本源码学习测试。

VB6.0 代码演示如何计算加权平均值，计算加权平均值可编写以下代码实现： 　　Private Sub Command1_Click() 　　 Text7.Text = jiaquan(Text1, Text2, Text3, Text4, Text5, Text6) 　　End Sub 　　Private Function jiaquan(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer, ByVal d As Integer, ByVal e As Integer, ByVal f As Integer) 　　 Dim sum As Integer 　　 sum = (a * b + c * d + e * f) / (b + d + f) 　　 sum = Round(sum, 2) 　　 jiaquan = sum 　　End Function

VB6.0 WinLock-锁住计算机 实现锁定电脑的功能，沐风视窗锁，程序由沐风工作室开发编写，锁定计算机后，按下回车键后请输入解锁密码才能解锁屏幕，另外这个锁屏程序还可以设置自启动、效验密码等功能。 　　本程序同时支持卸载，当用户点击 卸载按钮后，即将完成删除，程序将运行卸载程序。 　　温馨提示：第一次使用,请输入密码。密码设置成功,程序将重新启动。