高校问答剑灵鼠标侧键:vbscript中.focus()问题（难道vbscript中无法.focus?）
来源：百度文库 编辑：高校问答 时间：2024/04/28 23:12:41
我用vbscript编了一个函数checkdata()
sub checkdata(str1)
If not(IsNumeric(str1.value)) Then
MsgBox "请输入数字！"
str1.focus() ~~~~~~~~~~~~~~~~此处怎么弄也不行（我已经试过各种方法）
End If
End sub
这个函数是检查文本框中是否为数字，由于文本框太多，我在文本框的onchange中设置函数：onChange="checkdata(此处为文本框的name)" 中使用了checkdata函数（如上！）
函数中：当出错后，焦点回到此文本框时（以备再次检查！），怎么也无法实现！！！！
请高手指点迷津！！！（最好经过测试）
小弟先谢了！！！！！！！！！
测试成功者,发到我邮箱追加10分！(yeahemail@gmail.com)
问题已经解决了
把onChange换成onblur即可
sub checkdata(str1)
If not(IsNumeric(str1.value)) Then
MsgBox "请输入数字！"
str1.focus() ~~~~~~~~~~~~~~~~此处怎么弄也不行（我已经试过各种方法）
End If
End sub
这个函数是检查文本框中是否为数字，由于文本框太多，我在文本框的onchange中设置函数：onChange="checkdata(此处为文本框的name)" 中使用了checkdata函数（如上！）
函数中：当出错后，焦点回到此文本框时（以备再次检查！），怎么也无法实现！！！！
请高手指点迷津！！！（最好经过测试）
小弟先谢了！！！！！！！！！
测试成功者,发到我邮箱追加10分！(yeahemail@gmail.com)
问题已经解决了
把onChange换成onblur即可
sub checkdata(str1)
If not(IsNumeric(STR1)) Then
MsgBox "请输入数字！"
str1.focus() ~~~~~~~~~~~~~~~~
return false
End If
End sub
你在调用的时候用return Checkdata看一看呢？上面的应该可以，你有没有看对`1
用JS吧.