Question

请教vb6中，使文本框只能输入数字小数点、退格，且不能为空的代码

求教按下command后，t1~t20文本框进行计算，且文本框只能输入数字小数点、退格，且不能为空，否则不进行计算且弹出msgbox
在t1 和 t2中，当option1=true是选t1参加计算
当option2=true时选t2参加计算
当option1和option2=false时，不进行计算且弹出msgbox

Answer 1

if IsNumeric(vba.trim(me.text1)) then
else
msgbox "T1必须为数字"
exit sub
endif
if me.option1.Value=ture then
'此处写 me.text1 的计算公式
elseif me.option2.Value=ture then
'此处写 me.text1 的计算公式
endif

Answer 2

格式化文本。