chap5（选择结构程序设计）.pptVIP

select case s case is250 : d=0 case is500 : d=0.02 case is1000 : d=0.05 case is2000 : d=0.08 case is2000 : d=0.1 end select f=p*w*s*(1-d) Text1.text=str$(p) : Text2.text=str$(w) Text3.text=str$(s) : Text4.text=str$(f) End sub 思考：将所有case条件逆序，行吗? 选择结构课堂练习 用户从键盘上输入某字符，编写程序对其进行判断是大写字母、小写字母还是数字。 如果是其他字符，则原样输出。 * Else子句为可选项 * * * * * Hour( ) 计算小时，返回0~23之间的一个整数。 Time( ) 提取计算机系统中的当前时间。 * * * * * * * * * * * * Visual Basic程序设计教程 * Visual Basic程序设计教程 * Visual Basic程序设计教程 * Visual Basic程序设计教程 * Visual Basic程序设计教程 * Visual Basic程序设计教程 * Visua