-
VB 演示创建视图 使用视图保存数据
VB 演示创建视图 以及使用视图保存数据,数据库选择了MSSQL,根据各数据库字段创建视图,并使用这个视图进行数据保存,测试前请确保数据库连接成功。
- 2022-07-17 20:55:23下载
- 积分:1
-
文件夹复制VB6.0实例
文件夹复制VB6.0实例源码,这里用了一个用户自定义函数,此函数可以出现一个对话框,并返回所选择的路径,若没有选择返回("")。模拟了Windows系统的文件夹模拟功能,看上去比较低级,只是通过这个功能,熟悉一些VB与文件操作的函数用法。
- 2022-03-05 20:29:32下载
- 积分:1
-
vb 交换两个变量的值
vb 不借助第3个变量实现两个变量互换,交换两个变量的值,在窗口上输入a和b的值,从运行效果截图你可看出这个功能:
If IsNumeric(Txt_a.Text) Then
a = Val(Txt_a.Text)
Else
MsgBox "请输入数字!"
Exit Sub
End If
If IsNumeric(Txt_b.Text) Then
b = Val(Txt_b.Text)
Else
MsgBox "请输入数字!"
Exit Sub
End If
a = a + b
b = a - b
a = a - b
Lbl_Info.Caption = "a的值是:" & a & " b的值是:" & b
- 2023-09-06 03:35:03下载
- 积分:1
-
VB6.0 添加、修改、删除数据库指定表
VB6.0 添加、修改、删除数据库指定表,添加、修改、删除作者表,VB6.0 添加、修改、删除数据库指定表。
- 2022-08-15 01:24:59下载
- 积分:1
-
vb.net 键盘鼠标全局线程钩子
vb.net 键盘鼠标全局线程钩子实例源码,源码中包括了HOOk的源码和Test项目源码,HookCode目录中是HOOk的源代码,TestForm为测试源码。测试时请把hookcode目录中生成的TheHook.dll文件拷贝至TestForm目录的bin目录下,与exe同级,运行效果如下图所示。
- 2022-01-21 21:24:31下载
- 积分:1
-
VB模拟输入的成绩判断奖学金等级
VB模拟输入的成绩判断奖学金等级,测试前请输入学生的三门功课的成绩,输入成绩后,程序会根据预设的判定一、二、三等奖学金的条件,来判断该同学成绩应该属于几等奖学金。
这类程序其实容易实现,中间的一些小技巧我觉得不错,比如当用户输入一科成绩后,光标自动定位到下一个文本框,如果需要用户输入内容比较多的时候,这个功能可大大提升用户体验。
更多源码细节请下载查看。
- 2022-02-20 07:54:43下载
- 积分:1
-
磁性窗体 VB简单实现方法举例
VB简单实现磁性窗体,将窗体粘合,子窗体连接的任何窗体都粘合上,获取所有窗体的矩形区域,并重新设置粘合,连接窗体上的矩形。这种窗口多见于一些影音视频播放软件中,比如播放列表快接近播放主窗口时,自动吸附到主窗口上,紧贴主窗口边缘,像是有种磁性一样吸附在一起,本窗口中的三个子窗口,都具有自动吸附的磁性感觉,有兴趣可下载本源码学习测试。
- 2022-01-21 20:24:46下载
- 积分:1
-
VB 使用VsMenu控件创建漂亮菜单
VB 使用VsMenu控件创建漂亮菜单,是一个很不错的VsMenu控件用法演示实例,在窗体上单击右键,可以看到弹出式菜单效果。
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then PopupMenu MDIfrmMain.mnuEdit
End Sub
- 2022-09-24 14:25:02下载
- 积分:1
-
VB 6.0将时、分、秒转换为时间
VB 6.0将时、分、秒转换为时间,就是把输入文本框中的内容,重新组合,并添加连接符,形成人们视觉习惯上的时间格式。
其实实现这个功能,不两行代码就可实现了:
Private Sub Command2_Click()
t = TimeSerial(Text1, Text2, Text3)
Label4.Caption = "时间为:" & t
End Sub
- 2022-08-15 03:56:46下载
- 积分:1
-
VB 石头剪刀布猜拳游戏
VB 石头剪刀布猜拳游戏,游戏操作方法:在窗体左下方的石头、剪子、布图标中,单击用户想要出的一种手势,电脑会自动给出该手势,任一方赢了都会给出相应提示图片信息。游戏结果判定逻辑:
将用户和计算机所选的图片的序号合成一个字符串,根据这个字符串判断用户的输赢
00 石头对石头 重来
01 石头对剪子 用户赢
02 石头对布 用户输
10 剪子对石头 用户输
11 剪子对剪子 重来
12 剪子对布 用户赢
20 布对石头 用户赢
21 布对剪子 用户输
22 布对布 重来
- 2023-07-03 14:45:03下载
- 积分:1