📄 constructorf.vb
字号:
'Author:' V. Sudharsan (vsudharsan@novell.com)'' (C) 2005 Novell, Inc.Imports SystemClass A Public i As Integer = 10 Sub New() End SubEnd ClassClass AB Inherits A Public i1 As Integer = MyBase.i Sub New() If i1 <> 10 Then test.result = False End If End SubEnd ClassModule Test Public result As Boolean = True Public Function Main() As Integer Dim a As AB = New AB() If result = False Then System.Console.WriteLine("Constructor not working properly") : Return 1 End If End FunctionEnd Module
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -