油站油气回收检测报告:用VB编的简单的计算机的问题

来源:百度文库 编辑:中科新闻网 时间:2024/05/12 10:51:27
Private Sub Command6_Click()
Dim x As Double
Dim y As Double
x = CLng(Text1.Text)
y = CLng(Text2.Text)
Text3.Text = x / y
If Text3.Text < -4.94065645841247E-324 Then MsgBox "数字太小了..."
If Text3.Text > 4.94065645841247E-324 Then MsgBox "数字太大了..."

请问范围是这些吗?如果不是,那请写下来,谢谢

还有一问题 我弄的那个计算器 有3个textbox(数字1 数字2 结果) 怎么把他们弄成微软计算器那样的 一个TEXTBOX 然后 + - * / 直接按 + - * / 而不是 ALT + (+ - * /)
没人知道吗