①手机截屏
②用Windows自带的“画图”将“pic.bmp”“转换为“pic.jpg”
③用数码相机拍照
④用扫描仪扫描
Private Sub Command1_Click()
Dim s, j As Single ‘定义数据类型
s=Val(Text1.Text) ‘输入用电量
If s<=50 Then
j=s*0.538 ‘计算用电量小于等于50时的电费
Else
j=s*0.538+(s-50)*0.03 ‘计算用电量大于50时的电费
End if
Text2.Text=Str(j) ‘输出电费
End Sub
场景名:主界面 |
序号类别:2 |
进入方式:来自“片头”场景,通过“开始”按钮进入 |
呈现方式: 1、“垃圾”文字从舞台左上侧飞入,最终停在舞台中央(偏左)。 2、“分类”文字从舞台上侧飞入,旋转一圈后静止在“垃圾”右侧。 …… |
呈现顺序: 1、一开始出现城市背景,“垃圾”文字从舞台左上侧飞入,补间动画持续1秒,静止在舞台中央(偏左)。 2、动画开始1秒后,“分类”文字从舞台上侧飞入,补间动画持续1秒,静止在舞台中央(偏右)。 …… |
下列说法正确的是( )
Dim a(1 To 10) As Integer
Dim max As Integer
max=0
For i=1 To 10
If a(i)>max Then max=a(i)
Next i
Label1.Caption =“最大值是:”+ Str (max)
运行该程序时发现,当输入10个正整数时可以得到正确结果,但当输入10个负整数时结果错误。将上述程序段中相应语句仅进行一次更改,就可实现输入10任意整数都能得到最大值的结果,则下列修改正确的是( )
对于图中所示部分的文档,下列说法不正确的是( )
a(1) = 1: a(2) = 2
b(1) = 1: b(2) = 2
For i = 3 To 10
a(i) = a(i-1) + a(i-2)
b(i) = b(i-1) + a(i)
Next i
执行该程序段后,数组元素b(5)的值为( )