fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

UNION Beispiel

Uploader:	MOD
Datum/Zeit:	27.12.2011 17:41:24

Union gesamt

    As Integer a

    As Short b(2)

    As Byte c(4)

End Union



Dim As gesamt test



test.a = 4565465445



Print "INTEGER:"

Print test.a

Print

Print "-----------------------------"

Print "SHORT:"

Print test.b(0)

Print test.b(1)

Print

Print "-----------------------------"

Print "BYTE:"

Print test.c(0)

Print test.c(1)

Print test.c(2)

Print test.c(3)

Print

Print "-----------------------------"

Sleep

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.