jacky789 发表于 2006-5-3 00:36:00

[求助]getreal之输入~

请教各位大大：
dim h As Double
h = ThisDrawing.Utility.GetReal(vbCrLf & "real(1 to 10): ")
vba如上行,要如何限制user输入空字串" "或输入"0"及"esc"键??

mikewolf2k 发表于 2006-5-3 11:09:00

可以比较返回的h值，如果是非法数据就显示错误信息并再次getreal
页: [1]
查看完整版本: [求助]getreal之输入~