-
VB 演示如何使用WeekdayName获取星期名称
VB 演示如何获取星期名称,这里获取星期几是使用了VB内置的WeekdayName函数,将获取到的日期和星期几直接显示在Text控件中,下面是这个函数的具体用法:
Private Sub Command1_Click()
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
Private Sub Form_Load()
Text1.Text = Date
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
在VB6.0 IDE环境中编译此源代码,生成如演示截图所示的运行效果。
- 2022-11-30 01:55:03下载
- 积分:1
-
VB6.0 获取汉字拼音简码(首字母)
VB6.0 获取汉字拼音简码,获取汉字拼音首字母,这个比较实用了,现在很多地方都会取首字母作为编号、帐号之类的,代码比较多,这里就不帖核心代码了,大家自行下载本源码吧,运行的效果如截图所示。
- 2022-04-15 06:44:52下载
- 积分:1
-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分:1
-
VB演示三种FileSystemObject文件操作方法
FSO对象模型提供了三种创建和打开文件的方法:其实本示例是创建了FileSystemObject对象,然后用FSO对象的FileExists、CreateTextFile、OpenTextFile方法,对文件进行操作,演示了三种FSO对象的操作方法,对学习初级的FSO文件操作有相当好的帮助作用。
- 2022-02-07 21:26:36下载
- 积分:1
-
vb实现调用其他应用程序的菜单
vb演示如何调用其他应用程序菜单的方法,程序演示了在VB程序中,调用 windows记事本程序的菜单,不过测试发现,本程序在Windows 7中失效了,本代码写于2010年的,有些早了,当时可能只考虑了Windows XP,可能需要对以下代码加以修正,才能适用于windows 7/10环境:
hwnd = FindWindow(vbNullString, "无标题 - 记事本菜单")
If hwnd = 0 Then Exit Sub
hMainMenu = GetMenu(hwnd)
hMenu = GetSubMenu(hMainMenu, 0)
MenuID = GetMenuItemID(hMenu, 3)
AppActivate "无标题 - 记事本菜单"
Ret = SendMessage(hwnd, WM_COMMAND, MenuID, 0&)
- 2022-06-26 16:44:01下载
- 积分:1
-
VB程序托盘控件+源码实例
VB程序托盘控件+源码实例,VB自定义一个添加程序到Windows托盘图标的控件,编译控件源码后生成Tray.ocx,源码包中附有一个调用本托盘程序的示例,在TrayDEMO文件夹内,在Class1.cls文件中实现了托盘的主要操作:将程序图标添加到系统托盘区,将图标从系统托盘区中删除,设置图标的提示信息,添加图标右键操作等功能。
- 2022-07-07 04:23:33下载
- 积分:1
-
VB 利用Tag属性存储用户名
VB 利用Tag属性存储用户名
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "用户名或密码不能为空", vbCritical, "信息提示"
Exit Sub
Else
If Text1.Text = "TSoft" And Text2.Text = "111" Then
Me.Tag = Text1.Text
Frm_Main.Show 1
Unload Me
Else
MsgBox "输入的名户名或密码不正确", vbCritical, "信息提示"
End If
End If
- 2022-02-04 07:45:58下载
- 积分:1
-
vb.net读取Access数据库数据并生成适时曲线
vb.net绘制生成曲线,数据从access数据库中读取,然后将数据进行简要处理后,传送给曲线生成函数,生成适时的数据曲线。
请注意:vb.net里PICTURE只支持像素,长度比较大,需要乘除定义精确值,8当余数为1,则刚好够总长度,否则需要判断长度,计算出坐标,画图,如果要设置数值或日期的显示格可以设置Format属性,例如: .Format = "¥0.00"。
- 2022-03-21 23:38:41下载
- 积分:1
-
分享一个VB Excel表格生成模块
分享一个VB Excel表格生成模块,借助了模块中的ChangeToExcel.ocx组件来生成,使用时需要引入此组件。该组件中具备创建Excel文件、向Excel文件中插入内容、出错处理等功能。
Excel表格生成模块为该组件的源代码文件,你还可以通过源码对组件功能进行调整。
Demo文件夹下是使用此组件导出Excel文件的例子,单击按钮即可生成Excel文件。
- 2022-11-26 13:10:03下载
- 积分:1
-
VB.NET 多线程TCP端口扫描工具
VB.NET 多线程TCP端口扫描工具,使用前请输入要扫描的网段IP和端口,本程序可将扫描到的开放端口数量显示在窗口中,扫描时应用了多线程技术,扫描时显示当前线程数,适时显示扫描进度和扫描时间,以毫秒计时,扫描速度提升了不少。
注:本程序仅能扫描开放的端口,被禁止和未开放的端口不能被扫描到。
- 2022-05-25 05:47:04下载
- 积分:1