作者mraaa (重新出发....)
看板Visual_Basic
标题Re: [VB2008 ] 关於温度转换
时间Fri Oct 30 13:17:00 2009
※ 引述《zxcb (zxcb)》之铭言:
: 我是新手>"<
: 我有个作业要交
: 是要做温度转换的
: Public Class Form1
: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles Button1.Click
: Dim c, f
: c = TextBox1.Text
: f = c * 9 / 5 + 32
: Label2.Text = ("摄氏" & c & "度" = "华氏" & f & "度")
: End Sub
: Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles Button2.Click
: Dim c, f
: f = TextBox1.Text
: c = (f - 32) * 5 / 9
: Label2.Text = ("华氏" & c & "度" = "摄氏" & f & "度")
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
问题再这一行的等於符号,你将它变成比较关键字了了
而不是纳在字串里的一个字元,所以程式Compile成去判断
两组字串 "华氏" & c & "度" 和 "摄氏" & f & "度" 是
不是相等了(当然不相等罗,也就传回False罗)
正确的程式码应该是"度 = 摄氏"....
: End Sub
: End Class
: 这是我写的程式
: 可是执行後他转换出来却是 false
: 我不知道哪里出错
: 请各位大大帮帮忙!!!!!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 60.248.150.140
1F:→ mraaa:Button1_Click里面的该行也是一样的意思~~ 10/30 13:18
2F:推 zxcb:谢谢罗:) 11/01 21:48