「VB.NET」CTypeで型をキャストするサンプル

書式
CType(変換元の値, 変換後の型)
CType(expression, typename)
任意の式を、指定されたデータ型、オブジェクト、構造体、クラス、またはインターフェイスに明示的に変換し、その結果を返します。

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Sub Main()
Dim sg As Single = 28.9
Dim res As Integer = CType(sg, Integer)
Console.WriteLine("SingleをInteger型へ変換: " + res.ToString)
Dim lt As Long = 1000
Dim res2 As Single = CType(lt, Single)
Console.WriteLine("LongをSingle型へ変換: " + res2.ToString)
Console.ReadKey()
End Sub
End Module
Module Module1 Sub Main() Dim sg As Single = 28.9 Dim res As Integer = CType(sg, Integer) Console.WriteLine("SingleをInteger型へ変換: " + res.ToString) Dim lt As Long = 1000 Dim res2 As Single = CType(lt, Single) Console.WriteLine("LongをSingle型へ変換: " + res2.ToString) Console.ReadKey() End Sub End Module
Module Module1

    Sub Main()

        Dim sg As Single = 28.9
        Dim res As Integer = CType(sg, Integer)
        Console.WriteLine("SingleをInteger型へ変換: " + res.ToString)

        Dim lt As Long = 1000
        Dim res2 As Single = CType(lt, Single)
        Console.WriteLine("LongをSingle型へ変換: " + res2.ToString)

        Console.ReadKey()

    End Sub

End Module

結果
SingleをInteger型へ変換: 29
LongをSingle型へ変換: 1000

VB.net

Posted by arkgame