你用的都是vb6的代码,改成:
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:空间域名、网络空间、营销软件、网站建设、山城网站维护、网站推广。
Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus
If IsNumeric(TextBox1.Text) = False Then
MsgBox("输入有非数字字符,请重新输入", vbOKOnly, "友情提示")
TextBox1.Focus()
Return
End If
End Sub
这种表达方法是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
可以用VB6里的函数
isnumeric()
比如要判断文本框里的内容是否数字
if isnumeric(TextBox1.text) Then
msgbox("是数字!")
else
msgbox("不是数字!")
end if
int 型,取值范围-2,147,483,648 到 2,147,483,647 ,默认值是 0 int是值类型,读内存区间中指定长度单元里的数据,这块单元就算不做任何处理也全是0,那么数值就是0 所以,int 型,永远不会为空,从声明一个 int 变量时,它默认就是0,而不是空
如果用常规编程的方法:
直接用split(str1,“,”)的形式把str1字符串分成字符串数组,然后用for循环判断每个数组元素是否是数字或者是字符串就可以了。
售后响应及时
7×24小时客服热线数据备份
更安全、更高效、更稳定价格公道精准
项目经理精准报价不弄虚作假合作无风险
重合同讲信誉,无效全额退款