-
VB6 给窗体添加滚动条
VB6 给窗体添加滚动条,调整水平滚动条的一些属性。当窗体的大小发生变化时发生,垂直滚动条与窗体相对位置不变,滚动条的大小随着窗体大小的改变而改变,命令按钮作水平滚动条与垂直滚动条交接处的填充。
因代码注释较多,详细代码情况请您下载本源码包,自行解压查看。
- 2023-02-22 07:50:04下载
- 积分:1
-
VB演示 FileToSplit分割文件与合并文件
VB演示分割文件与合并文件,这里使用到比较多的文件操作函数,比如FileToSplit、FileLen、UBound、FileCount、FileInfo等。本范例文件分割的思路:程序通过调用FreeFile函数来取得可以的文件号,以二进制的方式打开文件,根据文件的长度FilesLen和每个分割单位的比较,得出被分割之后的子文件个数,重新定义最后一个子文件的大小,将所取得的内容,分别存储到各个子文件中,将文件分割情况,存储到自定义的结构类型FileInfoFile中,最后将文件分割的情况,存入到模版文件中。
关于文件合并,则可看作是上述的逆过程,不再详述,请参见源码中的文件注释。
- 2022-11-15 13:30:03下载
- 积分:1
-
VB Seek语句设置随机访问文件的读取位置
VB 设置随机访问文件的读取位置,本例中是使用Seek语句来设置随机访问文件的读取位置,代码编写方面,主要是掌握Seek的用法,以下代码将用户的单击行为作为触发Seek的事件条件:
Private Sub Command1_Click()
Dim str As String * 10
Open App.Path & "MyFile.txt" For Binary As #1
Seek #1, 5
Get #1, , str
Text1.Text = str
Close #1
End Sub
当用户单击按钮后,执行seek语句。
- 2022-03-24 08:37:41下载
- 积分:1
-
VB 写的拼图 用数字代表图片
VB 写的拼图 用数字代表图片,将数字的顺序排列好,就完成了拼图,比起图片版的拼图,要简单多了。
玩法:将数字1挪动到最开始的位置,如何移动?要把占位的数字一个一个挪开,依次为1、2、3等数字让位,把整体排序好,就拼好了。
- 2022-07-23 16:53:18下载
- 积分:1
-
VB.net 绘制实时曲线源码
VB.net 绘制实时曲线,是一个实时曲线控件的DEMO测试,使用这个控件,可以生成适时曲线 、历史曲线 、动态历史曲线。可用于流量 监控、访问量统计、员工绩效排名等众多场合中。
CEGraphControl目录中为控件的源代码,DeviceApplication1为使用此控件的示例,测试时要把CEGraphControl目录中生成的CEGraphControl.dll文件拷贝到测试源码的Bin同级目录中。
- 2022-07-26 13:54:49下载
- 积分:1
-
VB删除指定路径下的文件夹【目录】
VB6.0 删除指定路径下的文件夹【目录】 ,删除时请输入要删除文件夹的所在路径和名称,单击按钮即可。支持遍历目录删除文件,我觉得这是一个挺好的使用FSO操作的VB范例,对于VB新手学习相关的文件操作有很好的帮助。
- 2022-03-19 05:31:28下载
- 积分:1
-
vb串口调试助手源码,可用于自己做调试测试工具
1.用易懂的VB语言编程 2.可设置串口号波特率 3.支持十六进或字符形式发送或接收,可定时发送。3,可自己换程序的图片
- 2022-07-13 02:02:52下载
- 积分:1
-
VB演示操作存储过程的方法
VB演示操作带参数和不带参数的存储过程的方法,通过一个数据库查询来体现功能的差别。同时还包括了创建存储过程信息。
我们从打开数据链接开始,演示如何简单创建一个存储过程,下面是核心的几何代码:
con.Open
con.Execute ("Create Procedure book1 @price int As Select * From 书名 where 单价>=@price")
MsgBox "成功创建存储过程"
con.Close
SQL语句是一个查询书名对应价格的例子,仅供参考。
- 2022-01-25 20:38:51下载
- 积分: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
-
VB.NET 小型家庭理财系统源代码
VB.NET 小型家庭理财记帐系统源代码,功能模块:文件、导入导出、操作、查询、删除、修改、关于软件、经手人、项目、收支类型等的管理。本程序感觉重点在数据库部分的设计 ,里面对帐务明细的查询功能,对于熟悉VB.NET与数据库的各种操作十分有帮助。本财务管理系统的数据库为SQLSERVER,为了确保本程序正常运行,请在运行前附加Database数据库到你的SQLSERVER中,并连接好数据库字符串,需要修改Module1.vb文件。
- 2022-04-10 12:53:23下载
- 积分:1