VB语法规范
一。数据类型
Byte 1
字节 无符号
Interger 2
字节
Long 4
字节
Float 4
字节
Double 8
字节
String
Date
Boolean
Currency
Variant
2.
变长字符串和定长字符
系统默认初始值为空字符串;
变长字符串：dim str as Strring
定长字符串:dim str as String*30
最多64K
字符
3.
逻辑型数据
系统默认为False;
当布尔型转为整形时 True
为-1 False
为0;
其它型转化为布尔型
非0
为True 0
为False;
4.
日期型数据
文字日期包含在一对“#"
之间，如#4 Sep# #May
23.2002#
等;
在日期型数据中，不论将年、月、日如何排列，用何种分隔符，系统会自动将其转化为由数字表示的”
月/
日/
年“
5
。对象类型
默认值为nothing
，用SET
语句指定一个声明的对象变量去引用对象。
6.
变体类型
所有未定义的变量的默认类型。用VarType
（）返回的值可以确定具体数据类型。
二。常量
三种：直接常量（字面值），自定义符号常量，系统常量
（1
）自定义符号常量
Const
符号常量名［As <
类型>
］=<
表达式>
要使常量在整个应用程序中有效，在标准模块中地声明段中进行声明，并且在Const
之前加Public
。对于窗体模块或类模块，则不能加
Public.
三。变量
1.
命名约定
以字母开始，后跟数字、字段和下划线
同一作用域中变量名不能重复
变量名不区分大小定。
2.
声名变量
隐式声明：就是在使用一个变量这前不专门声明而直接使用，变量类型默认为变体类型。
显示声明：为每个变量必须事先声明才能使用。可以指定类型也可不指定，若不指定也是变体类型。
3.
变量作用域
普通局部变量（过程变量）:
只能在声明的过程中使用，过程执行分配空间，过程完成后释放空间
Dim
变量名［As
数据类型名］
静态局部变量（过程变量）：只能在声明的过程中使用，应用程序启动时分配空间，应用程序结束时释放空间
Static
变量名 [As
数据类型名]
模块变量：该模块中的所有过程都可以访问的变量，其它模块的过程不能访问此模块变量，应用程序启动时分配空间，应用程序结束时释放 空间
Private dim
变量名 [As
数据�
相关文档：
VB的代码存储在模块中。在VB中提供了三种类型的模块：窗体模块、标准模块和类模块。
简单的应用程序可以只有一个窗体，所用的程序都驻留在窗体模块中，而当应用程序庞大复杂时，就要另外附加窗体。最终可能有几个窗体中有一些共同都要执行的代码，为了在两个窗体中不产生重复代码，可创建一个独立的模块，用它实现代� ......
建立 VPN 拨号全部代码如下:
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Type GUID
Data1 As Long
Data2 As Integer
Data3 As Integer
......
Imports System.Data.OleDb
Inherits System.Windows.Forms.Form
Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Application.StartupPath & "\student0.mdb") ‘------------------------- 链接数据库
......
在Asp.net中实现文件的上传功能，是非常简单的一件事情，只需要利用微软提供的FileUpload控件即可轻松实现。
LargeFileUpload.aspx代码如下
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="LargeFileUpload.aspx.vb"
Inherits="LargeFileUpload" %>
<!DOCTYPE html PUBLIC "-//W3C/ ......
http://hi.baidu.com/qwestw/blog/item/a8b41663eb7fca690d33fa46.html
能记录到中文，缺点是不能记录到Ctrl，shift，alt，capslock，home，del，pageUP，pageDown等件的按下状态。
vb6代码如下：
Private Sub Form_Load()
WM_HXWDLLWX_HOOKKEY = RegisterWindowMessage("WM_HXWDLLWX_HOOKKEY")
PrevWndProc = SetWind ......
