Anmelden

Archiv verlassen und diese Seite im Standarddesign anzeigen : Informatik Klausur


Amokles
2003-04-04, 13:54:19
Hab heute informatik klausur geschrieben.

Es ging um VBA(Visual Basic)

WAr so pippi einfach. hab alles richtig.

Hurra

Dr.Doom
2003-04-04, 14:26:34
Ich habe heute die "Programmierkurs 1"-Klausur geschrieben. Ich werde aber wohl nur eine 1 und keine 1+ bekommen ;) :

Ich wusste nicht, wie man mit CSS Text innerhalb eines <strong>-Tags, der sich seinerseits in einem <em>-Tag befindet, kursiv schreibt.

Aber das restliche Java-, Corba-, XML- und DOM-Gelumpe war einfach.

Becks
2003-04-04, 15:12:59
Originally posted by Dr.Doom
Ich habe heute die "Programmierkurs 1"-Klausur geschrieben. Ich werde aber wohl nur eine 1 und keine 1+ bekommen ;) :

Ich wusste nicht, wie man mit CSS Text innerhalb eines <strong>-Tags, der sich seinerseits in einem <em>-Tag befindet, kursiv schreibt.

Aber das restliche Java-, Corba-, XML- und DOM-Gelumpe war einfach.

weiss nicht ob ich da "ganz so" mithalten kann aber ich hatte vor einer woche einen AINF-test!
C++ / zwei programme schreiben:lol:
(das eine Mantelflächen-Programm und ein Programm das den durchscnittlichen Bezin verbrauch eines autos berechnet:O )

schwer nich???;D

Amokles
2003-04-04, 17:10:59
Hier hab cih gestern zur Übung gemacht.

WEr nciht weis wie es geht, In Excel [F11] drücken und einfügen bei
"Arbeitsmappe 1"

Dann zurück in Excel und Auf den Button drücken.

(Makros aktivieren)
_________________________
_________________________


Private Sub Zufallszahl_click()
Dim Zahl As Byte
Dim eingabe As Byte
Dim zähler As Byte
Zahl = Int((20 * Rnd) + 1)
zähler = 1
1: eingabe = InputBox("Gieb eine Zahl zwischen 1 und 20 ein!")
If eingabe > Zahl Then
MsgBox "Leider Falsch. Meine Zahl ist kleiner!"
zähler = zähler + 1
GoTo 1
ElseIf eingabe < Zahl Then
MsgBox "Leider Falsch. Meine Zahl ist größer!"
zähler = zähler + 1
GoTo 1



ElseIf eingabe = Zahl Then
MsgBox "Super, du hast die Zahl erraten. Die zuratene Zahl war die " & Zahl & " Du hast " & zähler & " versuche gebraucht"
End If




End Sub