学进去-教育应平等而普惠
试题
类型:填空题
难度系数:0.15
所属科目:高中信息技术
每次将一张白纸沿垂直和水平中线对半撕成四张纸片,然后取其中一张纸片照这样再撕成四张纸片,一直这样下去,计算撕了n次后纸片的总张数,现在要用VB来实现该程序。程序界面及功能如下图所示,在文本框中输入撕的次数,单击计算按钮,显示纸片数。

请完善并改正下面的程序代码:
Private Sub Command1_Click()
Dim i, n, s As Integer
n =" Val(Text1." Caption)   ‘① 获得撕纸片的次数
s=1                  ‘s为纸片数,初始时为1
For i =" 1" To n
  ②               ‘计算撕了n次后的纸片数量
Next i
Label2.Caption = Str(s)      显示最终的纸片数
End Sub
注释①所在行语句中有错误,应改为_____________
在横线②中填入正确的语句_______________
在用VB设计应用程序时,一般经历的阶段的正确顺序是__________(填字母顺序)
a 运行调试程序                    b 问题和算法分析
c 应用程序界面设计                 d 事件处理过程代码编写
编辑解析赚收入
收藏
|
有奖纠错

同类型试题

优质答疑

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19
我要答疑
编写解析
解析:

奖学金将在审核通过后自动发放到帐

提交
我要答疑
我要答疑:
提交