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
相关文档：
由底至上是：
• 托管资源
• WMI 基础结构
• 使用者
托管资源
托管资源是任意逻辑或物理组件，通过使用 WMI 进行公开和管理。可以使用 WMI 管理� ......
植物大战僵尸这个小游戏做的还真不错，我看到了几个版本的植物大战僵尸修改器，如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_ ......
一、NT服务程序
所谓NT服务，实际上就是一个可以在系统启动时自动在一定身份下启动的伴随系统长时间存在的进程。象FTP server、HTTP server、脱机打印等都是采用NT服务的形式提供的。这实际上类似Unix的root daemon进程。NT服务归纳起来，NT服务又以下几个特征：
1、可� ......
'大小写字母转换器vb
'界面包括 command、command1、command2、command3 和一个 text 文本框
'command 为“互转”按钮，command1 为“转大”按钮，command2 为“转小”按钮，command3 为“清除”按钮
Private Sub Command_Click()
Dim i As Integer, n As Integer
Dim x As S ......
