Question

以下代码有什么问题吗？它在Form_Load()行失败，并抱怨它。

Private Sub Form_Load()

    Type Human
        Name As String
    End Type

    Dim stu As Student
    With Human:
        .Name = "Someone"
    End With

    Debug.Print ("Name: " & stu.Name)

End Sub

Answer 1

您有两种选择：

1

创建一个新类

Private Class Human
    Public Name As String
End Class

（显然，最好将Name包装在公共属性中，但为简单起见，将其公开为公共变量更容易。）

2

创建一个新结构：

Structure Human
    Dim Name As String
End Structure

注意
应该注意，这些选项的两个必须在函数之外完成，而不是在Form_Load函数中完成

Answer 2

关键字不再是Type;它现在是结构。 Type在VB6及更早版本中使用，但在.NET中没有使用。

不能在VB中使用Type

2 个答案:

1

2