亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

vb的datagrid怎么使用

小億
273
2023-08-10 06:12:20
欄目: 編程語言

要使用VB的DataGridView控件,你需要做以下步驟:

  1. 在窗體上拖放一個DataGridView控件。

  2. 在代碼中,定義一個DataTable來存儲數據,并在窗體加載時初始化它。

Dim dt As New DataTable
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 添加列到DataTable
dt.Columns.Add("ID", GetType(Integer))
dt.Columns.Add("Name", GetType(String))
dt.Columns.Add("Age", GetType(Integer))
' 添加行到DataTable
dt.Rows.Add(1, "Tom", 25)
dt.Rows.Add(2, "John", 30)
dt.Rows.Add(3, "Mary", 28)
' 將DataTable綁定到DataGridView
DataGridView1.DataSource = dt
End Sub
  1. 可以通過代碼添加、修改或刪除DataGridView中的數據。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' 添加一行數據到DataTable
dt.Rows.Add(4, "Jane", 35)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
' 修改DataGridView中選中的行的數據
If DataGridView1.SelectedRows.Count > 0 Then
DataGridView1.SelectedRows(0).Cells("Name").Value = "Updated"
End If
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
' 刪除DataGridView中選中的行
If DataGridView1.SelectedRows.Count > 0 Then
DataGridView1.Rows.Remove(DataGridView1.SelectedRows(0))
End If
End Sub

這樣就可以使用VB的DataGridView控件來顯示和操作數據了。

0
彝良县| 临武县| 象山县| 梅州市| 武宣县| 镇原县| 白河县| 波密县| 汝城县| 岱山县| 台北市| 临潭县| 汉阴县| 海口市| 鄢陵县| 扶绥县| 灌南县| 慈利县| 新田县| 会泽县| 新民市| 梁河县| 犍为县| 米脂县| 迁西县| 高淳县| 吴江市| 南漳县| 汕头市| 利川市| 宜都市| 遂昌县| 吉林省| 高邑县| 邻水| 吴川市| 尚志市| 阜平县| 历史| 兴安盟| 永兴县|