【VB.NET】数値を指定した書式に変換するには？

訪問して頂きありがとうございます。まさふくろーです。

この記事では、数値を指定した書式に変換する方法をご紹介します。

数値を指定した書式に変換する
サンプルプログラム
関連記事

数値を指定した書式に変換する

数値を指定した書式に変換するには、ToStringメソッドを使います。
書式は、以下になります。

数値.ToString(書式指定子)

解説

ToStringメソッドの戻り値は、書式設定済みの文字列です。

ToStringメソッドの引数には、カスタム書式指定子または標準書式指定子を指定します。

主な書式指定子は以下になります。

主なカスタム書式指定子
書式指定子	内容
0	0で埋める
#	桁があれば表示
.	少数点の位置
,	桁区切り
%	数値に100が乗算され末尾に%が付く

主な標準書式指定子
書式指定子	内容
C	通貨
P	パーセンテージ

サンプルプログラム

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

        Dim InputNum As Double

        InputNum = TextBox1.Text

        Label1.Text = InputNum.ToString("##,#")

        Label2.Text = InputNum.ToString("##.#")

        Label3.Text = InputNum.ToString("00.0000")

        Label4.Text = InputNum.ToString("00.00%")

        Label5.Text = InputNum.ToString("C")

        Label6.Text = InputNum.ToString("P")

    End Sub
End Class

Public Class Form1

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

Dim InputNum As Double

InputNum = TextBox1.Text

Label1.Text = InputNum.ToString("##,#")

Label2.Text = InputNum.ToString("##.#")

Label3.Text = InputNum.ToString("00.0000")

Label4.Text = InputNum.ToString("00.00%")

Label5.Text = InputNum.ToString("C")

Label6.Text = InputNum.ToString("P")

End Sub

End Class

2	「実行」ボタンがクリックされた場合に、以下処理を行う。
6	テキストボックスに入力した値を、数値型の変数「InputNum」に代入。
8～18	変数「InputNum」の値を、指定した書式に変換しラベルに表示する。