DataGrindView mit Variablen befüllen

Lord C · 27. Oktober 2014, 10:01

Guten Morgen,
ich dachte das ich zu dem Projekt nichtsmehr posten muss. Was ich aber jetzt muss.
Und zwar bricht er mir immer ab, sobald ich das dgv befüllen will.
es wird aufgerufen, daher steht das dgv mit allen drum und drann in einem sub.
speichern stellt in diesem fall ein 2-Dimensionales Array dar, mit einer belieben menge daten. Aber mindestens 2 Datensätze.

VB.NET-Quellcode

Sub score_aktu()
Dim dgw_row As Integer = dgw_scorebaord.Rows.Add()
Dim dgw As New DataGridView
dgw = dgw_scorebaord
dgw.ClearSelection()
For i As Integer = 0 To CInt(Ersteinstellung.gruppenanz) - 1
dgw_row = i
dgw.Rows.Item(dgw_row).Cells(0).Value = speichern(i, 0)
dgw.Rows.Item(dgw_row).Cells(1).Value = speichern(i, 1)
Next
End Sub

Sobald er in die erste zeile kommt bricht er ab. Ich will das dgv mit den Variablen füllen. Die vor dem dgv gefüllt werden.
Ich hoffe ihr könnt mir tipps geben und/oder mein Fehler mir erklären.

LG LC

ErfinderDesRades · 27. Oktober 2014, 10:58

sieht harmlos aus, also vermute ich , dass diese Methode im Neben-Thread stattfindet?

Auf jeden Fall schonmal Vereinfachung (alles unnütze gelöscht):

VB.NET-Quellcode

Sub score_aktu()
Dim dgw = dgw_scorebaord
Dim dgw_row As Integer = dgw.Rows.Add()
dgw.ClearSelection()
For i As Integer = 0 To CInt(Ersteinstellung.gruppenanz) - 1
dgw(0, dgw_row).Value = speichern(i, 0)
dgw(1, dgw_row).Value = speichern(i, 1)
Next
End Sub

Lord C · 27. Oktober 2014, 11:02

Jop ist nur zur reinen Anzeige von einem Scorboard im dgv. Die datendafür werden in dem Array speichern abgelegt.

ErfinderDesRades · 27. Oktober 2014, 11:27

Ist das eine Antwort auf meine Frage, ob das alles im NebenThread stattfindet?

Und wenn es eine Antwort ist: Bedeutet die Antwort Ja oder Nein?

Lord C · 27. Oktober 2014, 11:34

Das ganze läuft in einem Nebenthread. Oben fehlt nur ein Komma

Ich hab mal das verkürze rein gamcht da ich dachte das ich einen Sytax fehler habe. Jetzt gibt er mir das aus:

Eine nicht behandelte Ausnahme des Typs "System.InvalidOperationException" ist in System.Windows.Forms.dll aufgetreten.

Zusätzliche Informationen: Zum DataGridView-Steuerelement können nur Zeilen hinzugefügt werden, die Spalten enthalten. Die Spalten müssen zuerst hinzugefügt werden.

Ich dachte man kann alles auch perzeile erstellen. Wie erstell ich die Spalte?

Ohn ich zeige lieber mal noch ungefähr das Array auf:

	0	1
0	a	1
1	b	2
2	c	3

usw. (fettgeschriebenes sind die Arraybelegungen normal der inhalt)
Lg

ErfinderDesRades · 27. Oktober 2014, 11:47

Lord C schrieb:

Das ganze läuft in einem Nebenthread.

Das ist der grundlegende Fehler, alles weitere nachrangig.

Lösungen sind in Controls Threadsicher machen diskutiert.

Lord C · 27. Oktober 2014, 11:51

Ups ich kann meine Projekte mal wieder nicht auseinander halten. Sry hab grad 3 auf dem tisch liegen.

Es ist im haupt thread. und wird per call aufgerufen.

