题目

[单项选择题]在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为()。OptionBase1PrivateSubfun(a()AsInteger,nAsInteger)ReDimPreservea(6)a(6)=a(1)*a(3)*a(5)n=UBound(a)EndSubPrivateSubCommand1_Click()Dimarr1()AsInteger,kAsIntegerReDimarrl(5)Fori=1To5arrl(i)=iNextik=6Callfun(arrl,k)Printarrl(1);arrl(k)EndSub
A.13
B.00
C.115
D.015

提示:未搜索到的试题可在搜索页快速提交,您可在会员中心"提交的题"快速查看答案。
答案
查看答案
相关试题
[填空题]窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请在程序空白处填入适当内容使程序完整。

PrivateSubForm_Load()
Picture1.Picture=LoadPicture("c:MyDocuments图片\Qian1_Icon02.ico")
______
EndSub
PrivateSubTimer1_Timer()
Staticx,yAsInteger
x=x+300
y=y+300
Picture1.Movex,y
EndSub
[单项选择题]下列运算符中,______不可以和字符类型数据组合成相应的运算表达式。
A.—
B.++
C.+
D.&&
[单项选择题]下列程序段的执行结果为______。x=5y=3IfNotx>1Theny=y+1Elsex=x-1Printx;y
A.53
B.54
C.34
D.43
[填空题]以下程序用来建立一个10*10矩阵,该矩阵两条对角线上的元素为1,其余元素为0,请补充完该程序。
该程序运行结果见下图。
PrivateSubForm_click()
Dims(10,10)AsInteger
Forn=1To10
Form=1To10
If【12】Or【13】Then
s(n,m)=1
Else
s(n,m)=0
EndIf
Nextm
Nextn
Forn=1To10
For【14】。
Picturel.PrintTab(m*3);s(n,m)
Nextm
Print
Nextn
EndSub
[填空题]对下列二叉树进行中序遍历的结果为(3)。
联系我们 会员中心
返回顶部