-
树状导航菜单 +窗体分隔+框架窗口VB源码范例
本实例是一个比较综合、完整的窗口制作实例，演示了树状导航菜单的制作方法，还有窗口中各种菜单的实现步骤，同时还演示了如何对窗口进行分隔显示，实现了一个带树形菜单的框架式程序主窗口界面，可广泛应用于VB的各种信息管理系统的开发中。VB源代码范例，在VB6.0环境下完美编译运行。
- 2022-09-10 22:15:03下载
- 积分：1
-
VB让窗口标题栏闪烁效果源码
VB让窗口标题栏闪烁效果源码，不过我测试没有发现标题栏闪烁，咋回事呢？实现的思路是：声明API函数Flashwindow，然后编写下面的代码：
Call FlashWindow(hwnd, 1)
If Me.Caption = "闪烁的标题栏" Then
Me.Caption = "欢迎使用管理软件！ "
Else
Me.Caption = "闪烁的标题栏-www.codesc.net"
End If
- 2022-08-08 08:27:55下载
- 积分：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 RTrim()去除字符串行尾空格
vb 演示如何去除字符串结尾空格，把输入框中的含有空格的字符串，全部过滤掉空格，这个源码似乎有上结简单了，使用RTrim()，一行代码即可搞定：
Private Sub Command1_Click()
Text2.Text = RTrim(Text1)
End Sub
主要是使用了RTrim()函数，这个函数不只是过滤行尾空格，也会将字符串中间空格过滤掉。
- 2022-10-07 20:30:03下载
- 积分：1
-
VB将 数组元素作为实参
VB将 数组元素作为实参，本例可以求出三个一元二次方程的根。请先单击命令按钮，先输入各个方程的系数，
- 2023-06-29 13:10:04下载
- 积分：1
-
日常考勤程序 基于VB.NET实现附源码
一款基于VB.NET和sqlserver数据库实现的考勤程序，实现公司员工的日常考勤功能，可实现指定日期的员工考勤，考勤时可选择考勤天数、考勤人，可查询本人的考勤记录，实现的是挺基本的考勤模块，还可显示当前用户的历史记录。
本实例的数据库文件在db文件夹下，请自行添加，并配置数据库信息。
源代码运行于VS2015环境下。
- 2022-12-02 11:45:03下载
- 积分：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写的DVD播放器源代码
播放器窗口界面中的操作菜单，实现了弹出菜单的功能，把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。
播放器功能支持DVD格式的视频播放，包括了暂停、播放、停止、弹出等功能。
本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
- 2023-05-18 15:05:03下载
- 积分：1
-
支持代理的VB FTP服务器程序
一个FTP程序的例子，不过这个是支持代理服务器的，用VB编写FTP的例子,支持代理服务器。这个程序同样来自国外VB网站，代码中很多注释，不过是英文的。这个FTP程序的样子似乎还需要完善，和当下流行的、CuteFTP、FlashFXP都有很大的区别，甚至说有点简陋，不过这个代码主查面向学习的，英文好的可下载本源码学习。
- 2022-03-06 02:53:34下载
- 积分：1
-
VB源码演示如何制作倒计时程序
VB编写的倒计时程序，测试时，请输入目标日期与时间，格式如演示截图中所示，然后按下“倒计时”按钮，即可开始倒计时了，会显示出具体剩余的天数和时、分、秒。程序主要基于CDate函数和DateDiff函数来实现，主要代码如下：
Private Sub Timer1_Timer()
On Error GoTo H
Timer1.Interval = 1000
Dim i As Date
i = CDate(Text1)
Label1.Caption = "距离" & Text1 & "还剩" & DateDiff("d", Now, i) & "天" & CLng(DateDiff("h", Now, i)) Mod 24 & "小时" & CLng(DateDiff("n", Now, i)) Mod 60 & "分" & CLng(DateDiff("s", Now, i)) Mod 60 & " 秒"
Exit Sub
H:
MsgBox "请输入正确的时间"
Timer1.Enabled = False
End Sub
- 2022-03-13 16:12:01下载
- 积分：1
