Hallo Freunde,
habt ihr eine Idee wie ich nicht nur die letzten eingegebenen Werte in meine auswertungstextbox bekomme?
habt ihr eine Idee wie ich nicht nur die letzten eingegebenen Werte in meine auswertungstextbox bekomme?
VB.NET-Quellcode
- Public Class Form1
- Dim Teamss(17) As tabelle
- Dim teamscount As Integer = 0
- Public Class tabelle
- Public team As String
- Public Sieg As String
- Public drawe As String
- Public loose As String
- Public goal As String
- Public ggoal As String
- End Class
- Public Sub Main()
- For i As Integer = 0 To 17
- Teamss(i) = New tabelle
- Next
- Teamss(teamscount).team = teams.Text
- Teamss(teamscount).Sieg = siege.Text
- teamscount += 1
- eingabe.Text = teamscount
- End Sub
- Public Sub Main2()
- For i = 0 To teamscount - 1
- auswertung.Text &= "Team" & vbTab & CStr(Teamss(i).team) & vbTab & CStr(Teamss(i).Sieg) & vbNewLine
- Next
- End Sub