[VisualBasic] Bilder laden und Zusammenfassung in eine Funktion

Dieses Thema im Forum "Programmierung & Entwicklung" wurde erstellt von Tilux, 3. August 2007 .

  1. 3. August 2007
    Bilder laden und Zusammenfassung in eine Funktion

    Code:
     Private Sub Timer1_tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
     'Timer zählt nach jedem Interval die Score'
     Select Case (spieler)
     Case 1
     compwahl = computerki(compwahl)
     If (spielerwahl(0) = compwahl) Or (spielerwahl(0) <> compwahl) Then
     'Unentschieden,Keine Zählung'
     End If
    
     If (spielerwahl(0) = 1 And compwahl = 2) Or (spielerwahl(0) = 2 And compwahl = 3) Or (spielerwahl(0) = 3 And compwahl = 1) Then 'Diese Schleife überprüft ob Spieler1 gewinnt'
     gewinner(0) = gewinner(0) + 1 'Zählung der gewonnenen Spiele für Spieler1'
     comploser = comploser + 1 'Zählung der verlorenen Spiele für Computerspieler'
     End If
     If (spielerwahl(0) = 1 And compwahl = 3) Or (spielerwahl(0) = 2 And compwahl = 1) Or (spielerwahl(0) = 3 And compwahl = 2) Then 'Diese Schleife überprüft ob Computer gewinnt'
     compwinner = compwinner + 1 'Zählung der gewonnenen Spiele für Computer'
     verlierer(0) = verlierer(0) + 1 'Zählung der verlorenen Spiele für Spieler1'
     End If
     Label7.Text = (gewinner(0)) 'später entfernen'
     Label8.Text = (compwinner) 'später entfernen'
    
     Case 2
    
     If (spielerwahl(0) = spielerwahl(1)) Or (spielerwahl(0) <> spielerwahl(1)) Then
     'Unentschieden,Keine Zählung'
     End If
    
     If (spielerwahl(0) = 1 And spielerwahl(1) = 2) Or (spielerwahl(0) = 2 And spielerwahl(1) = 3) Or (spielerwahl(0) = 3 And spielerwahl(1) = 1) Then 'Diese Schleife überprüft ob Spieler1 gewinnt'
     gewinner(0) = gewinner(0) + 1 'Zählung der gewonnenen Spiele für Spieler1'
     verlierer(1) = verlierer(1) + 1 'Zählung der verlorenen Spiele für Spieler2'
     End If
     If (spielerwahl(0) = 1 And spielerwahl(1) = 3) Or (spielerwahl(0) = 2 And spielerwahl(1) = 1) Or (spielerwahl(0) = 3 And spielerwahl(1) = 2) Then 'Diese Schleife überprüft ob Spieler2 gewinnt'
     gewinner(1) = gewinner(1) + 1 'Zählung der gewonnenen Spiele für Spieler2'
     verlierer(0) = verlierer(0) + 1 'Zählung der verlorenen Spiele für Spieler1'
     End If
    Kann ich diesen Code als eine Funktion schreiben? Wenn, ja bitte mit Hilfestellung.

    Und ich möchte dass nach einer Aktion ein Bild (jpg) in eine PictureBox geladen wird. Zum Beispiel nach einem Buttonklick. Hab gegoogelt, aber irgendwie sind alle Methoden anders. Wäre nett wenn hier jmd eine ganz simple schreiben könnte.
     
  2. 3. August 2007
    AW: Bilder laden und Zusammenfassung in eine Funktion

    Ähm, was hat ein Timer der anscheinend zu einem Spiel gehört, mit einem Bild, das angezeigt wird, zu tun?
    Und klar ist jede Methode anders, da ein Timer_Tick ja rein gar nichts mit einem Button_Click zu tun hat.
     
  3. Video Script

    Videos zum Themenbereich

    * gefundene Videos auf YouTube, anhand der Überschrift.