Concloo LotusScript Essentials Beispiele
Beispiele: CNCL_HextoBin
Wandelt den übergebenen String einer Hexdezimalzahl in die entsprechende Binärzahl um und gibt diese als String zurück.
Dim hexdezimal As String
Dim i As Integer
hexdezimal = ""
For i = 1 To 5
hexdezimal = hexdezimal + CStr(i)
Print hexdezimal + " => " + CNCL_HextoBin(hexdezimal)
Next
Ausgabe:
1 => 0001
12 => 00010010
123 => 000100100011
1234 => 0001001000110100
12345 => 00010010001101000101