vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Lottoscheinüberprüfer 
Autor: Sebi90
Datum: 04.02.09 19:34

Dim txt As String = ""
        Dim richtige1 As Int32
        ' 1 Reihe
        For i = 1 To 6
            Me.Controls("Textbox" & i.ToString).BackColor = SystemColors.Window
        Next
        For i As Int32 = 1 To 6
            txt = Me.Controls("gezogen" & i.ToString).Text
            For j As Int32 = 1 To 6
                If Me.Controls("Textbox" & j.ToString).Text = txt Then
                    Me.Controls("Textbox" & j.ToString).BackColor = _
                      Color.GreenYellow
                    richtige1 += 1
                End If
            Next
        Next
        Ergebnis1.Text = (richtige1 & "")
        ' 2 Reihe
        Dim richtige2 As Int32
        For i = 7 To 12
            Me.Controls("Textbox" & i.ToString).BackColor = SystemColors.Window
        Next
        For i As Int32 = 1 To 6
            txt = Me.Controls("gezogen" & i.ToString).Text
            For j As Int32 = 7 To 12
                If Me.Controls("Textbox" & j.ToString).Text = txt Then
                    Me.Controls("Textbox" & j.ToString).BackColor = _
                      Color.GreenYellow
                    richtige2 += 1
                End If
            Next
        Next
        Ergebnis2.Text = (richtige2 & "")
0
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Lottoscheinüberprüfer900Seeme28.01.09 20:43
Re: Lottoscheinüberprüfer633GPM28.01.09 22:57
Re: Lottoscheinüberprüfer655Seeme29.01.09 13:07
Re: Lottoscheinüberprüfer603GPM29.01.09 15:45
Re: Lottoscheinüberprüfer556Sebi9004.02.09 19:34
Re: Lottoscheinüberprüfer532Seeme29.01.09 18:11
Re: Lottoscheinüberprüfer516GPM29.01.09 18:33

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows 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.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel