module1.vb

来自「Visual Basic.net 实例入门」· VB 代码 · 共 12 行

Module Module1
    
    Sub Main()
        Dim MyAdd As [MyClass].MyMath = New [MyClass].MyMath()
        Dim MyValue As Long = MyAdd.Add(10, 20)
        Console.Write("这是应用组件一个简单的例子，10+20=" + MyValue.ToString)
        MyAdd.Extra = False

    End Sub
    
End Module