VB菜鸟编写中遇到的问题 哪位高手能帮我解答下

来源：百度知道 编辑：UC知道 时间：2024/07/04 13:10:21
现在需要在一个按钮上编写一段程序 要求如下
取4个TEXT中的值作为变量(这4个TEXT中的内容都是在程序运行后手动输入的)

要求这4个变量的范围都在负1乘十的十次方到正1乘十的十次方 只要有一个不满足 则在LABEL10中输出"错误"两个字 同时停止运行之后的内容

如果全部满足要求 则运行一个公式

公式蛮复杂的 我就不打了 这个我会的 如果需要的话就定为a+b+c好了 但上面那部分怎么实现就有点困难 主要是没有思路 哪位高手帮帮我 在线= 急用 谢谢了
谢谢1楼的 但貌似还是和我自己编的一样 还是即使超出范围 他依旧是执行最后够程序

我就希望一旦超出范围 立即在LABEL10中输出"错误"两个字 之后就画面就停在"错误"这里

另外最好公式成功运行也运行在LABEL10里 你看看看哪里出了什么问题 或者留个QQ给我 我把我编的发给你看看 为什么不行 大家帮帮忙 继续在线=

朋友 我感觉你所说的问题还没描述清楚 我的QQ是67889896 希望和你进一步了解你的问题

if val(text1.text)<-10^10 or val(text1.text)>10^10 then
LABEL10.Caption="错误"
elseif val(text2.text)<-10^10 or val(text2.text)>10^10 then
LABEL10.Caption="错误"
elseif val(text3.text)<-10^10 or val(text3.text)>10^10 then
LABEL10.Caption="错误"
elseif val(text4.text)<-10^10 or val(text4.text)>10^10 then
LABEL10.Caption="错误"
else
msgbox a+b+c
end if

if val(text1.text)<-10^10 or val(text1.text)>10^10 then
LABEL10.Caption="错误" :exit sub
elseif val(text2.text)<-10^10 or val(text2.text)>10^10 then
LABEL10.Caption="错误" :exit sub
elseif val(text3.text)<-10^10 or val(text3.text)>10^10 then
LABEL10.Caption="错误" exit sub
elseif val(text4.text)<-10^10 or val(text4.text)>10^10 then
LABEL10.Caption="错误"exit sub
el