有如下函数过程:Functionsecproc(xAsInteger,yAsInteger,zAsInteger)secproc=3y+z+2xEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4Printsecproc(c,b,a)EndSub该程序的运行结果是()。
有如下函数过程:Functionsecproc(xAsInteger,yAsInteger,zAsInteger)secproc=3y+z+2xEndFunctionPrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=3:c=4Printsecproc(c,b,a)EndSub该程序的运行结果是()。
A.17
B.18
C.19
D.20
正确答案:C
Tag:VisualBasic程序设计 函数 过程
时间:2021-05-06 20:07:27
- 上一篇:假定有以下函数过程:FunctionFun(sAsString)AsStringDims1AsStringFori=1ToLen(s)s1=UCase(Mid(s,i,1))+s1NextiFun=s1EndFunction在窗体上添加一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimStr1AsStringDimStr2AsStringStr1=InputBox(“请输入一个字符串”)Str2=Fun(Str1)PrintStr2EndSub程序运行后,单击命
- 下一篇:有如下函数过程:FunctionCys(ByValxAsInteger,ByValyAsInteger)AsIntegerDimquotientsDoWhiley<>0quotients=x/yx=yy=quotientsLoopCys=xEndFunction以下是调用该函数的事件过程,该程序的运行结果是()。PrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegera=10b=2x=Cys(a,b)PrintxEndSub