Public Function CBin (ByVal Nr As Long, Optional Präzisionssportarten As Integer = As String
Do Until Nr. = 0
CBin = CStr ((Modell Nr. 2)) + CBin
Nr = Nr. 2
Loop
CBin = Format (Val (CBin), String (Präzision, "0"))
End Function

Private Sub Form_Load ()
MsgBox CBin (88)
End Sub

Bookmark Es

Hide Sites

# include
struct EXEHEAD

(
char id [2]; / / 'M' & 'Z'
unsigned lastpg; / / Anzahl der Bytes auf der letzten Seite
unsigned size; / / Gesamtzahl der 512 Byte-Seiten
unsigned Reloc; / / keine Verlagerung der Tabelle Artikel
unsigned headersize; / / Header-Größe in Randnrn
unsigned minpara; / / min. reqd Randnrn. von PROG.
unsigned maxpara; / / max. reqd Randnrn. von PROG.
unsigned stackseg; / / ursprünglichen Wert des Stack-Segment.
unsigned stackoff; / / ursprünglichen Wert von SP
unsigned chksum; / / Header-Prüfsumme
unsigned IP / / IP-Zugang
unsigned CS; / / entry point CS
unsigned relocoff; / / Offset vom 1. Verlagerung Artikel
unsigned char Overlay; / / Overlay Zahl
);
int main (int argc, char * argv [])

(
FILE * fp;
struct EXEHEAD exehead;
if ((fp = fopen ( "sound.exe", "rb")) == NULL)

(
printf ( "FEHLER: Datei öffnen errorn");
return 1;
)
fread (& exehead, sizeof (exehead), 1, fp);
printf ( "EXE-Datei Signatur:% c% cn", exehead.id [0], exehead.id [1]);
printf ( "Total bytes am letzten Sektoren:% un", exehead.lastpg);
printf ( "Total Sektoren (1 Sektor = 512 Byte):% un", exehead.size);
printf ( "Anzahl der Verlagerung Tabelle Artikel:% un", exehead.reloc);
printf ( "Header-Größe in den Absätzen:% un", exehead.headersize);
printf ( "Min. Randnrn. reqd. vom Programm:% un", exehead.minpara);
printf ( "max. Randnrn. reqd. vom Programm:% un", exehead.maxpara);
printf ( "Erste Wert von SS:% un", exehead.stackseg);
printf ( "Erste Wert von SP:% un", exehead.stackoff);
printf ( "Header Prüfsumme:% un", exehead.chksum);
printf ( "Initialwert von IP:% un", exehead.IP);
printf ( "Erste Wert CS:% un", exehead.CS);
printf ( "Offset 1. Verlagerung Punkt:% un", exehead.relocoff);
printf ( "Overlay"-Nummer:% dn ", exehead.overlay);

return 0;
)

Bookmark Es

Hide Sites

# include

typedef enum (So, Mo, Di, Mi, Do, Fr, Sa) Tage;

int main ()
(
Tage Anzahl;
printf ( "Bitte geben Sie die Anzahl der Tag des week.n");
scanf ( "% d", & Zahl);
Schalter (Anzahl)
(
case 0: printf ( "Der Tag ist Sunday.n"); break;
Fall 1: printf ( "Der Tag ist Monday.n"); break;
Fall 2: printf ( "Der Tag ist Tuesday.n"); break;
Fall 3: printf ( "Der Tag ist Wednesday.n"); break;
Fall 4: printf ( "Der Tag ist thursday.n"); break;
Fall 5: printf ( "Der Tag ist Friday.n"); break;
Fall 6: printf ( "Der Tag ist saturday.n"); break;
)
return 0;
)

Bookmark Es

Hide Sites

Funktion SetBytes (Bytes) As String

On Error GoTo ErrorHandler

Wenn Bytes> = 1073741824 Dann
SetBytes = Format (Bytes / 1024 / 1024 / 1024, "# 0.00") _
& "GB"
ElseIf Bytes> = 1048576 Dann
SetBytes = Format (Bytes / 1024 / 1024, "# 0.00") & "MB"
ElseIf Bytes> = 1024 Then
SetBytes = Format (Bytes / 1024, "# 0.00") & "KB"
ElseIf Bytes <1024 Then
SetBytes = Fix (Bytes) & "Bytes"
End If

Exit Function
ErrorHandler:
SetBytes = "nicht berechnen"
End Function

Private Sub Form_Load ()
MsgBox SetBytes (1100)
End Sub

Bookmark Es

Hide Sites

# include
# include

dict char [] [2] [40] = (
"Hallo", "Bonjour",
"Jahr", "ANNEE",
"Gut", "Bon",
"Auto", "voiture"
"Haus", "maison",
"Ja", "oui",
"Freund", "AMI",
"Straße", "Rue",
"",""
);

int main (void)
(
int i = 0;
char Wort [80];

printf ( "Geben Sie ein Wort in englischer Sprache zur Suche for.n");
gets (Wort);
while (strcmp (dict [i] [0 ],""))
(
if (! strcmp (word, dict [i] [0]))
(
printf ( "Französisch gleichwertig ist:% sn", dict [i] [1]);
break;
)
i + +;
)

if (! strcmp (dict [i] [0], ""))
printf ( "Word nicht found.n");

return 0;
)

Bookmark Es

Hide Sites