VB制作可移动按钮位置的Toolbar工具栏

VB 记录鼠标行为，记录用户是单击了鼠标右键或是左键，监控鼠标被单击了哪个键，核心的代码如下： 　　If GetAsyncKeyState(VK_LBUTTON) = -32767 Then 　　 Text1.Text = Text1.Text + " 鼠标左键 " 　　ElseIf GetAsyncKeyState(VK_RBUTTON) = -32767 Then 　　 Text1.Text = Text1.Text + " 鼠标右键 " 　　End If

vb 拉霸游戏，这个游戏我没玩过，玩上去像是抽奖的游戏，有个杠杆可以搬动，搬动后左边的数字滚轮会不停的变化，右边可以设置难度等级，同时这个游戏的窗口也是很特别的，采用不规划的椭圆形，在设计创建不规则的VB窗口时，本源码中的窗口编写技巧也是可以用上的，本游戏是由国外源码改写，在VB6.0环境下可直接编译运行。

VB6.0 利用组合框辅助录入数据，输入框什么的就不多说了，主要学习VB6 中的Combo、DTPicker组合框在录入数据时的用法，方便用户选择数据、选择时间，特别是时间，可固定为指定格式，防止程序出错等。

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

VB6.0 使用递归过程实现阶乘运算 　　Function F(n As Integer) As Single 　　 If n > 1 And n

VB 数据库连接通用类，这个数据库连接类支持的版本比较多了，不过有些老了，但是大致的连接原理都一样，支持Access95、Access2000、SQLServer、Dbfiles、Excel等各类存储型数据库的连接方法，并制作成了窗口的形式，以及测试程序，可以打开此数据库测试连接方法。

Http proxy，由VB6.0编写的代理服务器的源码，要测试代理示例，请单击“LISTEN”按钮并使用浏览器访问代理。 代理端口是3280.您当前的IP是192.168.1.2，此例程等待浏览器发送HTTP请求标头。 收集所有必要信息后，它连接到真实服务器并传递标头数据。 　　打开程序后，可单击监听按钮，实现代码服务的监听功能，也可适时停止这个功能。 　　本源码来自于国外。

VB 6.0 动态改变图表的比例,改变图表的视图比例,默认是0.7,点击确认按钮后,图表会变大显示,减小数字,图表会紧接着变小.看了下代码,里面就是一行代码搞定: 　　MSChart1.RowLabel = "" 　　不过这个功能还是很实用的,当视图内容比较多的时候,图表显示的比较小,用这个功能可将图表放大显示. 　　MSChart主要用来生成一些简单的图表，包括饼图、曲线图、柱状图等，较复杂的图表就需要借助三方控件了。

VB输入限制功能一例：只允许输入汉字，本实例只允许用户输入汉字，如果输入其它类型的字符，程序将不允许输入，且会提醒用户。原理是获取键盘上的ASCII值，并判断是否在中文汉字的范围，若不在，就禁止输入。实现本功能的关键代码，分享给大家： 　　If KeyAscii > 0 And KeyAscii 13 And KeyAscii 8 Then 　　 KeyAscii = 0 　　 MsgBox "只允许输入汉字！", 48, "提示" 　　End If 　　因为是对键盘的控制实现对输入的限制，因此若鼠标复制了一段包含其它字符的文字，则程序无能为力，因为鼠标不在监控范围。

VB 6.0 打印与打印预览功能源码，这个打印预览可以调节预览的放大倍率，在不同的放大状态下预览打印内容，支持打印文字内容和图片的内容，自动调用Windows默认的打印机进行打印，如测试截图所示的效果。