Społeczeństwo Klasowy Form1
Intymny Okręt podwodny Form1_Load (ByVal nadawca Jako System.Object, ByVal e Jako System.EventArgs) Rękojeść MyBase.Load
'TODO: Ten linia kod ładować dane w the "Db2DataSet.Notes" stół. Ty móc, lub usuwać ono, potrzebować.
Me.NotesTableAdapter.Fill (Me.Db2DataSet.Notes)
Kończyć Okręt podwodny
Intymny Okręt podwodny Button1_Click (ByVal nadawca Jako System.Object, ByVal e Jako System.EventArgs) Obchodzić się Button1.Click
DataGridView1.Rows.Add (Db2DataSet.Tables ((0)). Rows.Count)
Dla i Jako Integer = (0) Db2DataSet.Tables ((0)). Rows.Count - (1)
Dla j Jako Integer = (0) Db2DataSet.Tables ((0)). Wiosłować (i) .ItemArray (). Obliczenie - (1)
Jeżeli j <> (1) Wtedy
DataGridView1.Rows (i). Komórka (j). Wartość = Db2DataSet.Tables ((0)). Rząd (i). Rzecz (j)
Inny
Ciemnawy c Jako DataGridViewComboBoxCell = Nowy DataGridViewComboBoxCell ()
Dla Db2DataSet.Tables rho Jako DataRow W Db2DataSet.Tables ((0)). Rząd
c.Items.Add (rho. Rzecz (1))
Następnie
DataGridView1.Rows (i). Komórka (1) = c
Kończyć Jeżeli
Następny j
Następnie i
Końcówka Okręt podwodny
Końcówka Klasa
|