您的位置:首页 > 其它

功能要求 我重写了个 DATAGRID控件 但是达不到我预期的要求 大家能帮忙完善下么!

2006-03-21 17:40 447 查看
Public Class dov_datagrid
Inherits System.Windows.Forms.DataGrid
#Region " Windows 窗体设计器生成的代码 "

Public Sub New()
MyBase.New()

'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()

'在 InitializeComponent() 调用之后添加任何初始化

End Sub

'UserControl1 重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer

'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改此过程。
'不要使用代码编辑器修改它。
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
components = New System.ComponentModel.Container
End Sub

#End Region

Protected Overrides Function ProcessCmdKey(ByRef msg As System.Windows.Forms.Message, ByVal keyData As System.Windows.Forms.Keys) As Boolean
Dim WM_KEYDOWN As Integer = 256 '消息响应的问题可以参考其他win32编程的文章
Dim WM_SYSKEYDOWN As Integer = 260

If ((msg.Msg = WM_KEYDOWN) Or (msg.Msg = WM_SYSKEYDOWN)) Then

Select Case keyData

Case Keys.Enter
'截获到回车键
Me.Enabled = False
Return False

End Select

End If

End Function
End Class

我只能做到使用datagrid 的enabled属性传递 请大家出个主意 使用一种新的传递方式 也就是在datagrid里面可以直接确定 传出当前row数据
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