隐藏的实例参数传递给
Type或
Class中的非静态成员函数,
语法
This.fieldname
or
With This
.fieldname
End With
说明
例子
Type sometype
Declare Sub MyCall()
value As Integer
End Type
Dim example As sometype
''将元素测试设置为0
example.value = 0
Print example.value
example.MyCall()
''输出现在应该是10
Print example.value
End 0
Sub sometype.MyCall()
This.value = 10
End Sub
与QB差别
参考