Mega Code Archive
Boolean value to Integer
<![CDATA[
Imports System
Imports System.Text
Imports System.Text.RegularExpressions
Public Class MainClass
Shared Sub Main( )
Dim blnTrue As Boolean = True
Dim blnOne As Boolean = 1
Dim blnNegOne As Boolean = -1
Dim blnFalse As Boolean = False
If blnOne = -1 Then
Console.WriteLine(blnTrue)
Console.WriteLine(blnOne.ToString)
Console.WriteLine(Convert.ToString(Convert.ToInt32(blnNegOne)))
End If
End Sub 'Main
End Class
]]>