指定の文字数になるまで末尾を文字で埋めるには System.String クラスの PadRight メソッドを使用します。 第 2 引数を省略すると、半角スペースで埋まるようになります。それ以外の特定の文字で埋める場合は、第 2 引数にその文字を指定してください。 VB.NET 全般 ' 処理対象となる文字列変数を宣言する Dim stTarget As String = "1234" ' 6 文字になるまで末尾を半角スペースで埋める MessageBox.Show("[" & stTarget.PadRight(6) & "]") ' 8 文字になるまで末尾を "0" で埋める MessageBox.Show("[" & stTarget.PadRight(8, "0"c) & "]")