查看: 158  |  回复: 0
VB6 在if块中Dim和在外一样耗费内存吗?测试结果
楼主
发表于 3月18日 19:12

新建From1(窗体),新建Command1(按钮CommandButton),代码:

Option Explicit

Private Sub Command1_Click()
    Call s_1
End Sub

Private Sub s_1()
    On Error GoTo hErr
    If 1 = 2 Then
        Dim strA As String
    Else
        strA = "a"
        Debug.Print strA
    End If
    Exit Sub
hErr:
    Debug.Print Err.Number & " " & Err.Description
End Sub

运行结果:

a

如果注释掉Dim strA As String,那么程序就会出错。证明了,不管Dim在哪里,都会提前分配内存。

您需要登录后才可以回帖 登录 | 立即注册
【本版规则】请勿发表违反国家法律的内容,否则会被冻结账号和删贴。
用户名: 立即注册
密码:
2020-2024 MaNongKu.com