在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a-bb=t+aFun1=t+bEndFunctionPrivateSubCommand1_Click()DimxAsIntegerx=10PrintFun1(Fun1(x,(Fun1(x,x-1))),x-1)EndSub程序运行后,单击命令按钮,输出结果是()。
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a-bb=t+aFun1=t+bEndFunctionPrivateSubCommand1_Click()DimxAsIntegerx=10PrintFun1(Fun1(x,(Fun1(x,x-1))),x-1)EndSub程序运行后,单击命令按钮,输出结果是()。
A.10
B.0
C.11
D.21
正确答案:B
Tag:VisualBasic程序设计 按钮 命令
时间:2021-05-06 20:07:39
- 上一篇:以下是一个能返回数组a中最大数的函数过程代码:Functionmaxval(a()AsInteger)AsIntegerDimmax%max=1Fori=2To10Ifa(i)>a(max)Thenmax=iNextimaxval=maxEndFunctionPrivateSubCommand1_Click()Dimx(1To10)AsIntegerFori=1To10x(i)=Int(Rnd()100)Printx(i);NextiPrintPrintmaxval(x())EndSub程序运行时,
- 下一篇:下面程序的运行结果为()。Dima%,b%,c%Subp1(x%,y%)DimcAsIntegerx=2x:y=y+2:c=x+yEndSubSubp2(x%,ByValy%)DimcAsIntegerx=2*x:y=y+2:c=x+yEndSubPrivateSubCommand1_Click()a=2:b=4:c=6Callp1(a,b)Callp2(a,b)Printa;b;cEndSub