■  文字列パディング

これは関数じゃなくメソッドです。


    Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles _
                                                                             TextBox1.LostFocus
        Dim strPAD As Char
        strPAD = "0"c                                          '充填文字列
        Me.TextBox1.Text = Me.TextBox1.Text.PadLeft(5, strPAD) '５桁で表示
        Me.TextBox1.TextAlign = HorizontalAlignment.Right      '右詰表示
    End Sub

※この例は、数字入力を前提として、入力された内容に先行ゼロをつけて５桁で右詰め表示する例です。 文字列ＶＢ６では、受け取りバッファのクリアーをString(100, Chr(0))などとしていましたが、そうはいきません。

BEFORE PAGE

TOP PAGE