出现子程序或函数未定义 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 出现子程序或函数未定义

标题：出现子程序或函数未定义

只看楼主

lwl1288

等　级：新手上路
帖　子：1
专家分：0
注　册：2013-7-12
结帖率：0

楼主

已结贴√ 问题点数：10 回复次数：1

出现子程序或函数未定义

Private Sub text1_lostfocus()
If Text1.Text <> "" And Not isnumberic(Text1.Text) Then
MsgBox "a值输入有误：含有非数字字符！", , "输入有误"
Text1.Text = ""
Text1.SetFocus
End If
End Sub

搜索更多相关主题的帖子: 子程序　

2013-07-12 18:36

Artless

等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8

第 2 楼

得分:10

IsNumeric

无知

2013-07-12 21:14

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-417208-1-1.html