VB中怎么声明变量?

VB声明有显示声明和隐式声明

所谓显示声明,是指在使用某一变量之前,先对该变量进行类型定义的声明.

在VB中,可以使用Dim Redim static public等关键字来显示声明变量.

一般用到的就是Dim 声明....

public 用于全局声明

Dim语句的格式如下:

dim 变量名[As 类型]

在模快的通用部分如果没有Option Explicit,则可以采用隐式声明.

隐式声明的方法是在变量首次赋值时，在变量名的尾部加一个规定的符号．常用的变量类型声明

符如下：整型％　长整型＆　单精度型！双精度型＃　字付串型＄

货币型＠

给您一段代码，供参考，如有问题，QQ：375267128，传给您一个完整的实例，使用时请引用一下Microsoft Word 11.0 Object Library

Function ZWord1(模板名, 文件名, 记录集, 起始行, 表号, Optional 条件 As String)

Dim doc As New Word.Document ' 定义引用 Microsoft Word 的变量。

Dim BTable As Word.Table

Dim dbs As Database '定义引用数据库的变量。

Dim rst As DAO.Recordset '定义引用记录集的变量。

Dim I, J, P As Integer

Dim s As String

'On Error GoTo err1

'使用DAO *** 作打开明细记录集

Set dbs = CurrentDb()

If Nz(条件) <>"" Then 记录集 = "select * from " &记录集 &" where " &条件

Set rst = dbs.OpenRecordset(记录集) '设置记录集

If InStr(1, UCase(模板名), ".DOC") >0 Then

WJ1 = CurrentProject.Path &"\" &模板名

'模板文件名(CurrentProject.Path为当前数据库的路径）

Else

WJ1 = CurrentProject.Path &"\" &模板名 &".DOC"

'模板文件名(CurrentProject.Path为当前数据库的路径)

End If

If InStr(1, UCase(文件名), ".DOC") >0 Then

WJ2 = CurrentProject.Path &"\" &文件名 '目标文件名

Else

WJ2 = CurrentProject.Path &"\" &文件名 &".DOC" '目标文件名

End If

FileCopy WJ1, WJ2 '拷贝文件（模板文件拷贝成目标文件）

Set doc = GetObject(WJ2, "Word.Document") '建立与Word的连接变量

doc.Application.Visible = True '打开属性为真

doc.Activate

Set BTable = doc.Application.ActiveDocument.Tables(表号)

Set rst = dbs.OpenRecordset(记录集) '设置记录集

If Not rst.EOF Then rst.MoveFirst

I = 起始行

While Not rst.EOF

Set rowNew = BTable.Rows.Add() '加入一行

J = 0

For Each HCell In BTable.Rows(I).Cells

HCell.Range.InsertAfter Nz(rst.Fields(J))

J = J + 1

Next HCell

rst.MoveNext

I = I + 1

Wend

doc.Save '保存Word

doc.Application.Quit '关闭Word

Set doc = Nothing'清除内存变量

Set BTable = Nothing

Set dbs = Nothing

Set rst = Nothing

ZWord1 = True

Exit Function

err1:

doc.Application.Quit

Set doc = Nothing '清除内存变量

Set BTable = Nothing

Set dbs = Nothing

Set rst = Nothing

ZWord1 = False

MsgBox ("出现错误，可能是Word已打开，请关闭Word后再试")

End Function

1、必须以字母开头，变量名中不能有空格。

2、不可以包含嵌入的句号或者类型声明字符。

3、不能和受到限制的关键字同名（例如End、Len、Sub等）。

4、不能超过255个字符，控件、窗体、类和模块的名字不能超过40个字符。

注意：sual Basic 不区分变量名和其他名字中字母的大小写，但习惯上，符号常量一般用大写字母定义。

扩展资料：

vb中变量的类别介绍：

1、局部变量：

顾名思义，就是只能在局部范围内被程序代码识别和访问的变量。这类变量就是在过程（或函数）里，用Dim关键字进行声明的变量。

2、模块级变量：

（1）模块：包括窗体模块、标准模块。

（2）窗体模块：是指一个窗体代码的全部。

（3）标准模块：是指通过菜单[工程] _ [添加模块]，而添加的模块。

模块级变量是指在模块的任何过程之外，即在模块的声明部分使用Dim语句或Private语句声明的变量。为了区别于局部变量，建议使用Private进行变量的声明，这种变量可以被本模块的任何过程访问；可以在本模块的任何位置被识别、访问。

3、全局变量：

全局变量是指在模块的任何过程之外，即在模块的"通用声明"段使用Public语句声明的变量。可被本模块的任何过程访问，还可以被本工程的任何位置访问。

参考资料：百度百科-VB变量

---