-
VB6 利用Combo、DTPicker组合框辅助录入数据
VB6.0 利用组合框辅助录入数据,输入框什么的就不多说了,主要学习VB6 中的Combo、DTPicker组合框在录入数据时的用法,方便用户选择数据、选择时间,特别是时间,可固定为指定格式,防止程序出错等。
- 2023-03-15 11:25:03下载
- 积分:1
-
vb.net复制、移动删除及获取文件的各种属性
vb.net获取TXT文件的各种属性参数,除了复制、移动文件、删除文件外,还可获取到文件的各种属性参数,不过只是针对TXT文本文件,可以获取到以下的参数:文 件 名 、路 径 、文件大小 、创建文件时间、最近访问时间、最近写入时间、是否隐藏文件、是否只读文件、是否系统文件 、是否脱机文件等 。
- 2022-01-26 07:50:33下载
- 积分:1
-
vb.NET模拟扑克牌出牌功能
vb.NET模拟扑克牌出牌功能,其实可看作是一个界面较简单的扑克牌游戏,界面有些粗糙,没有过多美化,用文字描述了牌面,后续可以对界面进行升级。有点过于简单了,可当作一个初级的VB.NET编程例子吧。
- 2022-03-22 04:23:34下载
- 积分:1
-
VB演示 FileToSplit分割文件与合并文件
VB演示分割文件与合并文件,这里使用到比较多的文件操作函数,比如FileToSplit、FileLen、UBound、FileCount、FileInfo等。本范例文件分割的思路:程序通过调用FreeFile函数来取得可以的文件号,以二进制的方式打开文件,根据文件的长度FilesLen和每个分割单位的比较,得出被分割之后的子文件个数,重新定义最后一个子文件的大小,将所取得的内容,分别存储到各个子文件中,将文件分割情况,存储到自定义的结构类型FileInfoFile中,最后将文件分割的情况,存入到模版文件中。
关于文件合并,则可看作是上述的逆过程,不再详述,请参见源码中的文件注释。
- 2022-11-15 13:30:03下载
- 积分:1
-
VB.NET窗体Tab 读取ini文件 界面滑动等功能集
本源码基于VB.NET编写,集合了VB.NET中的读取ini文件,窗体Tab标签,界面滑动等效果,界面看上去是一个音乐播放器,其实本程序是侧重于界面的编程设计,演示了窗口中TAB标签切换、界面滑动以及整体界面的美化的具体实现,使用了比较多的三方DLL,已经都打包了,感兴趣的下载源码,在VS2012版本以上的VS中打开并编译。
- 2022-01-26 07:32:46下载
- 积分:1
-
VB 数据库连接通用类
VB 数据库连接通用类,这个数据库连接类支持的版本比较多了,不过有些老了,但是大致的连接原理都一样,支持Access95、Access2000、SQLServer、Dbfiles、Excel等各类存储型数据库的连接方法,并制作成了窗口的形式,以及测试程序,可以打开此数据库测试连接方法。
- 2023-04-15 17:45:04下载
- 积分:1
-
VB 只允许输入特殊字符
VB 只允许输入特殊字符,这只是一个普通的用户查询窗口,字段名称、运算符、关 键 字,然后对其进行查询,因为要向cbofields中添加规范化数据,所在再输入时只能输入“>”、“
- 2022-03-19 10:07:52下载
- 积分:1
-
VB 6.0 按字段显示数据库所有值
VB 6.0 按字段显示Access数据库所有值,是一个按条件查询数据库的例子,这里的数据库为BOOK2.mdb,核心的代码如下:
Private Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "ook2.mdb;Persist Security Info=False "
Adodc1.RecordSource = "select * from 作者"
Set DataCombo1.DataSource = Adodc1
DataCombo1.DataField = "城市"
Set DataCombo1.RowSource = Adodc1
DataCombo1.ListField = "姓名"
End Sub
- 2022-09-25 11:45:03下载
- 积分:1
-
VB.NET 获取全局鼠标坐标范例
VB.NET 获取全局coordinate鼠标坐标,显示窗体内的XY坐标,窗体外凡是显示屏幕的任意位置都可以显示出坐标,获取全局鼠标坐标,测试截图是获取本窗口外的鼠标坐标,请参见截图效果。随着鼠标移动会显示出各个鼠标坐标点的XY坐标信息。单击窗口的“开始”按钮后,将执行以下代码获取全局坐标:
GetCursorPos(p)
tooltip1.SetToolTip(Me, "当前鼠标位置 X=:" & p.x & "Y=:" & p.y)
tooltip1.Active = True
- 2022-11-10 13:15:03下载
- 积分:1
-
vb禁用窗体最大化、最小化和关闭快捷菜单
vb禁用窗体最大化、最小化和关闭快捷菜单,禁用最大化、最小化不可用,重点实现了禁止关闭窗口的功能,禁止后窗口上的关闭按钮变成灰色不可点击了,在实现方面,核心代码如下:
Private Sub Form_Load()
RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_COLSE, MF_REMOVE//禁止关闭
RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MAXIMIZE, MF_REMOVE//禁止最大化
RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MINIMIZE, MF_REMOVE//禁止最小化
End Sub
- 2022-08-06 00:49:36下载
- 积分:1