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

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

用法:

CBool(val)

參數：

• val: 它是一個給定的整數值。

返回值：

CBool() 函數將返回一個轉換後的布爾值。

程序/源代碼：

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

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

Module Module1

    Sub Main()
        Dim result As Boolean = False

        Dim n1 As Integer = 10
        Dim n2 As Integer = 0
        Dim n3 As Integer = -1
        
        result = CBool(n1)
        Console.WriteLine("Boolean value:{0}", result)

        result = CBool(n2)
        Console.WriteLine("Boolean value:{0}", result)

        result = CBool(n3)
        Console.WriteLine("Boolean value:{0}", result)
    End Sub
    
End Module

輸出：

Boolean value:True
Boolean value:False
Boolean value:True
Press any key to continue . . .

說明：

在上麵的程序中，我們創建了一個包含 Main() 方法的模塊 Module1。在 Main() 方法中，我們創建了四個變量 result，n1、n2 和 n3，它們被初始化為 False、10、0 和 -10。

result = CBool(n1)
Console.WriteLine("Boolean value:{0}", result)

result = CBool(n2)
Console.WriteLine("Boolean value:{0}", result)

result = CBool(n3)
Console.WriteLine("Boolean value:{0}", result)

在上麵的代碼中，我們將指定變量的值轉換為布爾值，這裏將非零值轉換為 True，零轉換為 False，然後將它們打印在控製台屏幕上。

---