这个vb编程问题怎么做

来源:百度知道 编辑:UC知道 时间:2024/06/16 03:11:25
.空调的基本单价为2500,购买空调的价格随季节而不同。冬节购买优惠15%,春、秋季购买优惠8%,夏季购买不优惠。编写程序,输入季节与空调总数量,计算总价(数据由键盘输入)。
要求:
利用情况语句(select case)实现多分支选择结构
界面设计
要求用两个框架控件,frame1 中:option1 to option4
Frame2 中:command1.label1.label2.text1.text2.
运行图片如下:
谢谢了

private sub Command1_Click()
dim n as long,a as Double
a=2500 * n
select case
case option1.value
a=a * 0.92
case option2.value
a=a
case iption3.value
a=a*0.92
case option4.value
a=a * 0.75
end if
label1.caption=a
end sub

private sub Command1_Click()
dim n as long,a as Double
a=2500 * n
if option1.value or option3.value then
a=a * 0.92
elseif option4.value then
a=a * 0.75
end if
label1.caption=a
end sub