vb标准（一）：用户界面的设计
·界面设计必须保持一致
·两个程序之间的特性具备共性
·和windows应用程序的快捷键是一致的
·编程原则
·为窗体赋予统一的外观和行为特性
·如果窗体的大小改变时，它不改变其内容的大小，那么边框就不应该缩放
·fixed dialog 带有固定边框的窗体可以（并应该）拥有一个标题栏，并且可以有一个控件菜单框
·none 没有边框和标题栏（使用的情况极少）
·fixed single 可以最小化和最大化
·sizable 用于缩放窗体中的内容（这个窗体使用的时候要特别注意最大化时候的很大的灰色区域问题）
·固定工具窗口和可缩放工具窗口（不会经常使用）标题栏和标题栏的文本比普通的窗口更细
·使控件具备标准外观
·使文本框和其他“单行控件”的高度与标准组合框相同
·选定一个组合框，然后扩大选择范围以便包括所有文本框
·不要向用户隐藏按钮，而应该取消其激活状态，表示这时这些按钮不能使用
·在规定的情况下使用最佳界面组件
·提供便于理解和使用的菜单
·尽可能使用系统颜色
相关文档：
Option Explicit
Private Type BROWSEINFO
hOwner As Long
pidlRoot As Long
pDisplayName As String
lpTitle As String
ulFlags As Long
lpfn As Long
lParam As Long
iImage As Long
End Type
Private Declare Function SHGetPathfromIDList Lib "shell32.dll" Alias _
"SHGetPa ......
最近刚学会在VB2008 中使用参数化SQL语句，于是马上用到代码中，却碰到查不到任何数据的情况，纠结了好几天，还是没有搞明白，差点吐血。不得已还是先在代码中使用字符串拼接的SQL语句。
包含参数化SQL语句的代码如下：
Dim cmSl As N ......
将长路径转为短路径
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Private Function ShortPath(ByVal FileName As String) As String
Dim S As String
On Error GoTo exitFu ......
App 对象是VB应用程序的全局信息，如应用程序的标题、版本信息、可执行文件和帮助文件的路径及名称以及是否运行前一个应用程序的示例。
属性
－－－－－－－ 其他属性－－－－－－－－－－－－－－－－－
EXEName 属性 返回当前正运行的可执行文件 ......
