玄関へお回り下さい。
Convert クラスのメソッドでのデータ型変換の例 (15個）          (SNo.003)
ToBoolean 　 指定した値を等価のブール値に変換します。
ToByte     　指定した値を 8 ビット符号なし整数に変換します。
ToChar     　指定した値を Unicode 文字に変換します。
ToDateTime 　指定した値を DateTime に変換します。
ToDecimal　　指定した値を Decimal の数値に変換します。
ToDouble   　指定した値を倍精度浮動小数点数に変換します。　
ToInt16　　　指定した値を 16 ビット符号付整数に変換します。
ToInt32　　　指定した値を 32 ビット符号付き整数に変換します　
ToInt64　　　指定した値を 64 ビット符号付整数に変換します。
ToSByte　　　指定した値を 8 ビット符号付き整数に変換します。
ToSingle　 　指定した値を単精度浮動小数点数に変換します。　
ToString   　現在の Object を表す String を返します　
ToUInt16　　 指定した値を 16 ビット符号なし整数に変換します。　　　　　　
ToUInt32　　 指定した値を 32 ビット符号なし整数に変換します。　
ToUInt64　　 指定した値を 64 ビット符号なし整数に変換します。
使用コントロール Button1 〜 Button15 
その他条件 WindowsXP(Vista)　Visual Basic 2005(VB2008)
[System 名前空間]　
★　Convert.ToBoolean メソッド

Private Sub Button1_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button1.Click
'Convert.ToBoolean メソッド
    '指定した値を等価のブール値に変換します。
    Debug.WriteLine(System.Convert.ToBoolean(5 = 5))    '結果  True
    Debug.WriteLine(System.Convert.ToBoolean(0))        '結果  False
End Sub
　
★　Convert.ToByte メソッド
　
Private Sub Button2_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button2.Click
'Convert.ToByte メソッド
    '指定した値を 8 ビット符号なし整数に変換します。
    Debug.WriteLine(System.Convert.ToByte(125.5678))   '結果  126
End Sub
　
★　Convert.ToChar メソッド
　
Private Sub Button3_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button3.Click
'Convert.ToChar メソッド
    '指定した値を Unicode 文字に変換します。
    Debug.WriteLine(System.Convert.ToChar("B"))    '結果  B

    'CChar 関数は CChar("BCD") のように指定しても問題ないが 
    'Debug.WriteLine(System.Convert.ToChar("BCD"))    '結果 エラーとなります
End Sub
　
★　Convert.ToDateTime メソッド
　
Private Sub Button4_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button4.Click
'Convert.ToDateTime メソッド
    '指定した値を DateTime に変換します。
    Debug.WriteLine(System.Convert.ToDateTime("February 02,2004"))  '結果  2004/02/02 0:00:00
End Sub
　
★　Convert.ToDecimal メソッド
　
Private Sub Button5_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button5.Click
'Convert.ToDecimal メソッド
    '指定した値を Decimal の数値に変換します。
    Debug.WriteLine(System.Convert.ToDecimal(&HF))      '結果  15
End Sub

　
★　Convert.ToDouble メソッド
　
Private Sub Button6_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button6.Click
'Convert.ToDouble メソッド
    '指定した値を倍精度浮動小数点数に変換します。
    Debug.WriteLine(System.Convert.ToDouble(234.456784D * 8.2D * 0.01D)) '結果 19.225456288
End Sub
★　Convert.ToInt16 メソッド

Private Sub Button7_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button7.Click
'Convert.ToInt16 メソッド
    '指定した値を 16 ビット符号付き整数に変換します。
    Debug.WriteLine(System.Convert.ToInt16(-1234.5))    '結果  -1234
    Debug.WriteLine(System.Convert.ToInt16(1235.5))     '結果  1236
End Sub
★　Convert.ToInt32 メソッド
　
Private Sub Button8_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button8.Click
'Convert.ToInt32 メソッド
    '指定した値を 32 ビット符号付き整数に変換します。
    Debug.WriteLine(System.Convert.ToInt32(-1234.5))        '結果  -1234
    Debug.WriteLine(System.Convert.ToInt32(1235.5))         '結果  1236
    Debug.WriteLine(System.Convert.ToInt32("-001235"))      '結果  -1235
    Debug.WriteLine(System.Convert.ToInt32("001" + "1235")) '結果  11235
End Sub
　
★　Convert.ToInt64 メソッド 　

Private Sub Button9_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button9.Click
'Convert.ToInt64 メソッド
    '指定した値を 64 ビット符号付き整数に変換します。
    Debug.WriteLine(System.Convert.ToInt64(-1234.5))    '結果  -1234
    Debug.WriteLine(System.Convert.ToInt64(1235.5))     '結果  1236
End Sub
★　Convert.ToSByte メソッド

Private Sub Button10_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button10.Click
'Convert.ToSByte メソッド
    '指定した値を 8 ビット符号付き整数に変換します。
    Debug.WriteLine(System.Convert.ToSByte(-125.5678))      '結果 -126
    Debug.WriteLine(System.Convert.ToSByte(125.5678))       '結果  126
End Sub
★　Convert.ToSingle メソッド

Private Sub Button11_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button11.Click
'Convert.ToSingle メソッド
    '指定した値を単精度浮動小数点数に変換します。
    Debug.WriteLine(System.Convert.ToSingle(12345.67))      '結果  12345.67
    Debug.WriteLine(System.Convert.ToSingle("-0012345.67")) '結果  -12345.67
End Sub
　
★　Object.ToString メソッド

Private Sub Button12_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button12.Click
'Object.ToString メソッド
    '現在の Object を表す String を返します。
    Debug.WriteLine(System.Convert.ToString("00" & 123))    '結果  00123
End Sub
★　Convert.ToUInt16 メソッド　　

Private Sub Button13_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button13.Click
'Convert.ToUInt16 メソッド
    '指定した値を 16 ビット符号なし整数に変換します。
    Debug.WriteLine(System.Convert.ToUInt16(1234.5))    '結果  1234
End Sub
★　Convert.ToUInt32 メソッド

Private Sub Button14_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button14.Click
'Convert.ToUInt32 メソッド
    '指定した値を 32 ビット符号なし整数に変換します。
    Debug.WriteLine(System.Convert.ToUInt32(1234.5))    '結果  1234
    Debug.WriteLine(System.Convert.ToUInt32(1235.5))    '結果  1236
    Debug.WriteLine(System.Convert.ToUInt32("001235"))  '結果  1235
End Sub
★　Convert.ToUInt64 メソッド

Private Sub Button15_Click(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles Button15.Click
'Convert.ToUInt64 メソッド
    '指定した値を 64 ビット符号なし整数に変換します。
    Debug.WriteLine(System.Convert.ToUInt64(1234.5))    '結果  1234
    Debug.WriteLine(System.Convert.ToUInt64(1235.5))    '結果  1236
End Sub




2004/06/03
2005/08/29


VBレスキュー(花ちゃん)
VB.NET2003　　VB2005