vb textbox的小问题

LiJun12112003 2005-03-15 09:51:36
初学vb,有几个关于textbox控件的问题不太清楚:
1〉如何判断textbox控件中输入的内容是数字还是英文字母?
2〉如何获得textbox控件中输入内容的第一个(或者第二个第三个……)字符是否与指定的字符相符?
在线等!!
...全文
95 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
haoco 2005-03-21
  • 打赏
  • 举报
回复
up
LiJun12112003 2005-03-16
  • 打赏
  • 举报
回复
谢谢大家的帮忙,更具大家的帮助,我已经解决了这个问题,因为我是初学,未接触正则表达式,所以用的是true1024的方法,特别感谢!!
True1024 2005-03-16
  • 打赏
  • 举报
回复
'1用正则表达式.(目前还没用过)
'2用下面这些方法.

'如果是数字的话.
'If IsNumeric(Text1.Text) = True Then
'End If

Public Function PanDuan(ByVal str As String) As Boolean
Dim Eng As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghigklmnopqrstuvwxyz"
PanDuan = True
Dim i As Integer
For i = 1 To Len(str)
If Eng.IndexOf(Mid(str, i, 1)) = -1 Then
PanDuan = False
End If
Next
End Function

第二个问题用 Mid 函数也能解决.
hamadou 2005-03-16
  • 打赏
  • 举报
回复
1.
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Select Case e.KeyChar
Case "0" To "9"
MessageBox.Show("数字")
Case "A" To "z"
MessageBox.Show("字母")
End Select
End Sub
2.用正则应该是最简单的!
haoztao 2005-03-15
  • 打赏
  • 举报
回复
用正则表达式。。你找点这方面的资料。。

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