方法1：
创新互联专业为企业提供代县网站建设、代县做网站、代县网站设计、代县网站制作等企业网站建设、网页设计与制作、代县企业网站模板建站服务，十年代县做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
if isnumeric(textbox1.text) then
if left(textbox1.text,1)="1" then
a处理
else
b处理
end if
else
b处理
end if
方法2：
if isnumeric(textbox1.text) then
if textbox1.text like "1*" then
a处理
else
b处理
end if
else
b处理
end if
这种表达方法是VB认可的，但意思不一定是您想比达的。
按照从左到右，以及隐含类型转换的规则。其含义如下：
先计算48=A，若A大于等于48，则计算结果为True,否则为False
然后计算True(或False)=57，这时由于是不同类型的数据进行比较，程序进行隐含的类型转换，转换的规则是将boolen量转为int。False为0，True为-1(0xffff)。
所以True(或False)=57相当于-1(0)=57，这个比达式恒为True的。
要真实表达楼主的意头，就当为A=48 and A=57
把这个数与区间的上限和下限比较就知道是不是在区间内了：
x = 16
If x = 10 And x = 20 Then
'x的值在10与20之间
Else
'x的值不在10与20之间
End If