窗体上有1个名称为Commandl的命令按钮，事件过程如下： Private Sub Commandl_Click() Dim num As Integer,x As Integer num=Val(InputBox(”请输入一个正整数

admin2018-10-15 64

问题窗体上有1个名称为Commandl的命令按钮，事件过程如下：
  Private Sub Commandl_Click()
Dim num As Integer,x As Integer
num=Val(InputBox(”请输入一个正整数”))
Select Case num
   Case Is>100
      x=x+num
Case Is<90
      x=num
Case Else
      x=x*nam
End Select
Print x：
End Sub
运行程序，并在三次单击命令按钮时，分别输入正整数100、90和60，则窗体上显示的内容为

选项 A、0 0 0
B、0 0 60
C、0 90 0
D、100 0 60

答案B

解析多分支控制结构又称为Select Case语句或Case语句，可以同时对条件的多个取值来判断。其格式为：
Select  Case  <测试表达式>
   [Case<表达式列表1>]：  [语句块1]
   …
   [Case  Else]：  [语句块n]
End-Select
本题中第一次输入100执行Case Else分支，由于x是默认初值0所以输出0；第二次输入90也执行Case Else分支，由于x是默认初值0所以输出0；第三次输入60执行第二个分支输出60。

转载请注明原文地址:https://kaotiyun.com/show/0FFp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

窗体上有1个名称为Commandl的命令按钮，事件过程如下： Private Sub Commandl_Click() Dim num As Integer,x As Integer num=Val(InputBox(”请输入一个正整数

二级VB

NCRE全国计算机二级

假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是(　　)。

在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为(　　)。

在窗体上画一个文本框、一个标签，其名称分别为Text1、Label1，然后编写如下事件过程：PrivateSubText1_Change()Label1.Caption=UCase(Mid(Trim(Text1.Text),7,3))

窗体上有一个名称为Command1的命令按钮，编写如下事件过程：PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin

下面关于控件数组的叙述中正确的是

以下语句或子句中，符合VisualBasic语法要求的是

设窗体、框架、图片框（PictureBox）、图像框（Image）的名称分别是Form1、Frame1、Picture1、Image1，有下面4条语句：①Form1.Print"VB"②Frame1.Print"VB"③Picture

以下关于图片框控件的说法中，错误的是(　　)。

以下说法中正确的是()。

下列说法中，错误的是(　　)。

减少磺胺类药物在泌尿系析出结晶：增强呋喃妥因在泌尿系的抗菌活性：

钩体病的治疗措施为

合同终止的原因主要有()。

根据《环境影响评价技术导则一地下水环境》，I类建设项目应重点评价（）。

某商业企业采用售价金额核算法计算期末存货成本。本月月初存货成本为30000元，售价总额为45000元；本月购入存货成本为150000元，相应的售价总额为180000元；本月销售收入为120000元。则该企业本月销售成本为()：元。

老字号：新品牌：传承

电子支付工具包括：电子信用卡，电子支票和【　　】。

在名称为Form1、标题为“学生出勤情况”的窗体上画1个名称为Frame1的框架控件，其标题内容为“请选择”；再向框架内画5个名称分别为Option1、Option2、Option3、Option4、Option5，标题文字分别为“旷课”、“迟到”、“早退

Afewmonthsback,DesalegnGodebo’swifedescendedintoafeverishdelirium."Itwasasifsheweremad,“hesaid,shudderinga

窗体上有1个名称为Commandl的命令按钮，事件过程如下： Private Sub Commandl_Click() Dim num As Integer,x As Integer num=Val(InputBox(”请输入一个正整数

二级VB

NCRE全国计算机二级

假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是( )。

在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为( )。

在窗体上画一个文本框、一个标签，其名称分别为Text1、Label1，然后编写如下事件过程：PrivateSubText1_Change()Label1.Caption=UCase(Mid(Trim(Text1.Text),7,3))

窗体上有一个名称为Command1的命令按钮，编写如下事件过程：PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin

下面关于控件数组的叙述中正确的是

以下语句或子句中，符合VisualBasic语法要求的是

设窗体、框架、图片框（PictureBox）、图像框（Image）的名称分别是Form1、Frame1、Picture1、Image1，有下面4条语句：①Form1.Print"VB"②Frame1.Print"VB"③Picture

以下关于图片框控件的说法中，错误的是( )。

以下说法中正确的是()。

下列说法中，错误的是( )。

减少磺胺类药物在泌尿系析出结晶：增强呋喃妥因在泌尿系的抗菌活性：

钩体病的治疗措施为

合同终止的原因主要有()。

根据《环境影响评价技术导则一地下水环境》，I类建设项目应重点评价（）。

某商业企业采用售价金额核算法计算期末存货成本。本月月初存货成本为30000元，售价总额为45000元；本月购入存货成本为150000元，相应的售价总额为180000元；本月销售收入为120000元。则该企业本月销售成本为()：元。

老字号：新品牌：传承

电子支付工具包括：电子信用卡，电子支票和【 】。

在名称为Form1、标题为“学生出勤情况”的窗体上画1个名称为Frame1的框架控件，其标题内容为“请选择”；再向框架内画5个名称分别为Option1、Option2、Option3、Option4、Option5，标题文字分别为“旷课”、“迟到”、“早退

Afewmonthsback,DesalegnGodebo’swifedescendedintoafeverishdelirium."Itwasasifsheweremad,“hesaid,shudderinga

假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片(注意，清除图片，而不是删除图片框)，应采用的正确方法是(　　)。

在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为(　　)。

以下关于图片框控件的说法中，错误的是(　　)。

下列说法中，错误的是(　　)。

电子支付工具包括：电子信用卡，电子支票和【　　】。