添加一个下拉框到DataGrid

http://blog.csdn.net/xwqjamky/archive/2005/10/17/508011.aspx

其中:

Private Sub Ctrls_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs)

        If DataGrid1.CurrentCell.ColumnNumber = 3 Then

            MyCombo.Visible = False

            If DataGrid1.Item(DataGrid1.CurrentCell) & "" = "" Then

                SendKeys.Send("*")

            End If

            DataGrid1.Item(DataGrid1.CurrentCell) = MyCombo.Text

        End If

    End Sub

要消化

阅读更多
文章标签: datagrid object
个人分类: vb.net
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭
关闭