0

类型 raygun(currentCharge 为 int,maxDamage 为 int,minDamage 为 int)

我找不到任何示例来演示如何在初始化时将类型的属性设置为默认值。例如,在这种情况下,将 currentCharge 默认为 100 是有意义的。我知道目前不支持常量,但我想知道是否有一种我可能没有考虑过的方法来做到这一点。

4

1 回答 1

0

没有自动的方法可以做到这一点。但是,您可以创建一个 sub 来创建类型并根据需要对其进行初始化:

Dim rg As Raygun
rg = InitRaygun

Sub InitRaygun As Raygun
 Dim r As Raygun
 r.Initialize
 r.currentCharge = 100
 Return r
End Sub
于 2011-10-22T07:29:21.663 回答