将通用对话框Commondialog1的类型设置为"字体"对话框,可调用对话框的()方法
A.ShowOpen
B.ShowSave
C.ShowColor
D.ShowFont
A.ShowOpen
B.ShowSave
C.ShowColor
D.ShowFont
第1题
Line(100,100)-(400,400)将在窗体中的( )画一条直线
A.(200,200)到(400,400)
B.(100,100)到(300,300)
C.(100,100)到(500,500)
D.(100,100)到(400,400)
第2题
通过设置Shape控件的( )属性来确定是何种封闭图形
A.Shape
B.Borderstyle
C.FillStyle
D.Style
第3题
若要再窗体代码编辑器的"通用声明"部分定义窗体模块级Sub过程,则正确的语句是( )
A.PublicSub
B.PublicFunction
C.PrivateSub
D.PrivateFunction
第4题
设置标签对象的边框类型的属性是( )
A.Drawstyle
B.Borderstyle
C.DrawWidth
D.ScaleMode
第5题
把字符串函数:string(3,"abc")的结果为( )
A.aaa
B.bbb
C.ccc
D.abc
第6题
要退出Do…Loop循环,可使用的语句是( )
A.Exit
B.ExitFor
C.Do
D.ExitDo
第7题
按照变量的作用域可将变量划分为( )
A.公有、私有、系统
B.全局变量、窗体/模块级变量、局部变量
C.动态、常数、静态
D.Public、Private、Protected
第8题
下面程序的输出结果为( )
PrivateSubCommand1_Click()
Dima%(1To5),b%(2To10),i%,t1#,t2#
Fori=1To5
a(i)=i
Nexti
t1=tim(a())
Print"t1=";t1
EndSub
Functiontim(a()AsInteger)
Dimt#,i%
t=1
Fori=LBound( )ToUBound( )
t=t*a(i)
Nexti
tim=t
EndFunction
A.t1=10
B.t1=12
C.t1=120
D.120
第9题
以下程序:
PublicSubSwap1(ByValxAsInteger,ByValyAsInteger)
DimtAsInteger
t=x:x=y:y=t
EndSub
PublicSubSwap2(xAsInteger,yAsInteger)
DimtAsInteger
t=x:x=y:y=t
EndSub
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=10:b=20
Swap1a,b
Print"A1=";a,"B1=";b
a=10:b=20
Swap2a,b
Print"A2=";a,"B2=";b
EndSub
当单击命令按钮后,窗体上输出的结果是( )
A.A1=20B1=10A2=10B2=20
B.A1=10B1=20A2=20B2=10
C.A1=10B1=20A2=10B2=10
D.A1=20B1=20A2=20B2=10
第10题
以下程序段:
Functionjishu1(x!,eps#)AsDouble
Dimn%,s#,t#
n=1:s=0:t=1
DoWhile(Abs(t)>=eps)
s=s+t
t=t*x/n
n=n+1
Loop
jishu1=s
EndFunction
Subjishu2(s#,x!,eps#)
Dimn%,t#
n=1:s=0:t=1
DoWhile(Abs(t)>=eps)
s=s+t
t=t*x/n
n=n+1
Loop
EndSub
PrivateSubCommand1_Click()
Dimf1#,f2#
f1=jishu1(2#, 0.000001)
Calljishu2(f2,2#,0.000001)
Print"f1=";f1,"f2=";f2
EndSub
对程序说法正确的是( )
A.计算jishu1是调用子过程,而计算jishu2是调用函数
B.当程序运行单击命令按钮后,窗体中显示的f1和f2的结果不相同
C.当程序运行单击命令按钮后,窗体中显示的f1和f2的结果相同
D.以上说法都不正确
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!