-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分:1
-
VB 记录鼠标行为,判断左键右键
VB 记录鼠标行为,记录用户是单击了鼠标右键或是左键,监控鼠标被单击了哪个键,核心的代码如下:
If GetAsyncKeyState(VK_LBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标左键 "
ElseIf GetAsyncKeyState(VK_RBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标右键 "
End If
- 2022-02-28 11:29:47下载
- 积分: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利用数据窗口辅助录入数据
vb利用数据窗口辅助录入数据,也就是本程序窗口中,生成了一些数据辅助窗口,可对用户的录入工作提供一些帮助,其实就是一些供用户选择的组件之类的,用户了用户,又提升了数据录入的准确性,在VB6.0中,本源码可顺利编译成功,运行后如示例图所示。
- 2023-07-26 19:20:03下载
- 积分:1
-
VB6 FileExists判断文件是否存在
VB6 判断文件是否存在,使用VB内置的函数FileExists来实现,可以说实现方法简单,直接调用函数(文件路径)即可,至于返回的结果,这里有两种形式,一种是以MsgBox的方式弹出窗口告之,另一种是返回布尔值,True或False,然后再进行相关处理。关于FileExists用法,有以下代码供参考:
Dim B As Boolean
B = FileExists(Me.Txt_Path.Text)
If B Then
MsgBox "文件存在"
Else
MsgBox "文件不存在"
End If
以上代码段封装在按钮事件中,用户单击按钮后,执行本段代码,判断指定的文件是否存在。
- 2022-07-04 15:21:27下载
- 积分:1
-
vb.net复制、移动删除及获取文件的各种属性
vb.net获取TXT文件的各种属性参数,除了复制、移动文件、删除文件外,还可获取到文件的各种属性参数,不过只是针对TXT文本文件,可以获取到以下的参数:文 件 名 、路 径 、文件大小 、创建文件时间、最近访问时间、最近写入时间、是否隐藏文件、是否只读文件、是否系统文件 、是否脱机文件等 。
- 2022-01-26 07:50:33下载
- 积分: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
-
一个演示VB API高速搜索文件的程序
一个演示VB高速搜索文件程序,基于API来实现,用于快速查找文件,类似的例子在前几年的书籍实例中,有很多,这一个也是从VB的书中整理出来的,代码中有丰富的注释,主要是分享给VB新手参考学习的。
- 2022-10-25 13:25:04下载
- 积分:1
-
VB.NET窗体Tab 读取ini文件 界面滑动等功能集
本源码基于VB.NET编写,集合了VB.NET中的读取ini文件,窗体Tab标签,界面滑动等效果,界面看上去是一个音乐播放器,其实本程序是侧重于界面的编程设计,演示了窗口中TAB标签切换、界面滑动以及整体界面的美化的具体实现,使用了比较多的三方DLL,已经都打包了,感兴趣的下载源码,在VS2012版本以上的VS中打开并编译。
- 2022-01-26 07:32:46下载
- 积分:1
-
VB删除指定路径下的文件夹【目录】
VB6.0 删除指定路径下的文件夹【目录】 ,删除时请输入要删除文件夹的所在路径和名称,单击按钮即可。支持遍历目录删除文件,我觉得这是一个挺好的使用FSO操作的VB范例,对于VB新手学习相关的文件操作有很好的帮助。
- 2022-03-19 05:31:28下载
- 积分:1