编制一个摄氏温度C和华氏温度F相互转换的程序。相关公式为:C=
(F-32),F=
C+32。
界面如下:文本框从上到下对象名称分别是Text1,Text2,按钮从左到右名称依次是:Command1,Command2,Command3。
现在程序编写如下:
Private Sub Command1_Click()
Dim C As Sinzle,F As Sinzle
C=(Text1.Text) (VB中字符转数值函数)
F=(计算华氏温度)
Text2.Text=(F) (将华氏温度放在TEXT2中,注意要将数值转字符)
End Sub