在编代码时我们经常见到@H_403_2@

Dim MyObject As New Object@H_403_2@

Dim MyObject As Object@H_403_2@

@H_403_2@

Set MyObject =New Object@H_403_2@

Set MyObject = Object@H_403_2@

究竟加这几句话有什么区别，我们平常写的代码究竟对不对哪？？@H_403_2@

@H_403_2@

@H_403_2@

Dim语句用来声明@H_403_2@变量@H_403_2@并分配存储空间。@H_403_2@

可以使用 Dim 语句在模块级或过程级中声明变量的数据类型，也可以使用Dim 语句来声明变量的对象类型，还可以使用带空圆括号的Dim 语句来定义动态数组。@H_403_2@

在Dim语句中New关键字@H_403_2@

例如：DimMyObject As New Object '@H_403_2@创建并赋值对象变量@H_403_2@@H_403_2@

@H_403_2@@H_403_2@

可以同时使用 New 关键字和 Set 语句来声明对象变量，并赋值一对象给它@H_403_2@。@H_403_2@

例如：SetMyObject = New Object ' 创建和赋值@H_403_2@ @H_403_2@

@H_403_2@

如果定义对象变量时（即Dim语句中）没有使用 New 关键字，则在使用该变量之前，必须使用Set 语句将该引用对象的变量赋值为一个已有对象。在该变量被赋值之前，所声明的对象变量有一个特定值Nothing，这个值表示该变量没有指向任一个对象实例。@H_403_2@

例如：DimMyObject As Object ‘@H_403_2@此时@H_403_2@MyObject@H_403_2@有一个特定值@H_403_2@Nothing@H_403_2@，这个值表示该 变量没有指向任一个对象实例@H_403_2@@H_403_2@

Set MyObject = Object ‘MyObject@H_403_2@赋值为一个已有对象（即@H_403_2@Object@H_403_2@）@H_403_2@@H_403_2@