-
在状态栏中显示当前状态-VB范例
VB6.0在状态栏中显示当前状态，演示程序以一个画图程序来演示窗口状态栏的变化，当我们画直线、执行操作： 画正方形，执行操作： 画圆的时候，会显示出状态，要注意观察窗口的状态栏上的文字提示信息。这种形式现在不算什么高大上功能了，很早的VB示例中就实现了，因此本源码比较基础了，高手请绕行。
- 2023-03-24 17:45:04下载
- 积分：1
-
树状导航菜单 +窗体分隔+框架窗口VB源码范例
本实例是一个比较综合、完整的窗口制作实例，演示了树状导航菜单的制作方法，还有窗口中各种菜单的实现步骤，同时还演示了如何对窗口进行分隔显示，实现了一个带树形菜单的框架式程序主窗口界面，可广泛应用于VB的各种信息管理系统的开发中。VB源代码范例，在VB6.0环境下完美编译运行。
- 2022-09-10 22:15:03下载
- 积分：1
-
分享一个VB Excel表格生成模块
分享一个VB Excel表格生成模块，借助了模块中的ChangeToExcel.ocx组件来生成，使用时需要引入此组件。该组件中具备创建Excel文件、向Excel文件中插入内容、出错处理等功能。
Excel表格生成模块为该组件的源代码文件，你还可以通过源码对组件功能进行调整。
Demo文件夹下是使用此组件导出Excel文件的例子，单击按钮即可生成Excel文件。
- 2022-11-26 13:10:03下载
- 积分：1
-
VB NET sqlserver 销售管理系统
VB NET sqlserver 销售管理系统，销售业务，销售发货，销售退货，回款管理，统计报表，基础信息管理、系统设置、备份和恢复数据、货品基本信息管理、业务员管理等。
版权所有(C) 作者个人自由创作室
VB.NET 销售管理系统 V1.0，SQLSERVER2000数据库。
- 2022-03-16 19:52:06下载
- 积分：1
-
超强的音频格式文件处理动态库
这个代码是一个支持不同音频格式的声音动态库文件，支持声音回放、音频编码、解码。他能解码（所以也能播放）WAV, MP3, OGG Vorbis, WMA, APE和CDA, 以及编码 WAV, MP3, OGG Vorbis, WMA和APE。在音频流回放上使用了 DirectSound 8(所以你需要dx8vb.dll),支持DSP,频谱分析，可视化效果等数据控制。文件夹内的示例说明：1、通吃音乐播放器 Ver 2.0（支持播放所有格式的音频文件，支持显示文件TAG,3种可视化效果（频率、时间、dBFS显示）；2、CD提取转换工具 Ver 1.0（提取CD内音轨并转换为所有的支持格式）；3、音频格式文件转换器 Ver 1.0（各种音频格式的相互转换）；4、简单示例（一个简单的背景回放示例）。需要说明的是其中需要的部分编解码文件需要第三方的支持，以下是下载地址： APE 和 MP3:
源码中已经包含了dx8vb.dll，编译前记得引用。
- 2023-04-25 07:40: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
-
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禁用窗体最大化、最小化和关闭快捷菜单
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
-
VB输入限制：只允许输入汉字
VB输入限制功能一例：只允许输入汉字，本实例只允许用户输入汉字，如果输入其它类型的字符，程序将不允许输入，且会提醒用户。原理是获取键盘上的ASCII值，并判断是否在中文汉字的范围，若不在，就禁止输入。实现本功能的关键代码，分享给大家：
If KeyAscii > 0 And KeyAscii 13 And KeyAscii 8 Then
KeyAscii = 0
MsgBox "只允许输入汉字！", 48, "提示"
End If
因为是对键盘的控制实现对输入的限制，因此若鼠标复制了一段包含其它字符的文字，则程序无能为力，因为鼠标不在监控范围。
- 2023-02-18 18:05:03下载
- 积分：1
-
VB 调用API函数设计关于窗体
VB 调用API函数设计关于窗体，看第一眼，我还以为是调用Windows系统的关于窗口，仔细看，定义了自己的信息，这个例子可看作是VB使用API函数的例子，了解一些用法，关于本例子中的API用法，可看以下代码：
API函数声明：
Private Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hWnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long
Private Sub Form_Load()
Call ShellAbout(hWnd, "源码素材网", " 欢迎访问网站:http://www.codesc.net！", Me.Icon)
调用了ShellAbout显示信息，更多内容请下载源码。
- 2022-01-25 16:50:26下载
- 积分：1
