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编写的倒计时程序，测试时，请输入目标日期与时间，格式如演示截图中所示，然后按下“倒计时”按钮，即可开始倒计时了，会显示出具体剩余的天数和时、分、秒。程序主要基于CDate函数和DateDiff函数来实现，主要代码如下： 　　Private Sub Timer1_Timer() 　　 On Error GoTo H 　　 Timer1.Interval = 1000 　　 Dim i As Date 　　 i = CDate(Text1) 　　 Label1.Caption = "距离" & Text1 & "还剩" & DateDiff("d", Now, i) & "天" & CLng(DateDiff("h", Now, i)) Mod 24 & "小时" & CLng(DateDiff("n", Now, i)) Mod 60 & "分" & CLng(DateDiff("s", Now, i)) Mod 60 & " 秒" 　　 Exit Sub 　　H: 　　 MsgBox "请输入正确的时间" 　　 Timer1.Enabled = False 　　End Sub

VB6.0演示矩阵的加法运算，本例中一共是两个矩阵，每一个矩阵都根据不同的算法生成矩阵数字序列，然后把这两个矩阵求和，最后一栏展示的是矩阵相加后的结果，以指定格式输出。看了代码，我暂时没搞懂是什么算法，感兴趣的自己下载源码，研究学习吧。

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

简单的VB6 播放视频文件程序，也算是一个简单的视频文件播放器吧，核心基于Windows中的msdxm.ocx控件，可控制播放文件开始暂停、快进快退等简单操作，在测试时如果程序不能运行,将本目录中的msdxm.ocx文件拷贝到C:WINDOWSsystem32目录下,然后,在"开始"/"运行"中键入regsvr32 C:WINDOWSsystem32msdxm.ocx, 回车再运行程序即可.

vb6.0 编程实现字节数组和字符串的相互转换，演示如何进行字节数组和字符串的相互转换.

VB.NET自制图片查看器，一个看图工具软件，功能方面主要有图片原图显示、自动缩放图片、图片居中、自动缩放图片框、背景色设置、文件名及其路径、视图ToolStripMenuItem等。你可以通过这个小程序了解一些VB.NET与图片之间的操作技巧，另外还可以学习到窗口对话框的一些基本操作、PictureBox控件用法、目录和文件列表框的使用、处理鼠标事件、偏移量计算图片位置，重画图片、绘图画面，颜色填充、窗体界面元素控制等的控制方法。。

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

vb利用数据窗口辅助录入数据，也就是本程序窗口中，生成了一些数据辅助窗口，可对用户的录入工作提供一些帮助，其实就是一些供用户选择的组件之类的，用户了用户，又提升了数据录入的准确性，在VB6.0中，本源码可顺利编译成功，运行后如示例图所示。

一个使用Winsock控件的VB典型范例，架构为CS结构，由服务端和客户端组成，两者都运行后，可互通消息。调试步骤： 　　1）打开服务器端的“工程1.dsw”工程 　　2）点击运行按钮。 　　1）打开客户端的“工程1.dsw”工程 　　2）点击运行按钮。 　　3）此时服务器端和客户端已经建立连接 　　4）在服务器和客户端分别输入任何内容，另一端将会收到该内容并显示出来。 　　说明：必须先运行服务器端工程，再运行客户端工程。