Re: [.NET] 程式碼這樣寫有問題?

看板Visual_Basic作者pinkykk (哇哈哈)時間15年前 (2011/01/10 10:25)推噓3(3推 0噓 8→)

留言11則, 5人參與討論串2/3 (看更多)

※ 引述《moneyegg (老爺)》之銘言： : VB2008 : 小弟做了一份作業 : 例如幫某某片商寫租片軟體 : 然後要在軟體裡面設計一個租超過五片就自動打95折的系統 : 那小弟目前是這樣寫 : Public Class Form1 : Dim a As Integer : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As : System.EventArgs) Handles Button1.Click : a = 0 : If CheckBox1.Checked = True Then : a = a + TextBox2.Text * Label3.Text : End If : If CheckBox2.Checked = True Then : a = a + TextBox3.Text * Label4.Text : End If : If CheckBox3.Checked = True Then : a = a + TextBox4.Text * Label5.Text : End If : If Label3.Text + Label4.Text + Label5.Text > 5 Then : a = a * 0.95 : TextBox1.Text = a : End If : End Sub : End Class : 可是不管怎麼樣租幾片他都會跑去打95折 QQ : 小弟的95折選項不是以經給它設立條件了嗎? : 請問為什麼還會出現這種問題? : 我不是來偷雞問作業 : 我是真的用我的方法去做可是出現問題 QQ 從文章看來 Textbox2~Textbox3應該是指價位，Label3~Label5是指數量 Textbox1是最終價錢的總和，問題可能是出在最後一段， If Cint(Label3.Text) + Cint(Label4.Text) + Cint(Label5.Text) > 5 Then a = a * 0.95 End If TextBox1.Text = a.toString 試試看^^" -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.240.180.210

推

UniFish

01/10 10:56, , 1^F

01/10 10:56, 1^F

→

pinkykk

01/10 11:18, , 2^F

01/10 11:18, 2^F

→

pinkykk

01/10 11:19, , 3^F

01/10 11:19, 3^F