实验报告02 :VB程序设计基础,使用dim方法写出VB语句 定义X为整型变量

1、（1） Dim x As Integer '整型变量

Dim y As Long '长整型变量

Dim z As Single '单精度浮点型变量

Dim str As String '字符型变量

（2） Static sum As Integer '整形静态型变量

（3） Public f As Integer'整形全局变量

2、Integer(整型)数据的取值范围：-32768 ~ +32767

3 、 取出 x 的值，加1以后赋值给 x

可改写成: y = x

x = y + 1

4、 [-9,9]的随机整数 x = Int(19 * Rnd -9)

请参考采纳！谢谢！

sub command1_click()

command2.enabled=true

command1.enabled=false

timer1.enabled=true

end sub

sub command2_click()

command1.enabled=true

command2.enabled=false

timer1.enabled=false

end sub

sub timer1_timer()

image1.left=iif(image1.left>=me.scalewidth,0,image1.left+10)

end sub

sub hscroll1_change()

timer1.interval=hscroll1.value

end sub

---