[VB.NET]Subでメソッドに戻り値がないのサンプル

2021年9月17日

書式
Sub メソッド名(引数1,引数2,xxx)

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Sub Main()
'文字列型変数の宣言
Dim n As String = "study skill"
'関数funcAを呼び出す Sub メソッド名(引数)
funcA(n, 23)
Console.WriteLine(n)
Console.ReadKey()
End Sub
'メソッドfuncAの定義 戻り値なし
Sub funcA(ByVal str As String, ByVal age As Integer)
'文字列の連結
Dim target As String = str & " in arkgame.com " + CStr(age)
Console.WriteLine(target)
End Sub
End Module
Module Module1 Sub Main() '文字列型変数の宣言 Dim n As String = "study skill" '関数funcAを呼び出す Sub メソッド名(引数) funcA(n, 23) Console.WriteLine(n) Console.ReadKey() End Sub 'メソッドfuncAの定義 戻り値なし Sub funcA(ByVal str As String, ByVal age As Integer) '文字列の連結 Dim target As String = str & " in arkgame.com " + CStr(age) Console.WriteLine(target) End Sub End Module
Module Module1

    Sub Main()
        '文字列型変数の宣言
        Dim n As String = "study skill"

        '関数funcAを呼び出す Sub メソッド名(引数)
        funcA(n, 23)

        Console.WriteLine(n)

        Console.ReadKey()

    End Sub

    'メソッドfuncAの定義 戻り値なし
    Sub funcA(ByVal str As String, ByVal age As Integer)
        '文字列の連結
        Dim target As String = str & " in arkgame.com " + CStr(age)

        Console.WriteLine(target)
    End Sub

End Module

結果
study skill in arkgame.com 23
study skill

VB.net

Posted by arkgame