VB coding
1.用VB6判断文件存在妙法
在编程时经常会用到判断文件是否存在，比如对文件做读写操作前，或是判断密钥文件是否存在等。判断的方法有很多，有些方法虽很实用，但有点繁琐。其实还可以有更简单的方法，就是使用VB 6.0提供的FileSystemObject对象。
FileSystemObject对象不是VB内置对象，使用前必须首先选择[工程]→[引用]，在出现的窗口中选择“Microsoft Scripting Runtime”，然后利用FileSystemObject的FileExists方法来判断文件是否存在。示例程序代码如下：
Private Sub Command1_Click()
′引用FileSystemObject对象
Dim fs As New FileSystemObject
′利用FileSystemObject对象的FileExists
′方法判断文件是否存在
If fs.FileExists(″c:\＊.gif″) Then
MsgBox ″文件存在″
Else
MsgBox ″文件不存在″
End If
End Sub
灵活运用FileSystemObject对象可以解决与文件操作有关的大部分问题。
以上程序在PWin 98,VB 6.0中文企业版中运行通过。
2. Checkbox选择
chkBlacklist = vbUnchecked
chkBlacklist.Style
If StrComp(curVisitor.IsBlacklist, "1") = 0 Then
chkBlacklist = vbChecked
End If
相关文档：
调用方法很简单，在Form中如下书写代码：
Private Sub Form_Load()
SetHotkey 1, "Ctrl,112", "Add" '按 Ctrl+F1 激活指定程序，F1的Ascii码为112
SetHotkey 2, 113, "Add" '按 F2 激活指定程序，F2的Ascii码为113
SetHotkey 3, "Ctrl+Alt,113", "Add" '按 Ctrl+Alt+F2 激活指定程序，F2的Ascii码为113
End Sub
Priva ......
植物大战僵尸这个小游戏做的还真不错，我看到了几个版本的植物大战僵尸修改器，如C++版，C#版，所以就改写了一个VB版本的，以下是源码
'界面中有两个按钮，分别是cmdSunUnlimited（caption为启用阳光无限），cmdMoneyUnlimited（caption为启用金钱无限），并且需要放两个Timer控件，名称为默认值timer1和timer2
'基地址直 ......
vb制作可输出函数的通用DLL---VB_DLL_Link用法
论坛越来越多人关注dll，特分享一下vb制作可输出函数的通用DLL---VB_DLL_Link用法
大家知道，VB6只能制作ActiveX DLL文件，制作能输出函数的通用DLL文件通常要用到VC等工具。实际上，VB在编译的时候加以控制，经过适当处理也是可以制作通用DLL的。使用VB_DLL_ ......
VC实现类似VB中的LinkLabel功能
//VB里面有个LinkLabel，VB中的Label在VC中式CStatic，但是VC中CStatic没有类似LinkLabel的功能。可以自己
//添加一点代码来实现：
//不知道为什么IDC_HANDD一定要自己定义一下
#define IDC_HAND MAKEINTRESOURCE(32649)
//处理鼠标移动
void CAppNonameDlg::OnMouseMov ......
vb 中 ieframe.dll/1 不存在 错误的问题解决 - [Windows Client]
2008-05-27
版权声明：转载时请以超链接形式标明文章原始出处和作者信息及本声明
http://twticpgk.blogbus.com/logs/21746766.html
今天一个用户的VB用不了。打开工程文件的时候出现错误：“vb 中 ieframe.dll/1 不存在",解决方法如下：
这个是� ......
