Wir verwenden Cookies auf dieser Website.

Cookies sind kleine Textdateien, die von Websites auf Ihrem Computer gespeichert werden. Cookies sind weit verbreitet und helfen Seiten optimiert darzustellen und zu verbessern. Durch die Nutzung unserer Seiten erklären Sie sich damit einverstanden. mehr ...
OK

Concloo LotusScript Essentials Beispiele

Beispiele: CNCL_ByteAND

Erzeugt eine logische "und"-Verknüpfung der korrespondiernden Elementen der beiden Arrays.

 
Dim A(0 To 2) As Byte
Dim B(0 To 1) As Byte
Dim C As Variant

A(0) = &b00011011
A(1) = &b01110111
A(2) = &b11001111

B(0) = &b11000011
B(1) = &b10101010

C = CNCL_ByteAND(A, B)

ForAll wert In C
	Print Right(UString(8, "0") + Bin(wert), 8)
End ForAll

Ausgabe:

00000011
00100010