首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
为了计算下面的分段函数(其中x为整数) 某人编写了如下函数 Function fun(x As Integer)As Integer Dim y As Integer Select Case x Case x
为了计算下面的分段函数(其中x为整数) 某人编写了如下函数 Function fun(x As Integer)As Integer Dim y As Integer Select Case x Case x
admin
2020-04-18
1.5K+
问题
为了计算下面的分段函数(其中x为整数)
某人编写了如下函数
Function fun(x As Integer)As Integer
Dim y As Integer
Select Case x
Case x<0
y=x-2
Case 0
Y=x
Case1,2,3,4,5
Y=x*2
Case Else
Y=x+2
End Select
Fun=y
调试时发现有错误,需要修改,下面正确的修改方案是
选项
A、把case x < 0改为 case Is < 0
B、把Case 1, 2, 3, 4, 5 改为 Case 0
C、把 case 0 改为 case x = 0
D、把Case Else改为Case Is >= 6
答案
A
解析
多分支选择结构语句中,表达式列表中表达式的结构可以是值的形式,也可以是表达式To的形式,还可以是Is 关系运算表达式的形式,故正确答案为选项A。
转载请注明原文地址:https://www.kaotiyun.com/show/3ZTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.txt”ForInputAs#1:Open”c:\f2.txt”ForOutputAs#
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将fl.txt删除。命令按钮的单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.tx
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerRandomize
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load()Text1.Text=””:Textl.SetFocusEndSubPrivateSubForm_Click()Dim
设有如下程序:PrivateSubForm_Click0num=InputBox(”请输入一个实数”):P=InStr(num,”.”)Ifp>0ThenPrintMid(num,P+1)Else
有下面程序代码:PrivateSubCommand1Click()DimaAsStringa=“COMPUTER”n=so~eh(a,“T”):PrintUtln=0,“未找到”,n)EndSubPrivateFunction
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$=InputBox("请输入一个二进制数"):n=Len(a$)Fori=1TonDec=Dec*2+_
编写如下程序:PrivateSubCommand1Click()DimmAsInteger,nAsIntegexn=2Form=1To3
随机试题
Actingissuchanover-crowdedprofessionthattheonlyadvicethatshouldbegiventoayoungpersonthinkingofgoingonthes
杆菌肽敏感试验阳性为
在风险管理实践中,为了对不确定性收益进行计量和评估,通常需要计算未来的()。
需求量的变动是指()。
已知向量a=2i+3j-k,b=-i+j-2k,c=2ma一3ab,若c⊥x轴,则m=________.(用n表示)
下列关于奉献社会的说法,正确的有()。
不少父母在养育和教育孩子时,容易忽视孩子心理与行为发展的顺序渐进或个性需要,急切期望按照社会的模子去“克隆”一个好孩子,这种_______的做法会让许多孩子生出问题来。填入画横线部分最恰当的一项是:
如果剩余价值率不变,影响年剩余价值量的因素有
下列关于OSPF协议的描述中,错误的是()。
Ifyou’regoingtobesuccessfulinmanagingyourownbusiness,you’vegottolearnto______yourself.
最新回复
(
0
)