1、timer控件
设置时间间隔interval单位毫秒
1秒=1000毫秒
注意变量：“通用”中的变量为全局变量
提一下快捷键：
复制 ctrl+c
粘贴 ctrl+v
2、特殊符号作用的补充
分号;的作用：使得本次的print输出后不换行
3、数据类型：
字符串类型string
声明举例
声明字符串类型的变量str
dim str as String
声明整数类型的变量num
dim num as Integer
4、字符串截取mid函数使用方法
mid函数格式
mid(字符串,开始位置，截取长度）
注意：开始位置的最小值为1
Cls '清空界面上print输出的内容
end '结束程序
5、典型案例
逐字输出，典型打字案例源码：
Dim str As String Dim i As Integer 'i用来表示计数，输出了几个数字 Private Sub Form_Load() str = "泡澡真舒服！我爱洗澡皮肤好好！" i = 1 End Sub Private Sub Timer1_Timer() Cls '清空界面 Print Mid(str, 1, i) i = i + 1 End Sub
6、时钟控件的代码控制
让文字输出5遍源码：
If i < 5 Then Print "刘金玉编程，编程创造城市!" Else Timer1.Enabled = False End If i = i + 1