Spoiler anzeigen

Quellcode

Public Class Spielfläche
Dim aw As New MsgBoxResult
Dim gruppe As Integer
Dim score As String
Dim speichern(CInt(Ersteinstellung.gruppenanz) - 1, 1) As String
Private Sub Spielfläche_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lb_spielfläche_kat1.Text = Fragenerstellung.thema_ein(0)
lb_spielfläche_kat2.Text = Fragenerstellung.thema_ein(1)
lb_spielfläche_kat3.Text = Fragenerstellung.thema_ein(2)
lb_spielfläche_kat4.Text = Fragenerstellung.thema_ein(3)
lb_spielfläche_katmod.Text = Fragenerstellung.thema_ein(4)
For i As Integer = 0 To CInt(Ersteinstellung.gruppenanz) - 1 Step 1
speichern(i, 0) = "Gruppe " & i + 1
speichern(i, 1) = CStr(0)
Next
gruppe = 1
Call buttons_punkte()
Call score_aktu()
End Sub
Sub frage_open(reihe As Integer, spalte As Integer)
If Ersteinstellung.rb_ersteinstellung_weiter1.Checked = True Then
aw = MsgBox(Fragenerstellung.fragen_ein(reihe, spalte), MsgBoxStyle.YesNoCancel)
Else
aw = MsgBox(Fragenerstellung.fragen_ein(reihe, spalte), MsgBoxStyle.YesNo)
End If
End Sub
Sub nächste_gruppe(nummer As String, punkte As Integer)
speichern(CInt(nummer), 1) = CStr(CInt(speichern(CInt(nummer), 1)) + punkte)
Call score_aktu()
If gruppe = CDbl(Ersteinstellung.gruppenanz) Then
gruppe = 1
Else
gruppe += 1
End If
End Sub
#Region "Buttons_code"
Private Sub but_spielfläche_kat1_1_Click(sender As System.Object, e As EventArgs) Handles but_spielfläche_kat1_1.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(0, 0)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat1_2_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat1_2.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(1, 0)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat1_3_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat1_3.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(2, 0)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat1_4_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat1_4.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(3, 0)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat1_5_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat1_5.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(4, 0)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat2_5_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat2_5.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(4, 1)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat2_4_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat2_4.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(3, 1)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat2_3_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat2_3.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(2, 1)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat2_2_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat2_2.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(1, 1)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat2_1_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat2_1.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(0, 1)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat3_1_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat3_1.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(0, 2)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat3_2_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat3_2.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(1, 2)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat3_3_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat3_3.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(2, 2)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat3_4_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat3_4.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(3, 2)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat3_5_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat3_5.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(4, 2)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat4_5_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat4_5.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(4, 3)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat4_4_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat4_4.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(3, 3)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat4_3_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat4_3.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(2, 3)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat4_2_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat4_2.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(1, 3)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_kat4_1_Click(sender As Object, e As EventArgs) Handles but_spielfläche_kat4_1.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(0, 3)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_katmod_1_Click(sender As Object, e As EventArgs) Handles but_spielfläche_katmod_1.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(0, 4)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_katmod_2_Click(sender As Object, e As EventArgs) Handles but_spielfläche_katmod_2.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(1, 4)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_katmod_3_Click(sender As Object, e As EventArgs) Handles but_spielfläche_katmod_3.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(2, 4)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_katmod_4_Click(sender As Object, e As EventArgs) Handles but_spielfläche_katmod_4.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(3, 4)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
Private Sub but_spielfläche_katmod_5_Click(sender As Object, e As EventArgs) Handles but_spielfläche_katmod_5.Click
Dim bnt As Button = DirectCast(sender, Button)
Call frage_open(4, 4)
If aw = MsgBoxResult.Yes Then
score = bnt.Text
Call nächste_gruppe(CStr(gruppe), CInt(score))
Else
Call nächste_gruppe(CStr(gruppe), 0)
End If
bnt.Enabled = False
End Sub
#End Region
#Region "Buttons_belegung"
Sub buttons_punkte()
For i As Integer = 0 To 4
Select Case i
Case Is = 0
but_spielfläche_kat1_1.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat2_1.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat3_1.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat4_1.Text = Ersteinstellung.pktabstuf(i)
If Spielmodus_Auswahl.masterofd = True Then
but_spielfläche_katmod_1.Text = Fragenerstellung.mod_pkt(i)
Else
but_spielfläche_katmod_1.Text = Ersteinstellung.pktabstuf(i)
End If
Case Is = 1
but_spielfläche_kat1_2.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat2_2.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat3_2.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat4_2.Text = Ersteinstellung.pktabstuf(i)
If Spielmodus_Auswahl.masterofd = True Then
but_spielfläche_katmod_2.Text = Fragenerstellung.mod_pkt(i)
Else
but_spielfläche_katmod_2.Text = Ersteinstellung.pktabstuf(i)
End If
Case Is = 2
but_spielfläche_kat1_3.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat2_3.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat3_3.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat4_3.Text = Ersteinstellung.pktabstuf(i)
If Spielmodus_Auswahl.masterofd = True Then
but_spielfläche_katmod_3.Text = Fragenerstellung.mod_pkt(i)
Else
but_spielfläche_katmod_3.Text = Ersteinstellung.pktabstuf(i)
End If
Case Is = 3
but_spielfläche_kat1_4.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat2_4.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat3_4.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat4_4.Text = Ersteinstellung.pktabstuf(i)
If Spielmodus_Auswahl.masterofd = True Then
but_spielfläche_katmod_4.Text = Fragenerstellung.mod_pkt(i)
Else
but_spielfläche_katmod_4.Text = Ersteinstellung.pktabstuf(i)
End If
Case Is = 4
but_spielfläche_kat1_5.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat2_5.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat3_5.Text = Ersteinstellung.pktabstuf(i)
but_spielfläche_kat4_5.Text = Ersteinstellung.pktabstuf(i)
If Spielmodus_Auswahl.masterofd = True Then
but_spielfläche_katmod_5.Text = Fragenerstellung.mod_pkt(i)
Else
but_spielfläche_katmod_5.Text = Ersteinstellung.pktabstuf(i)
End If
End Select
Next
End Sub
Private Sub but_close_Click(sender As Object, e As EventArgs) Handles but_close.Click
Dim abfrage As New MsgBoxResult
abfrage = MsgBox("Soll die Anwendung wirklich beendet werd? Dadruch gehen alle daten verloren", MsgBoxStyle.YesNo)
If abfrage = MsgBoxResult.Yes Then
Spielmodus_Auswahl.Close()
Ersteinstellung.Close()
Fragenerstellung.Close()
Me.Close()
End If
End Sub
#End Region
Sub score_aktu()
Dim dgw = dgw_scorebaord
Dim dgw_row As Integer = dgw.Rows.Add()
dgw.ClearSelection()
For i As Integer = 0 To CInt(Ersteinstellung.gruppenanz) - 1
dgw(0, dgw_row).Value = speichern(i, 0)
dgw(1, dgw_row).Value = speichern(i, 1)
Next
End Sub
End Class

