-
VB 6.0 AscW将汉字转换为Unicode字符代码
本源码演示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
- 2022-08-09 07:08:37下载
- 积分:1
-
VB 6 在DataGrid表格中实现下拉列表框
VB 6.0 在DataGrid表格中实现下拉列表框,大家可以看截图,在如演示效果所示的DataGrid表格中,单击“单位”一列任意行数据,会显示出一个下拉框,供输入者选择单位,扩展了DataGrid的功能,增加了易用性,提升了用户体验。添加这一功能的核心代码为:
Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "tb_stock"
Set DataGrid1.DataSource = Adodc1
List1.AddItem ("支")
List1.AddItem ("瓶")
List1.AddItem ("盒")
List1.AddItem ("袋")
DataGrid1.Columns(6).Button = True
仅供参考,本示例是配合数据库实现的,请确保测试时数据库是连接的。
- 2022-07-26 04:39:52下载
- 积分:1
-
文件夹复制VB6.0实例
文件夹复制VB6.0实例源码,这里用了一个用户自定义函数,此函数可以出现一个对话框,并返回所选择的路径,若没有选择返回("")。模拟了Windows系统的文件夹模拟功能,看上去比较低级,只是通过这个功能,熟悉一些VB与文件操作的函数用法。
- 2022-03-05 20:29:32下载
- 积分:1
-
vb 拉霸游戏源代码
vb 拉霸游戏,这个游戏我没玩过,玩上去像是抽奖的游戏,有个杠杆可以搬动,搬动后左边的数字滚轮会不停的变化,右边可以设置难度等级,同时这个游戏的窗口也是很特别的,采用不规划的椭圆形,在设计创建不规则的VB窗口时,本源码中的窗口编写技巧也是可以用上的,本游戏是由国外源码改写,在VB6.0环境下可直接编译运行。
- 2022-04-29 19:05:48下载
- 积分:1
-
vb.net 串口通讯测试项目源码
vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。
运行后先检测测试需用的COM端口是否打开,弹出提示。
测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
- 2023-02-14 09:00:03下载
- 积分:1
-
VB 石头剪刀布猜拳游戏
VB 石头剪刀布猜拳游戏,游戏操作方法:在窗体左下方的石头、剪子、布图标中,单击用户想要出的一种手势,电脑会自动给出该手势,任一方赢了都会给出相应提示图片信息。游戏结果判定逻辑:
将用户和计算机所选的图片的序号合成一个字符串,根据这个字符串判断用户的输赢
00 石头对石头 重来
01 石头对剪子 用户赢
02 石头对布 用户输
10 剪子对石头 用户输
11 剪子对剪子 重来
12 剪子对布 用户赢
20 布对石头 用户赢
21 布对剪子 用户输
22 布对布 重来
- 2023-07-03 14:45:03下载
- 积分:1
-
VB生成圆形图表,圆饼百分比图表
VB成绩统计饼图,生成圆形图表,圆饼百分比图表的例子,这种图表相信大家见多了,这个例子介绍了VB简单生成圆饼图的方法,对初学VB的朋友会有帮助,通过这个图表,你可以了解绘图、填充、按比例分配、绘制扇形等是如何实现的,用它来显示优秀人数、良好人数、及格人数、不及格人数所占的比例,各个比例用不同的颜色填充,让结果一清二楚,源代码运行于VB6.0环境 ,运行效果如下图所示。
- 2022-05-15 05:38:34下载
- 积分:1
-
内核为VB6的一个下载软件开源源码
内核为VB6的一个下载软件开源源码, 界面方面支持悬浮窗、支持TAB窗口选项卡切换内容,操作方便,关于下载文件方面,已经实现的功能:
1.同时下载两个文件
2.支持断点续传
3.支持代理服务器
使用方法:
1.双击开始或停止
2.其他按鼠标右键
- 2022-10-17 00:05:03下载
- 积分:1
-
VB将 数组元素作为实参
VB将 数组元素作为实参,本例可以求出三个一元二次方程的根。请先单击命令按钮,先输入各个方程的系数,
- 2023-06-29 13:10:04下载
- 积分:1
-
VB利用地址偏移访问内存
VB利用地址偏移访问内存,整个处理过程 封装在事件函数中,用户单击后,执行以下代码:
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Sub Form_Load()
Dim i As Long
Dim j As Long
i = 1234
j = 4321
Debug.Print VarPtr(i)
Debug.Print VarPtr(j)
CopyMemory ByVal VarPtr(i), ByVal VarPtr(i) - 4, 4
Text1.Text = i
End Sub
- 2022-08-20 12:19:05下载
- 积分:1