• 全部
  • VBS
  • .NET技术
  • VBA
  • VB网络编程
  • VB多媒体
  • VB数据库
  • VB控件
  • VB COM/DCOM
  • VB基础类
  • VB API
  • 问答

vb textbox的小问题

LiJun12112003 2005-03-15 09:51:36
初学vb,有几个关于textbox控件的问题不太清楚:
1〉如何判断textbox控件中输入的内容是数字还是英文字母?
2〉如何获得textbox控件中输入内容的第一个(或者第二个第三个……)字符是否与指定的字符相符?
在线等!!
...全文
51 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
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
用正则表达式。。你找点这方面的资料。。
回复
相关推荐
发帖
VB
创建于2007-09-28

1.6w+

社区成员

VB技术相关讨论,主要为经典vb,即VB6.0
申请成为版主
帖子事件
创建了帖子
2005-03-15 09:51
社区公告
暂无公告