VB.NET CDec()用法及代碼示例

CDec() 函數用於將不同數據類型的值轉換為十進製類型。

用法:

CDec(val)

參數：

• val: 可能是不同數據類型的變量。

返回值：

CDec() 函數將返回一個轉換後的十進製數。

程序/源代碼：

下麵給出了演示 CDec() 函數的源代碼。給定的程序已成功編譯並執行。

'VB.Net program to demonstrate the CDec() function.

Module Module1

    Sub Main()
        Dim num As Decimal = 0

        Dim n1 As Single = 10.25
        Dim n2 As Integer = 12
        Dim n3 As Double = 25.35
        Dim n4 As String = "122"

        num = CDec(n1)
        Console.WriteLine("Decimal Number:{0}", num)

        num = CDec(n2)
        Console.WriteLine("Decimal Number:{0}", num)

        num = CDec(n3)
        Console.WriteLine("Decimal Number:{0}", num)

        num = CDec(n4)
        Console.WriteLine("Decimal Number:{0}", num)
    End Sub
    
End Module

輸出：

Decimal Number:10.25
Decimal Number:12
Decimal Number:25.35
Decimal Number:122
Press any key to continue . . .

說明：

在上麵的程序中，我們創建了一個包含 Main() 方法的模塊 Module1。在 Main() 方法中，我們創建了五個變量 num、n1、n2、n3 和 n4，它們被初始化為 0、10.25、12、25.35 和 "122"。

num = CDec(n1)
Console.WriteLine("Decimal Number:{0}", num)

num = CDec(n2)
Console.WriteLine("Decimal Number:{0}", num)

num = CDec(n3)
Console.WriteLine("Decimal Number:{0}", num)

num = CDec(n4)
Console.WriteLine("Decimal Number:{0}", num)

在上麵的代碼中，我們將指定變量的值轉換為十進製數並打印在控製台屏幕上。

---