Da mal der Ganzecode von haupt Thread. Wobei du ihn in ausschnitten schon kennst.

ErfinderDesRades · 27. Oktober 2014, 12:01

ah - gut - also von vorne: Fehlerzeile?
Exceptions, und was sie uns sagen wollen

Lord C · 27. Oktober 2014, 12:04

Die Zeilen 406-414 seit ich dass dirn hab knallt es. Und zwar immer in dem Bereich. Nach dem Buttondruck.

ErfinderDesRades · 27. Oktober 2014, 12:09

wie soll ich das verstehen: Die Zeilen 406-414 Eine Exception kann doch nur in genau einer Zeile auftreten?

Lord C · 27. Oktober 2014, 12:11

Heute ist nicht mein Tag. Die exeeption komm in zeile 408. dort wo ich die row adde.

ErfinderDesRades · 27. Oktober 2014, 12:24

guck dir mal die anneren Überladungen der Add-Methode im Objectbrowser an. Dann wird der Meldungs-Text ich finde verständlicher.

Lord C · 27. Oktober 2014, 12:27

Ah jetzt weiß ichs. Das das geht brauch ich schon ne Zeile.

ErfinderDesRades · 27. Oktober 2014, 12:43

Nein. also guck auch annere Überladungen an - es sind ja 6.

