-
VB6.0 Mid判断指定字符串出现的次数
VB6.0 判断指定字符串出现的次数,判断字符串A在字符串B中出现的次数,使用了VB的Mid函数来判断,如图所示的运行效果,单击按钮即可查看运行结果。代码验证判断部分,采用for循环遍历判断,代码如下:
Dim j As Integer
j = 0
For i = 1 To Len(Text1)
If Mid(Text1, i, Len(Text2)) = Text2 Then
j = j + 1
End If
Next i
Label2.Caption = "出现" & j & "次"
- 2022-03-18 12:18:22下载
- 积分:1
-
VB6.0 使用递归过程实现阶乘运算
VB6.0 使用递归过程实现阶乘运算
Function F(n As Integer) As Single
If n > 1 And n
- 2022-04-27 22:53:13下载
- 积分:1
-
vb.NET模拟扑克牌出牌功能
vb.NET模拟扑克牌出牌功能,其实可看作是一个界面较简单的扑克牌游戏,界面有些粗糙,没有过多美化,用文字描述了牌面,后续可以对界面进行升级。有点过于简单了,可当作一个初级的VB.NET编程例子吧。
- 2022-03-22 04:23:34下载
- 积分:1
-
vb.net 读取INI文件示例
vb.net vs2008读取INI文件示例,ini文件名为 Send.ini,代码中包括了一个读ini API函数。
Ini文件说明:
[节名] []中的节名对应此API的第一参数
Name=内容 Name对应此API的第二参数
API的第三参数是没有取到匹配内容时返回的字符串;
API的第四参数是要返回的字符串;
API的第五参数是字符串缓冲的长度,一般255;
API的第六参数是INI文件的路径。
- 2022-02-20 08:44:55下载
- 积分:1
-
VB net 模拟考试系统 SQLSERVER版
VB net 模拟考试系统,本考试时间为30分钟,系统会进行倒计时。你必须正确输入你所在班级、姓名和学号,交卷后不能再考,即时间未到不要急于点""交卷""!点击""确定""进入考试系统。本考试系统的窗口只允许打开一个,程序会判断窗体是否已经打开,如果已经打开,则不需要重复打开,只是显示。
程序正常运行需要SQL数据库,请在测试前附加并连接好。
- 2022-02-07 21:46:47下载
- 积分:1
-
VB.NET应用程序管理工具-类似360桌布助手
这是一个用VB.NET开发的应用程序管理工具-类似360桌布助手的某此功能,通过导入保存有常用程序列表的XML文件,来通过程序来管理各应用程序的快捷方式,用户可以把常用的程序收集起来,在这里可以直接双击列表中程序名称或点击【启动程序】来启动每个程序。不用到处找你所安装的程序或软件。方便,快捷,常用程序列表:(用户可以拖放任何文件到下面列表中)。
程序列表的操作有导入和导出。
- 2022-08-20 10:25:11下载
- 积分:1
-
VB 类似超级兔子的程序界面
VB 类似超级兔子的程序界面,这只是一个应用程序的界面效果,不包括界面菜单中的功能,因此对界面UI的美化可以参考。这个界面是使用BMP贴图的方式实现,整个窗口就是一张图片,但是经过了处理,添加了菜单,其实挺简单的,当时用在一个手机维修管理系统中了,现在发上来,不知道对大家是否有用?
- 2022-02-07 20:21:01下载
- 积分:1
-
Visual basic vb6.0 制作个人调查表窗体
Visual basic vb6.0 制作个人调查表窗体,这个主要是练习一些VB Form 窗体控件中的元素用法,如果你初学习VB的话,这个例子非常适合你学习。
本例子中主要包括了对VB基本控件元素Check、Option、Text、Label、Button的用法进行了演示,具分享出了具体实现某一功能的代码及设置方法,涉及到光标自动归位、清空文本框、判断用户输入是否正确,断用户选择了哪一项按钮等功能,虽然简单,但对于VB打基础还是挺有帮助的。
- 2022-04-18 16:36:31下载
- 积分:1
-
VB 利用Tag属性存储用户名
VB 利用Tag属性存储用户名
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "用户名或密码不能为空", vbCritical, "信息提示"
Exit Sub
Else
If Text1.Text = "TSoft" And Text2.Text = "111" Then
Me.Tag = Text1.Text
Frm_Main.Show 1
Unload Me
Else
MsgBox "输入的名户名或密码不正确", vbCritical, "信息提示"
End If
End If
- 2022-02-04 07:45:58下载
- 积分:1
-
vb.net 串口通讯测试项目源码
vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。
运行后先检测测试需用的COM端口是否打开,弹出提示。
测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
- 2023-02-14 09:00:03下载
- 积分:1