作者littledofu (郭妈饶我ㄧ命)
看板Visual_Basic
标题Re: [VB6 ] 购票系统
时间Thu Apr 20 15:01:01 2006
※ 引述《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