Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/visual-studio-2012/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VB.net中是否有RangeValidator?_Vb.net_Visual Studio 2012_Datagridview_Rangevalidator - Fatal编程技术网

VB.net中是否有RangeValidator?

VB.net中是否有RangeValidator?,vb.net,visual-studio-2012,datagridview,rangevalidator,Vb.net,Visual Studio 2012,Datagridview,Rangevalidator,我正在寻找一种简单的方法来为我的datagridview指定允许的输入。我在MSDN上遇到了一个叫做“RangeValidator”的东西,但它似乎只用于ASP.NET中的web开发。对于使用Visual Studio 2012的VB.NET 4.5,是否有其他替代方法?我的目标是拥有一个datagridviewcell,它只允许整数>=零,不允许分数输入。我非常感谢任何人的建议和帮助。:) 我在这里找到了下面的代码,我想它可能会有所帮助 Private Sub DataGridView1_Ed

我正在寻找一种简单的方法来为我的datagridview指定允许的输入。我在MSDN上遇到了一个叫做“RangeValidator”的东西,但它似乎只用于ASP.NET中的web开发。对于使用Visual Studio 2012的VB.NET 4.5,是否有其他替代方法?我的目标是拥有一个datagridviewcell,它只允许整数>=零,不允许分数输入。我非常感谢任何人的建议和帮助。:)

我在这里找到了下面的代码,我想它可能会有所帮助

Private Sub DataGridView1_EditingControlShowing1(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles DataGridView1.EditingControlShowing
    If DataGridView1.CurrentCell.ColumnIndex = 1 Then
        Dim txtedit As TextBox = DirectCast(e.Control, TextBox)
        AddHandler txtedit.KeyPress, AddressOf txtEdit_KeyPress
    End If
End Sub

Private Sub txtEdit_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs)
    If DataGridView1.CurrentCell.ColumnIndex = 1 Then
        If ("0123456789\b".IndexOf(e.KeyChar) = -1) Then
            If e.KeyChar <> Convert.ToChar(Keys.Back) Then
                e.Handled = True
            End If
        End If
    End If
End Sub
Private子DataGridView1_EditingControlShowing1(ByVal sender作为对象,ByVal e作为System.Windows.Forms.DataGridViewEditingControlShowingEventArgs)处理DataGridView1.EditingControlShowing
如果DataGridView1.CurrentCell.ColumnIndex=1,则
Dim txtedit As TextBox=DirectCast(例如控件,TextBox)
AddHandler txtedit.KeyPress,txtedit\u KeyPress的地址
如果结束
端接头
专用子txtEdit_按键(ByVal发送方作为对象,ByVal e作为按键事件参数)
如果DataGridView1.CurrentCell.ColumnIndex=1,则
如果(“0123456789\b”.IndexOf(e.KeyChar)=-1,则
如果e.KeyChar Convert.ToChar(Keys.Back),则
e、 已处理=真
如果结束
如果结束
如果结束
端接头

这不适用于我的特定案例,因为我使用的是microsoft.interops.excel。