-
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
-
VB6.0使用InPutBox显示密码输入框
VB6.0使用InPutBox显示密码输入框，InPutBox大部分情况下是用于输入数据，与用户交互，但这些数据并不是密码类型的，本实例是展示是使用InPutBox作为密码输入框，其实也是挺简单的：
Private Sub Command1_Click()
On Error GoTo Err_Out
Dim lTemp As Long
Dim sTemp As String
lTemp = SetTimer(Me.hwnd, NV_INPUTBOX, 1, AddressOf TimerProc)
sTemp = InputBox("请输入密码", "密码输入框")
Err_Out: End Sub
- 2023-02-13 07:30:04下载
- 积分：1
-
VB 6.0 在字符串中用一子串替换另一子串
VB 6.0 在字符串中用一子串替换另一子串，采用VB中内置的Replace函数来实现，类似这种的替换字符串方法，在平时使用十分广泛，在WEB编程的ASP/PHP/ASP.NET中，同样使用广泛。本示例中，主要是替换一个字符串中的指定位字符串，将其替换成其它字符。
关于Replace的用法，请看以下代码片段：
Text3.Text = Replace(Text1, Mid(Text1, 2, 2), Text2)
- 2022-01-26 05:32:59下载
- 积分：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.NET获取Windows 7操作系统信息
VB.NET获取Windows 7操作系统信息，本程序获取的内容比较多，主要有：显示器分辨率、桌面文件夹路径、收藏夹路径、Application Data""路径"、Windows7当前登录的用户名、当前应用程序的路径、计算机IP和计算机全名、控制面板、辅助选项/常规、系统属性、增加打印机、添加/删除程序、显示安装/卸载、显示Windows 安装、添加/删除程序、Windows7时间/日期、Windows7背景设置、外观设置、键盘/速度属性、设备管理器。
- 2023-06-05 04:30:03下载
- 积分：1
-
VB将 数组元素作为实参
VB将 数组元素作为实参，本例可以求出三个一元二次方程的根。请先单击命令按钮，先输入各个方程的系数，
- 2023-06-29 13:10:04下载
- 积分：1
-
树状导航菜单 +窗体分隔+框架窗口VB源码范例
本实例是一个比较综合、完整的窗口制作实例，演示了树状导航菜单的制作方法，还有窗口中各种菜单的实现步骤，同时还演示了如何对窗口进行分隔显示，实现了一个带树形菜单的框架式程序主窗口界面，可广泛应用于VB的各种信息管理系统的开发中。VB源代码范例，在VB6.0环境下完美编译运行。
- 2022-09-10 22:15:03下载
- 积分：1
-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容，从例子来看，是一个数据库搜索的例子，也就是用户搜索的什么，列表中会显示出相关内容。只是说法不同而已，为了可以正常运行，本示例中的数据库采用Access数据库，数据库文件为：db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分：1
-
VB 使用鼠标分割窗体的Split实例源码
VB6.0 使用鼠标分割窗体，用鼠标切分主窗体，实现SplitForm，可以用鼠标切分的窗体，在一些流行的应用程序中，经常见到窗体上有二个相邻的列表框，可以用鼠标任意拉动中间分割条，改变列表框的大校
演示窗口其实是一个布满了各种导航菜单的窗口，这也是大家学习的一个亮点哦，作为一个信息管理系统的主界面效果还是相当不错的，分隔窗体在很多时候我们也用得上的。
- 2022-08-08 21:38:42下载
- 积分：1
-
vb 通过程序设置系统日期和时间的格式
vb 通过程序设置系统日期和时间的格式，设定时可以改变长日期格式，短日期格式，改变时间格式，看着很像是以前Windows XP时候的时间设置窗口的功能。请注意，日期格式设置成功，需要重新启动计算机或注销后可以看到新的短日期格式！以下是改变日期格式其中的一个例子代码，仅供参考：
Dim ret2 As Long
Dim sd As String
ret2 = RegOpenKey(HKEY_CURRENT_USER, "Control PanelInternational", hKey)
If ret2 = 0 Then
sd = Combo1.Text
RegSetValueEx hKey, "sShortDate", "0", REG_SZ, ByVal sd, LenB(StrConv(sd, vbFromUnicode))
MsgBox "日期格式已设置成功，重新启动计算机或注销后可以看到新的短日期格式！", , "提示窗口"
End If
- 2023-06-21 17:25:03下载
- 积分：1
