ここでは、VB.NETで文字列や値を任意の桁数まで0埋めする方法を紹介します。

VB.NETで文字列や値を任意の桁数まで0埋めするには、PadLeft、PadRightメソッドを使用します。

＜サンプル＞

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim str As String
str = TextBox1.Text.PadLeft(10, “0”)
MsgBox(str)

End Sub
End Class

「str = TextBox1.Text.PadLeft(10, “0”)」でテキストボックスの値を10桁になるように0埋めした値を変数に格納しています。次に「MsgBox(str)」で変換した文字列をメッセージボックスで表示しています。

PadLeft、PadRightはデフォルトでは、スペースを埋めてくれます。そのためスペースで埋めたい場合には、「str = TextBox1.Text.PadLeft(10)」と書きます。他にも指定した「str = TextBox1.Text.PadLeft(10, “-“)」のように任意の文字で埋めることが出来ます。