Freitag, 16. September 2011

Visual Studio 2010 ;)

Jaja die gute alte Schulzeit, lang ist es her und dennoch kommt es einen manchmal so vor als würde die Zeit, die man damals in der Schule verbracht hat reichen fürs Leben *lach*.

Spaß beiseite, im Augenblick hab ich bei der GPB-Berlin, dass Modul Visual Basic 2010 und muss sagen das hat es mir irgendwie angetan..

Freue mich auch sehr auf Woche Zwei :P und nein ich möchte immer noch kein FIAN werden *lach*.
Programmieren macht mir zwar sehr viel Spaß, aber den ganzen Tag hätte ich auch keine Lust darauf.

Jedenfalls hier ein Beispiel Quellcode aus ner Übung die ich Zuhause mache :).

#Texteinbindung in VB

Dim Aus() As String
        Aus = System.IO.File.ReadAllLines("aus.txt")

#Eine Select Case Anwendung

 Select Case CheckAus
            Case chkAus.Checked = False
        txtAus.Text = Aus((Rnd() * UBound(Aus)) + LBound(Aus))
        If txtAus.Text = "-" Then
            txtZustandAus.Text = "-"
            txtAnz3.Text = "-"

        Else

            txtZustandAus.Text = Zustand((Rnd() * UBound(Zustand)) + LBound(Zustand))
            txtAnz3.Text = AnzahlAus((Rnd() * UBound(AnzahlAus)) + LBound(AnzahlAus))
        End If
        End select


#Auffangen von Fehlern
Try

Catch ex As InvalidCastException
            MessageBox.Show("Fehler: Bitte Tragen sie den richtigen Wert ein!" & ex.Message)

        End Try




Gruß
René

Keine Kommentare:

Kommentar veröffentlichen