-
VB6.0 改变扩展名保护Access数据库
VB6.0 改变扩展名保护Access数据库,也就是让用户修改Access数据库的扩展名,之前可能禁止改变,但本代码介绍的方法允许修改扩展名,以下是本例子核心功能部分的完整源码,仅供参考:
Private Sub Form_Load()
Dim cnnstr As String
cnnstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db_wjgl.bak;Persist Security Info=False"
cn.Open cnnstr
Adodc1.ConnectionString = cnnstr
Set Picture1.DataSource = Adodc1
Picture1.DataField = "文件"
End Sub
Private Sub Form_Unload(Cancel As Integer)
cn.Close
End Sub
- 2022-05-16 07:33:58下载
- 积分: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的保存文件对话框调用创建一例,弹出“打开”对话框,还有保存对话框,另存为对话框,通用对话框,cdlOFNFileMustExist当用户输入非法的文件名时,要显示一个警告。
cdlOFNReadOnly指示对话框关闭时只读复选框的状态。。
- 2022-02-11 13:06:23下载
- 积分:1
-
VB6.0 顺序文件写操作的操作演示
VB6.0 顺序文件写操作的操作演示,三种方法写数据,包括了完整的源码项目下载,是学习VB文件读写操作的好范例。
这三种方法是:
把文件的内容一次性的写入
把字符一个一个写入
依次写入顺序文件
- 2022-01-26 17:24:14下载
- 积分:1
-
VB 使用DataGrid显示书名数据表
VB 使用DataGrid显示书名数据表,这个例子相当简单,主要是学习在VB编程中如何使用DataGrid数据网格控件,将数据库内容读取出来,然后绑定到DataGrid表格中显示:
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=book"
Adodc1.RecordSource = "select * from 书名"
Set DataGrid1.DataSource = Adodc1
DataGrid1.Columns(3).NumberFormat = "$0.00"
DataGrid1.Columns(4).NumberFormat = "$0.00"
End Sub
- 2023-04-26 14:25:03下载
- 积分:1
-
vb.net 键盘鼠标全局线程钩子
vb.net 键盘鼠标全局线程钩子实例源码,源码中包括了HOOk的源码和Test项目源码,HookCode目录中是HOOk的源代码,TestForm为测试源码。测试时请把hookcode目录中生成的TheHook.dll文件拷贝至TestForm目录的bin目录下,与exe同级,运行效果如下图所示。
- 2022-01-21 21:24:31下载
- 积分:1
-
VB.NET邮件发送实例 可发附件
VB.NET编写支持发送附件的邮件发送实例,本实例源码中包含用于将电子邮件发送到简单邮件传输协议(SMTP)服务器进行传送的类,这里使用了SmtpClient 类发送电子邮件,可设置允许添加的附件类型,支持文本文件(*.txt)|*.txt|Word文档(*.doc)|*.doc|图像文件*.BMP;*.JPG;*.GIF等格式,为了避免程序出错,在本程序刚启动时,帐号、密码框暂时不可用。
- 2022-08-15 21:36:57下载
- 积分:1
-
VB为Lable标签着色(填充不同颜色)
VB6.0为Lable标签着色(填充不同颜色),把标签分别填充上不同的颜色,在显示一些统计数据的时候,可清淅的显示出各种数据类型,提升用户浏览体验。
为Lable着色是非常简单的,你可以从本例子中学会用法。
- 2022-02-05 08:55:36下载
- 积分:1
-
vb.NET模拟扑克牌出牌功能
vb.NET模拟扑克牌出牌功能,其实可看作是一个界面较简单的扑克牌游戏,界面有些粗糙,没有过多美化,用文字描述了牌面,后续可以对界面进行升级。有点过于简单了,可当作一个初级的VB.NET编程例子吧。
- 2022-03-22 04:23:34下载
- 积分:1
-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分:1