中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

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
镇安县| 砚山县| 兴国县| 班玛县| 松阳县| 壤塘县| 津市市| 汉沽区| 永昌县| 沅陵县| 庆元县| 哈密市| 昌乐县| 锡林郭勒盟| 洮南市| 东乡族自治县| 门源| 那曲县| 正镶白旗| 永兴县| 广南县| 清原| 娄烦县| 巴彦淖尔市| 绥德县| 怀仁县| 喀喇| 汕尾市| 白玉县| 潜江市| 安阳市| 鹰潭市| 武强县| 称多县| 潼南县| 塔河县| 石景山区| 丽江市| 昭觉县| 晋江市| 白银市|