搜题
题目
[填空题]下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示【10】行数据，其中第2行和第3行的数据分别是【11】和【12】。
OptionBase1
PrivateSubCommand1_Click()
Dima，sAsString，iAsInteger
a=Array(1，3，5，7，2，4，6，8)
s=""
Fori=1ToUbound(A)
s=s+Str(a(i)+i)+vbCrLf
Nexti
Text1.Text=s
EndSub
提示：未搜索到的试题可在搜索页快速提交，您可在会员中心"提交的题"快速查看答案。
答案
查看答案
搜题
相关试题
[填空题]以下程序代码实现单击命令按钮Command1时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。Dimarr(1To20)Fori=1To20arr(i)=【12】NextiSum=0ForEachXIn【13】IfX＞50ThenPrintTab(20)；XSum=Sum+XEndIfNextXPrintTab(20)；“Sum＝”；Sum
[单项选择题]J2EE和______语言绑定。
A．C
B．C++
C．Java
D．汇编语言
A．C
B．C++
C．Java
D．汇编语言
[填空题]有如下函数过程。
FunctionUNC(ByValxAsInteger，ByValyAsInteger)AsInteger
DoWhiley＜＞0
S=x/y
x=y
y=S
Loop
UNC=x
EndFunction
以下事件调用该函数，程序运行结果是【7】。
PrivateSubCommand1_Click()
DimaAsInteger
DimbAsInteger
a=12
b=2
x=UNC(a，b)
Printx
EndSub
FunctionUNC(ByValxAsInteger，ByValyAsInteger)AsInteger
DoWhiley＜＞0
S=x/y
x=y
y=S
Loop
UNC=x
EndFunction
以下事件调用该函数，程序运行结果是【7】。
PrivateSubCommand1_Click()
DimaAsInteger
DimbAsInteger
a=12
b=2
x=UNC(a，b)
Printx
EndSub
[填空题]在窗体上画一个命令按钮，然后编写如下事件过程，程序运行后，单击命令按钮，输出结果是【15】
PrivateSubCommand1_Click()
Dima(1To10)
Dimp(1To3)
k=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
Nexti
Fori=1To3
k=k+p(i)*2
Nexti
Printk
EndSub
PrivateSubCommand1_Click()
Dima(1To10)
Dimp(1To3)
k=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
Nexti
Fori=1To3
k=k+p(i)*2
Nexti
Printk
EndSub
[填空题]设一棵完全二叉树共有700个结点，则在该二叉树中有【3】个叶子结点。