overloadinga.vb

来自「大名鼎鼎的mono是.NET平台的跨平台(支持linux」· VB 代码 · 共 38 行

VB
38
字号
Option Strict Off'Testing overloading in different classesClass B    Function F()    End Function    Function F(ByVal i As Integer)    End Function    Function F1()    End Function    Function F1(ByVal i As Integer)    End FunctionEnd ClassClass D    Inherits B    Overloads Function F()    End FunctionEnd ClassModule OverloadingA    Function Main() As Integer        Dim x As Object = New D()        x.F()        x.F(10)        x.F1(20)        Dim x1 As Object = New B()        x1.F(20)        x1.F1()    End FunctionEnd Module

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?