大虾们!!帮忙用VB编写一个简单的程序!!

来源:百度知道 编辑:UC知道 时间:2024/06/16 18:42:14
1、 华氏转摄氏问题:
已知公式:摄氏温度=5/9*(华氏温度-32)。要求输入一个华氏温度,求出相应的摄氏温度并输出。

你的三道题我都解决了

Private Sub Command1_Click()
Dim hua As Double
Dim se As Double
hua = InputBox("请输华氏温度", "输入华氏温度")
se = 5 / 9 * (hua - 32)
Print "对应的摄氏温度是" & se & "度"
End Sub

运行VB,在窗体上拉个按钮和一个文本框,双击按钮,输入下面的

private sub command1_click()
h=val(text1.text)
c=5/9*(h-32)
print c
end sub

你要的代码来了,已经上机验证OK!!!

Private Sub Command1_Click()
Dim huashiwendu As Double
huashiwendu = InputBox("请输入一个华氏温度:", "输入提示")
MsgBox "摄氏温度为:" & Round(5 / 9 * (huashiwendu - 32), 2)
End Sub

在窗体上添加一个按钮,把代码复制进去看结果吧!