Re: [VB6 ] 購票系統
※ 引述《littledofu (豆餅好吃)》之銘言:
: 我是vb新手,冒昧請問各位
: 我們作業要用visual basic 2005
: Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
: Dim X, Y, Z, C
: Z = (TextBox1.Text * 500+Textbox2.text*300)
: C = Z * 0.8
: X = MsgBox("你是會員嗎?", MsgBoxStyle.YesNo + MsgBoxStyle.Question)
: If X = MsgBoxResult.No Then
: MsgBox("票價為" & Z, "謝謝你的購買")
: Else
: Y = InputBox("請輸入會員帳號")
:
END if
:
小弟又有問題
如果我在textbox1跟textbox2都有打數字的話
程式就沒錯
如果我其中一格什麼都沒打
系統就會出錯
是因為空白不能*任何東西嘛?
如果是這樣
那該如何修改?
--
◢ _▃_ 誰又能忍受自己女友是百人斬呢???? ╔═════════════╗
█ 囧 誰又能忍受自己女友是百人斬呢???? ║ ║
] /■\ 誰又能忍受自己女友是百人斬呢???? ║ 門的另一端,世界的真實。 ║
█ || 4P還能不滿足妳嗎○ ○ ║ ║
◤◥◣◥◣ (|\ /|) 唔..終於突破100人次 gayb/cAshoNly║
◥██◣ /`Sr○'\ ╚═════════════╝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.140.127.117
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章