怎么实现多个单行编辑框数据类型的判读

如何实现多个单行编辑框数据类型的判读？
在窗口中有5个单行编辑框，现我想实现对这5个单行编辑框的数据判读：即这5个单行编辑框只能输入数字或无内容，不能输入字符，当输入字符便报错。请问这代码应如何写？？

------解决方案--------------------
用editmask控件来代替singlelineedit控件，将editmask控件的masktype设置为numericmask!,mask属性设置为“#################”，这样就只能输入数字了

判断就是取text

if em_1.text = '' then
messagebox('提示','必须输入内容！')
em_1.setfocus()
return
end if
其他的依壶画瓢