题目

[填空题]执行下面的程序,当输入3时,输出的结果是【11】
PrivatesubCommand1_Click()
i=2
j=InputBox("j=")
OnjGoTo20,30,40,50
i=i+2
20:i=i+2
30:i=i+2
40:i=i+2
50:i=i+2
Printi
EndSub

提示:未搜索到的试题可在搜索页快速提交,您可在会员中心"提交的题"快速查看答案。
答案
查看答案
相关试题

Photoshop是目前最常用的位图图像处理软件。

[填空题]下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填人适当的内容,将程序补充完整。
PrivateTypeAng
 KAsInteger
 SinxAsSingle
 CosxAsSingle
EndType
DimKscAsAng
PrivateSubForm_Click()
DimYAsSingle
 Open“c:Datal.txt”ForRandomAs#2Len=10
 Y=3.14159/180
 Fori=1To90
  Ksc.K=i
  Ksc.Sinx=Sin(i*Y)
  Ksc.Cosx=Cos(i*Y)
  ______
 Next
 Close#2
EndSub

教师不能对学科教学资源进行修改

[问答题]注意:下面出现的“考生文件夹”均为c:wexam25160001。(1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的。请在有号的地方填入正确内容,然后删除及所有注释符(即’号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在窗体上有3个名称分别为Text1、Text2和Text3的文本框,一个名称为C1,标题为“计算”的命令按钮,如图4-4所示。要求程序运行后,在Text1和Text2中分别输入两个整数,单击“计算”按钮后,可把两个整数之间的所有整数(含两个整数)累加起来并在Text3中显示。(2)在窗体上建立一个名称为Text1的文本框,建立一个名称为Cmd1,标题为“计算”的命令按钮,如图4-5所示。要求程序运行后,如果单击“计算”按钮,则求出100-200之间所有可以被3整除的数的总和,在文本框中显示出来,并把结果存入考生文件夹下的out.txt文件中。(在考生的文件夹下有一个mode.bas标准模块,该模块中提供了保存文件的过程putdata,考生可以直接调用。)注意:保存时必须存放在考生文件夹下,窗体文件名为sjt4.frm。工程文件名为sjt4.vbp,结果存入out.txt文件。
[填空题]有如下程序:
PrinvateSubForm_Click()
a=10
b=0
Do
b=b+a
a=a-2
LoopWhilea>2
Printb
EndSub
程序运行后,单击窗体,输出结果为______。
联系我们 会员中心
返回顶部