VB 数据库连接通用类

VB.NET 获取全局coordinate鼠标坐标，显示窗体内的XY坐标，窗体外凡是显示屏幕的任意位置都可以显示出坐标，获取全局鼠标坐标，测试截图是获取本窗口外的鼠标坐标，请参见截图效果。随着鼠标移动会显示出各个鼠标坐标点的XY坐标信息。单击窗口的“开始”按钮后，将执行以下代码获取全局坐标： 　　GetCursorPos(p) 　　tooltip1.SetToolTip(Me, "当前鼠标位置 X=:" & p.x & "Y=:" & p.y) 　　tooltip1.Active = True

VB 将小写数字金额格式化为大写金额，这一个相比其它的金额数字转换，是自动转换，用户输入完小写数字金额后，程序将自动把小写数字变为大写，不过奇怪的是，在代码中并没有发现转换功能写在哪里，看到有数据库，莫非大写字符都存储于数据库吗？本例最终的运行效果如下图所示，用户在金额（大写）处输入小写的数字，可以输入小数点，然后单击其它空白处，程序会自动将小写金额转换成大写状态。

VB6 设计带记忆的数据录入窗口，这种记忆实际上是将DataGrid临时输入的数据存入到数据库中了，是一个数据库应用范例，本例子中的数据库采用的Access。在本例中，用户临时对任意DataGrid行列操作时输入的内容，临时保存至数据库中，使用时及时读取，模拟中了记忆功能，方便了用户操作，不过未做测试，不知道数据量较大的时候，会不会对数据库造成压力，有心者可以自行测试哦。

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

vb.NET模拟扑克牌出牌功能，其实可看作是一个界面较简单的扑克牌游戏，界面有些粗糙，没有过多美化，用文字描述了牌面，后续可以对界面进行升级。有点过于简单了，可当作一个初级的VB.NET编程例子吧。

VB 网络连通检测，单击命令按钮可进行网络连通检测，判断是本机否连接到Internet。操作很简单，将连通测试检测结果输出到屏幕上。

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

vb 判断字符串是否为日期或时间，在输入框输入任意字符串类型，程序将会判断出该字符串是否是时间字符串，这个判断方法VB员自带有函数，使用IsDate即可实现，下面是使用IsDate的简单用法示例： 　　If IsDate(Text1) = True Then 　　 Text2.Text = "是日期" 　　Else 　　 Text2.Text = "不是日期" 　　End If 　　您也可以在本页下载完整的源码实例。

一个实现图像的旋转效果实例，由VB6.0编写，前几年的源码，本程序实现图片的逆时针旋转90度，单击窗口中的按钮即可实现旋转功能，这部分代码，可参考如下代码： 　　逆时针旋转90度 　　Private Sub Command2_Click() 　　 For j = 0 To h Step 1 　　 For i = 0 To w Step 1 　　 BitBlt Picture2.hDC, i, j, 1, 1, Me.Picture1.hDC, j, i, srCopy 　　 Next i 　　 Next j 　　End Sub

游戏说明： 　　1、控制键 　　 “回车键”-----新游戏或终止游戏 　　 “5”（数字键区的）----暂停或恢复 　　 方向控制键（数字键区的） 　　 “8、2、4、6”----对应控制“上、下、左、右”移动 　　 “1”-----“左下”移动 　　 “3”-----“右下”移动 　　 “7”-----“左上”移动 　　 “9”-----“右下”移动 　　2、地图 　　 蓝色方块----食物（吃到食物后，蛇身长度增加一节） 　　 红色方块----炸弹（吃到炸弹，所得分数会减去当前级别数的2倍） 　　 地图上一次出现2个食物和1个炸弹，被蛇吃掉后会随机位置补充 　　 灰色方块----蛇头 　　 绿色方块----蛇身 　　 暗海洋绿方块----奖品 　　 当玩家吃到的食物或者炸弹达到5个时就会随机出现一次奖品，奖品 　　 上的数字表示吃到奖品后会增加的分数。每个奖品的初始分数是20--50 　　 之间的随机数，当奖品出现后就会开始不断的减少，所以玩家要尽快吃 　　 到才能增加到更多的分数。 　　3、计分方法 　　 每吃到一个食物，增加的分数等于当前级别的数值； 　　 每吃到一个炸弹，扣掉的分数等于当前级别数值的2倍； 　　 玩家的起始分数等于当前的级别数值的2倍加1 　　 例如 等级为3，则玩家起始分数是7分；每吃到一个食物加3分； 　　 每吃到一个炸弹减6分 　　4、游戏结束 　　 当总分