##通用对话框控件
1.文件对话框
**需要导入通用对话框控件：**
导入方式：Ctrl+T 找到"Microsoft Common Dialog Control"
ShowOpen 打开文件 ； ShowSave 保存文件
Filter 格式设定 格式Filter = "|说明1|格式1|说明2|格式2" \*代表所有
例:
```vb
CommonDialiog.Filter = "所有文件类型|*.*|文本文件|*.txt"
```
F- 阅读剩余部分 -
当有多选框时常会用到控件数组。控件数组的控件一般都放在框架中。
####创建控件数组：
1.创建了两个单选框控件
2.这两个控件的 (名称) 都是 "Option1"
 ** ：
**1.首先配置计时器计时间隔：（单位为毫秒，这里设置了100ms即0.1s）**
Interval 获得设置两次调用Timer空间的事件间隔秒数(毫秒计时)
**2.一般使- 阅读剩余部分 -
**垂直滚动条(HScrollBar)** ：
属性：
```vb
Min：设置滚动条最小值(Integer)
Max：设置滚动条最大值(Integer)
Value：滚动条当前的值
L- 阅读剩余部分 -
**复选框(Check) ** ：
属性：
```vb
Caption：设置复选框显示名称
Value：复选框勾选状态 0:没有勾选 1:已经勾选
```
实例1：
**标签 (Label) ** ：
属性：
```vb
Caption：设置标签显示的内容
ForeColor：设置字体颜- 阅读剩余部分 -
按钮(Command) ：设置点击按钮时才会触发的命令
属性：
```vb;
Caption：设置按钮"显示"的名称
Visible：设置按钮是否可见 True/False
Enable：设- 阅读剩余部分 -
##Sub过程(自定义函数)
```vb
Sub lesson()
for I =1 to 10
print i
next
End Sub
```
在按钮内：
lesson
##带参数设置sub：
(这是一个函数过程，因为有返回值)
```vb
Sub add(a as integer, b as integer)
print a +b
end sub
```
在按钮内：
call add(10,15)
##事件：
代码触发的条件
可以进入编辑器在右上角查看各控件的各种事件
##各种控件的通用常用事件：
####_Click(): 单击事件 ：
当鼠标单击该控件触发的事件
![](ht- 阅读剩余部分 -
####有三个函数可以用来获取日期与时间：
Now： 系统当前日期及时间
Date： 系统当前日期
Time： 系统当前时间
####格式化输出日期与时间：
print Format(函数,"格式")
函数：now、date、time
格式：
yyyy:年
m：月
d：日
hh:时
mm:分
ss:秒
####如何获取当前时间并且不断更新时间：
```vb
Timer：要设置时间间隔为1s- 阅读剩余部分 -
##if/else/else if：
格式1：
```vb
If 逻辑语句 Then
pass
else
pass
End If
```
格式2：
```vb
If 逻辑语句 Then
pass
else if 逻辑语句
pass
End If
```
##Select：
方法：多语句执行
格- 阅读剩余部分 -
