文档介绍:第二章 程序设计基础
程序的选择结构
问题
某图书城书籍促销,一次购买100元以上书籍8折,100元以下9折。
一、画出流程图
开始
输入钱数X
X>=100
Y=X*
Y=X*
是
否
输出折后钱数Y
结束
1. 条件语句的格式
二、条件语句
If 条件 Then 语句组1 Else 语句组2
或 If 条件 Then
语句组1
Else
语句组2
End If
某图书城书籍促销,一次购买100元以上书籍8折,100元以下9折程序。
Private Sub Command1_Click( )
Dim X As Single, Y As Single
X = InputBox("X=", "输入钱数")
If X >= 100 Then
Y = X *
Else
Y = X *
End I