编译VBA代码时何时处理Dim语句？

问题描述

| 在VBA代码的编译中何时处理Dim语句？如果这样做，会提高效率吗？：

Dim oFileDiag As FileDialog

Set oFileDiag = Application.FileDialog(msoFileDialogFilePicker)                
If oFileDiag.Show = -1 Then

    \'// Dim statement further down in the code...
    Dim ofdSelected As FileDialogSelectedItems
    Set ofdSelected = .SelectedItems

End If

相对于此？：

\'// Dim statement at the beginning of the code...
Dim oFileDiag As FileDialog
Dim ofdSelected As FileDialogSelectedItems

Set oFileDiag = Application.FileDialog(msoFileDialogFilePicker)                
If oFileDiag.Show = -1 Then

    Set ofdSelected = .SelectedItems

End If

    

解决方法

据我了解（以前我做错了），VB（A）的效率没有提高。在例程中的任何地方声明任何变量都将使用相同的资源（尽管直到声明以下，变量才可用）。 对象变量（

Dim

）的声明仅创建引用，直到it3ѭ才实例化该对象。但是，请注意这种构造中的相反问题：

Dim rsFoo As New ADODB.Recordset

\'other statements

With rsFoo
    .LockType = adBatchOptimistic
    \'other statements
End With

这似乎很方便，因为您不必做明确的

Set... = New...

。但是要注意的是，每次您在运行时使用ѭ6时，代码都必须检查它是否已实例化。这样更好：

Dim rsFoo As ADODB.Recordset

\'other statements

Set rsFoo = New ADODB.Recordset
With rsFoo
    .LockType = adBatchOptimistic
    \'other statements
End With

在某种程度上，这至少是“宗教”上的差异，至少在开销没有任何实际差异的语言中。在VB（A）中，最常见的做法是在例程的开头声明所有变量，尽管有些人认为使声明尽可能接近首次使用是“更清晰的”（而不是与我们有条件在一开始就期望他们所有人，这不是...）。     ,有根据的猜测：这没有什么区别，但是，来自C的程序设计师习惯于在代码/函数的开头声明所有变量。     ,我会稍微说一下，因为它是交互式用户界面的一部分，您永远不会注意到。 实际上，这是Scott Meyers的《 Effective C ++》一书中的一个技巧，该技巧将变量声明推迟到最后一刻，以避免不必要的构造函数开销（如果在这种情况下）（例如在这种情况下）您实际上从未根据失败的条件使用该对象。 我认为这在VB中会类似。

Dim ofdSelected As FileDialogSelectedItems

实例化一个对象还是只声明一个引用？