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

CShort() 函數用於將不同數據類型的值轉換為短整型。

用法:

CShort(val)

參數：

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

返回值：

CShort() 函數將返回一個轉換後的短整數。

程序/源代碼：

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

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

Module Module1

    Sub Main()
        Dim num As Short = 0

        Dim n1 As Double = 10.25
        Dim n2 As Single = 12.25
        Dim n3 As Integer = 25
        Dim n4 As String = "122"

        num = CShort(n1)
        Console.WriteLine("Short integer Number:{0}", num)

        num = CShort(n2)
        Console.WriteLine("Short integer Number:{0}", num)

        num = CShort(n3)
        Console.WriteLine("Short integer Number:{0}", num)

        num = CShort(n4)
        Console.WriteLine("Short integer Number:{0}", num)
    End Sub
    
End Module

輸出：

Short integer Number:10
Short integer Number:12
Short integer Number:25
Short integer Number:122
Press any key to continue . . .

說明：

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

num = CShort(n1)
Console.WriteLine("Short integer Number:{0}", num)

num = CShort(n2)
Console.WriteLine("Short integer Number:{0}", num)

num = CShort(n3)
Console.WriteLine("Short integer Number:{0}", num)

num = CShort(n4)
Console.WriteLine("Short integer Number:{0}", num)

在上麵的代碼中，我們將指定變量的值轉換成一個短整數並打印在控製台屏幕上。

---