Space関数 [VB 2010]

空白文字列を生成する

Space関数の例です。引数にマイナス整数は指定できません。

  "Visual" & Space(0) & "Basic"         '  VisualBasic
  "Visual" & Space(1) & "Basic"         '  Visual Basic
  "Visual" & Space(2) & "Basic"         '  Visual  Basic
  "Visual" & Space(3) & "Basic"         '  Visual   Basic
  "Visual" & Space(4) & "Basic"         '  Visual    Basic
  "Visual" & Space(5) & "Basic"         '  Visual     Basic

掛け算の九九表を表示するプログラムを作成します。2次元配列に九九すべての演算結果を保管してから、見やすくなるように、Space関数で空白を追加しながら、一気に表を表示します。

Module Module1
 
    Sub Main()
        ' 2次元配列文字列変数の宣言
        Dim kuku(8, 8) As Integer
        For i As Integer = 1 To 9
            For j As Integer = 1 To 9
                ' 各段の計算と表示
                kuku(i - 1, j - 1) = i * j
            Next
        Next
 
        ' 結果の確認
        For i As Integer = 1 To 9
            Console.WriteLine(i & Space(1) & "の段")
            For j As Integer = 1 To 9
                Console.Write(i & "x" & j & "=")
                If i * j < 10 Then
                    ' 1桁の時空白を入れて桁を揃える
                    Console.Write(Space(1))
                End If
                Console.Write(i * j)
                Console.Write(Space(2))
            Next
            Console.WriteLine()    ' 改行
        Next
    End Sub

End Module

実行結果

• VB関数一覧
• Math関数（メソッド）