2. 计算机
  3. 下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。 Private Sub Command1_Click() Dim x As Single 　x=InputBox("

下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。 Private Sub Command1_Click() Dim x As Single 　x=InputBox("

admin2012-03-22  56
问题 下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。
   Private Sub Command1_Click()
   Dim x As Single
   　x=InputBox("请输入x的值!")
   　Select Case x
   　　Case Is＜50
   　　　　y=0.8*x
  　 　Case 50 To 100
  　　　 　y=0.7*x
   　　______
   　　Print"输入的数据出界!"
   　End Select
   　Print x,y
   End Sub
选项
答案Case Else
解析 [命题目的] 考查考生对多分支控制结构的掌握。
   [解题要点] 阅读程序后，在Select case结构中，只有两个Case子句，分别表示x取值的两种情况，但题目中将x的值分为3种情况，空白处应该填写case Else语句。
   [错解分析] 嵌套使用多分支控制结构时，应注意程序执行过程。
   [考点链接] Select Case…End Select多分支结构语句应用。
转载请注明原文地址:https://kaotiyun.com/show/X1hp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)