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  91
问题 下列程序的功能是：当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的值!")
     ________
   Case Is＜50
   　　y=0.8*x
   　Case 50 To 100
   　　y=0.7*K
     __________
   Print"输入的数据出界!"
   End Select
   Print x，y
   End Sub
选项
答案Select Case x Case Eles
解析
转载请注明原文地址:https://www.kaotiyun.com/show/71hp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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