Openbare Klasse Form1
Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten Form1_Load MyBase.Load
'TODO: Deze lijn van de gegevens van codeladingen in de lijst „Db2DataSet.Notes“. U kunt, het bewegen of verwijderen, zoals nodig.
Me.NotesTableAdapter.Fill (Me.Db2DataSet.Notes)
Sub van het eind
Privé SubButton1_Click (ByVal afzender als System.Object, ByVal e als System.EventArgs) behandelt Button1.Click
DataGridView1.Rows.Add (Db2DataSet.Tables (0). Rows.Count)
Voor I als Geheel = 0 aan Db2DataSet.Tables (0). Rows.Count - 1
Voor j als Geheel = 0 aan Db2DataSet.Tables (0). Rijen (I) .ItemArray (). Telling - 1
Als j <> 1 toen
DataGridView1.Rows (I). Cellen (j). Waarde = Db2DataSet.Tables (0). Rijen (I). Punt (j)
Anders
Schemerig c als DataGridViewComboBoxCell = Nieuwe DataGridViewComboBoxCell ()
Voor Elke rho als DataRow in Db2DataSet.Tables (0). Rijen
c.Items.Add (rho. Punt (1))
Daarna
DataGridView1.Rows (I). Cellen (1) = c
Eind als
Volgende j
Volgende I
Sub van het eind
De Klasse van het eind
|