Wenn du nicht drauf kommst, poste Screenshot vom OB, mit Ansicht aller dieser Überladungen.

Lord C · 27. Oktober 2014, 13:35

Kannst du mir den weg dahin kurz erläutern und wiegenau ich die überladungen anzeige. Arbeite sehr selten bzw. hab noch nie mit dem ob gearbeitet. Mein Statement oben ging aus der fehlermeldung hervor.

ErfinderDesRades · 27. Oktober 2014, 14:06

VisualStudio richtig nutzen (Google ist nicht deine Mami)

Lord C · 27. Oktober 2014, 14:50

Wenn ich nach der Add-Methode suche (suchzeile add eingebe) kommt nichts genaues raus. Wie zeig ich mir die überladung an? Ich kann atm das video nicht schauen da yt auf der Arbeit gesperrt ist.

PS: Irgdwie bin ich heute zu allem doof

ErfinderDesRades · 27. Oktober 2014, 15:22

auf der Arbeit? Oh jeh!
Im professionellen Bereich sollte man niemals so vorgehen, dass man einem DGV Zeilen zufügt. Eiglich im privaten auch nicht, aber da richtet man nicht wirklich Schaden an.

Kläre das mit deinem Chef, dass du Zugang zu utube bekommst, denn es ist dringend erforderlich, dass du dein Werkzeug richtig zu benutzen lernst.

Und auch zu einer professionell tauglicheren Vorgehensweies der Datenverarbeitung hab ich glaub inzwischen 12 Videos verfasst, weil das muss man gesehen haben, dann erfasst man das sofort, textuell wären das zig Seiten, und man würds doch nicht kapieren.

Also wenn dein Chef will, dass du effizient arbeitest, brauchst du Zugang zu utube.

Lord C · 27. Oktober 2014, 15:27

Es ist ja für ein Privates Projekt(ich deklariere es als übung für die schule) ich hab mir die links schon auf meinen Privaten Mailacc geschickt und schauee sie mir daheim an. Weil das yt privileg hat bei uns nur die GL. Nichtmal dafür würde ichs bekommen.

ErfinderDesRades · 27. Oktober 2014, 15:41

Das ist Mist!

Wenn du effektiv lernen willst, musst du die Videos gugge, die Samples downloaden, und rumprobieren, wie die ticken.
Und dann musst du dir ein eigenes kleines Ziel setzen, und versuchen umzusetzen.
Und dabei musst du immer wieder in die Vids reingugge.
Weil es ist einfach, und ist logisch, und sind nur ein paar Klickse und paar Eingaben, aber die Klicks müssen stimmen, sonst wird das nix.

Auch brauchst du das Video von Welchen Datentyp hat das Objekt?
Und jede Menge Grundlagen. Du kannst ja vmtl. nicht den richtigen Datentyp der Auflistung angeben, der du mit deinem .Add() was adden willst - oder?
Wenn du aber diesen Datentyp nicht weisst, dann findeste ihn auch nicht im ObjectBrowser.

DataGrindView mit Variablen befüllen

DataGrindView mit Variablen befüllen

VB.NET-Quellcode

VB.NET-Quellcode

Lord C schrieb:

Quellcode

Ähnliche Themen

2 Benutzer haben hier geschrieben