-
VB整源码判断字符串中某一字符是否大写
VB编写完整源码判断字符串中某一字符是否大写,执行下面的代码,这个例子简单哦,不多介绍了,直接看代码吧:
If Asc(Mid(Text1, Val(Text2), 1)) >= 65 And Asc(Mid(Text1, Val(Text2), 1)) = 97 And Asc(Mid(Text1, Val(Text2), 1))
- 2022-06-27 09:12:36下载
- 积分:1
-
VB.NET获取Windows 7操作系统信息
VB.NET获取Windows 7操作系统信息,本程序获取的内容比较多,主要有:显示器分辨率、桌面文件夹路径、收藏夹路径、Application Data""路径"、Windows7当前登录的用户名、当前应用程序的路径、计算机IP和计算机全名、控制面板、辅助选项/常规、系统属性、增加打印机、添加/删除程序、显示安装/卸载、显示Windows 安装、添加/删除程序、Windows7时间/日期、Windows7背景设置、外观设置、键盘/速度属性、设备管理器。
- 2023-06-05 04:30:03下载
- 积分:1
-
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
-
VB6.0 使用ADO对象访问数据库
VB6.0 使用ADO对象访问数据库,这个例子其实很简单,就是基本的VB连接数据库、读取数据库内容,然后浏览一条一条的数据,最后关闭数据库,面向VB编程开发新手,有兴趣下载整个源码,在代码中都有详细的注释,因此很适合学习一些数据库操作的基础知识,源码运行截图如下:
- 2022-08-22 22:55:07下载
- 积分:1
-
VB 为菜单添加分割线
VB6为菜单制作添加分割线,在菜单项与菜单项之间显示一个分隔线,这个在Windows经典风格的窗口中,十分常见,像一个水平线那样,把菜单分成多个部分,这个水平线带有阴影效果,视觉效果更立体。
本窗口中的菜单,是一个企业综合管理系统的主界面面板,那些菜单都是测试用的,你可以看一下菜单中的分隔线是如何嵌入到菜单中的。
- 2022-09-22 23:30:03下载
- 积分:1
-
VB.NET 多线程TCP端口扫描工具
VB.NET 多线程TCP端口扫描工具,使用前请输入要扫描的网段IP和端口,本程序可将扫描到的开放端口数量显示在窗口中,扫描时应用了多线程技术,扫描时显示当前线程数,适时显示扫描进度和扫描时间,以毫秒计时,扫描速度提升了不少。
注:本程序仅能扫描开放的端口,被禁止和未开放的端口不能被扫描到。
- 2022-05-25 05:47:04下载
- 积分:1
-
VB 6.0 将数组中的数据利用图表分析
VB 6.0 将数组中的数据利用图表分析,也就是用柱状图来显示数组中的数据,所有的操作都是从点击按钮开始的,如下代码:
Private Sub Form_Load()
Dim i
i = Array(1, 2, 3, 4, 5, 6, 7)
Dim j
For j = 0 To UBound(i)
With MSChart1
.RowCount = UBound(i) + 1
.Row = j + 1
.ColumnCount = 1
.Data = i(j)
.RowLabel = i(j)
End With
Next j
End Sub
- 2022-01-25 18:47:19下载
- 积分:1
-
VB6 获取当前打开窗口数量
VB6 获取当前打开窗口数量,如何获取当前打开窗口数量,本示例打开一个窗口后,在测试时会打开另外一个窗口,然后主窗口中会统计到这个打开的窗口,把当前打开窗口的数量填入文本框中。本程序可学习一下DoEvents()的用法。调用新窗口显示可参考以下代码:
Private Sub Command1_Click()
Form2.Show
Call Form_Activate
End Sub
Private Sub Form_Activate()
Text1.Text = DoEvents()
End Sub
- 2022-07-19 06:40:19下载
- 积分:1
-
VB 只允许输入特殊字符
VB 只允许输入特殊字符,这只是一个普通的用户查询窗口,字段名称、运算符、关 键 字,然后对其进行查询,因为要向cbofields中添加规范化数据,所在再输入时只能输入“>”、“
- 2022-03-19 10:07:52下载
- 积分:1
-
VB 6.0 利用文本框组输入数据
VB 6.0 利用文本框组输入数据,你会发现这量个矩阵类型的输入框,输入完一组数据后,会提示输入第二组,当所有都输入完成后,以3行4列的矩阵方式输出数组元素,输入的过程中支持光标的自动定位功能,你可以了解一些提高输入效率的基本操作,有利于提高软件的使用体验。
- 2022-08-17 01:05:20下载
- 积分:1