16,549
社区成员
发帖
与我相关
我的任务
分享
datagrid.coloumns.add("xxx")
....
if i<datagrid.columns.count then
datagrid.Columns(i).Visible = False
end
Public Class Form1
Private dgv As DataGridView
Private btn As Button
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dgv = New DataGridView
dgv.Columns.Add("col1", "col1")
dgv.Columns.Add("col2", "col2")
Me.Controls.Add(dgv)
btn = New Button
AddHandler btn.Click, AddressOf btnClick
btn.Text = "test"
btn.Location = New Point(200, 200)
Me.Controls.Add(btn)
End Sub
Private Sub btnClick(ByVal sender As Object, ByVal e As EventArgs)
If dgv IsNot Nothing Then
If dgv.Columns.Contains("col1") Then
dgv.Columns.Remove("col1")
End If
End If
End Sub
End Class