这个vb编程问题怎么做

来源：百度知道 编辑：UC知道 时间：2024/06/16 04:47:39
.空调的基本单价为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