vb.net Datagridview 单元格只能录入数字

最新推荐文章于 2017-02-21 15:51:42 发布

天下第一刀2020

最新推荐文章于 2017-02-21 15:51:42 发布

阅读量1.2k

点赞数

文章标签： vb.net object

本文链接：https://blog.csdn.net/lovegod12/article/details/4013561

版权

本文介绍如何在VB.NET中使用Datagridview时，限制单元格编辑只允许输入数字。通过处理EditingControlShowing事件并添加KeyPress事件处理程序，阻止非数字字符的输入。

摘要由CSDN通过智能技术生成

dtSette为Ｄatagridview

Private Sub dtSette_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles dtSette.EditingControlShowing
        Dim EditCell As DataGridViewTextBoxEditingControl
        EditCell = CType(e.Control, DataGridViewTextBoxEditingControl)
        EditCell.SelectAll()
        AddHandler EditCell.KeyPress, AddressOf Cells_KeyPress
End Sub

Private Sub Cells_KeyPress(ByVal sender As System.Object, ByVal e As KeyPressEventArgs)
        If e.KeyChar <> Chr(8) And e.KeyChar <> Chr(13) And (e.KeyChar < Chr(48) Or e.KeyChar > Chr(57)) Then
            Beep()
            Beep()
            e.KeyChar = Chr(0)
        End If
End Sub