VB中处理加了密码的MDB文件
当MDB 文件加了密码，直接由 Access 打印MDB文件时，会出现密码对话框，询问密码。但是若要由 VB 程序中打印，必須更改 VB程序中打开MDB文件的指令，否则会出现错误信息！以下针对各种情况，分別加以说明：
1、 使用 DAO 命令打开MDB文件：OpenDatabase
若要由程序中打开，命令如下：
Set DB = OpenDatabase(DatabaseName, False, False, ";Pwd=密码")
实例：
Dim db As Database
Set db = OpenDatabase("C:\db1.mdb", False, False, ";Pwd=1")
若要使用 Data 控件，设定方法如下：
1、设定 DatabaseName 属性 (MDB文件名称 / 含路径)
2、设定 Connect 属性，將预设的字串 "Access" 改成 ";Pwd=密码" (不含双引号)
3、设定 RecordSource 属性
2、
使用 ADO 命令打开MDB文件：
在使用 ADODC 或 DataEnvironment 设定好之后，直接利用属性窗口修改 ConnectionString 属性(附属于 ADODC) 或 ConnectionSource 属性(附属于 DataEnvironment 的 Connection 控件)，修改的方法是在属性之后增加以下参数：
;Jet OLEDB:Database Password=密码
除了 ADODC 及 DataEnvironment 之外， 直接使用 ADO 控件來打开含有密码的 mdb MDB文件，设定参数的方法也是相同的。
3、
压缩加了密码的MDB文件：CompactDatabase
DBEngine.CompactDat
相关文档：
Private Function NMoneyToSMoney ( NMoney As Variant ) As String
If IsNumeric ( NMoney ) = False Then
NMoneyToSMoney = "不是数字� ......
VB Winsock State属性值
'winsock 状态常数
'sckClosed 0 关闭状态
'sckOpen 1 打开状态
'sckListening 2 侦听状态
'sckConnectionPending 3 连接挂起
'sckResolvingHost 4 解析域名
'sckHostResolved 5 已识别主机
'sckConnecting 6 正在连接
'sckConnected 7 已连接
'sckClosing 8 同级人 ......
这几天在设计阅读其中用到了很多好的技术,,让我们在设计软件的时候方便,,快捷,,美观.也是我们经常用到的一些控件.
所以在这里我会陆续把他分享出来.
这里是在窗体中改变窗体的大小.窗体内部所以控件的大小同比例的改变的一个程序
这些是在标准模块中
'定义 FormOldWidth, FormOldHeight 为全局变量，这样其他模块才能 ......
今天想要做类似金山词霸屏幕取词的功能，在网上找了一些资料，发现都很复杂。既然金山词霸已经实
现了，借用之:
金山词霸中2005中带了一个XdictGrb.dll，其实是一个COM组件，并且实现了一个取词的插件框架。
其中的有以下内容：
1 接口
1.1 GrabProxy 取词代理对象
Function AdviseGrab(XDictGrabSink As IXDictGra ......
