vb.net中,如何使textbox禁止输入/,*,?,<,>(也就是文件名命名规则里限制的那几个 20
vb.net中,如何使textbox禁止输入/,*,?,<,>(也就是文件名命名规则里限制的那几个字符)?...
vb.net中,如何使textbox禁止输入/,*,?,<,>(也就是文件名命名规则里限制的那几个字符)?
展开
4个回答
展开全部
这个应该可以,已经通过VB2010测试:
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text <> "" Then
If Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "/" Or Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "*" Or _
Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "?" Or Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "<" Or _
Microsoft.VisualBasic.Right(TextBox1.Text, 1) = ">" Then
TextBox1.Text = Microsoft.VisualBasic.Left(TextBox1.Text, Len(TextBox1.Text) - 1)
TextBox1.SelectionStart = Len(TextBox1.Text)
End If
End If
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text <> "" Then
If Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "/" Or Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "*" Or _
Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "?" Or Microsoft.VisualBasic.Right(TextBox1.Text, 1) = "<" Or _
Microsoft.VisualBasic.Right(TextBox1.Text, 1) = ">" Then
TextBox1.Text = Microsoft.VisualBasic.Left(TextBox1.Text, Len(TextBox1.Text) - 1)
TextBox1.SelectionStart = Len(TextBox1.Text)
End If
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2015-12-21
展开全部
用instr函数 检测你不需要的字符是否存在,有就弹出提示
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以在 textbox keypress事件中进行限制
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc("/") Or Asc("*") Or Asc(">") Or Asc("<") Or Asc("?") Then
Beep
KeyAscii = 0
End If
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc("/") Or Asc("*") Or Asc(">") Or Asc("<") Or Asc("?") Then
Beep
KeyAscii = 0
End If
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
检测 这几个字符的 代码
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询