参考：http://msdn.microsoft.com/zh-cn/library/ktwtk9ff%28v=VS.80%29.aspx
件
→ KeyPress事件的语法如下：
KeyANSI只是个参数，所以可以改成任何喜欢的名字，每键入一个值的时候，都会触发KeyANSI，通过设置，可以实现限制默写值的键入。
→ KeyDown事件 按下触发
→ KeyUp事件 松手触发
件
→ MouseMove事件
→ MouseDown事件 按下事件，左右键都可
→ MouseUp事件 松开鼠标事件
→ MouseClick事件 鼠标点击事件，右键不可
件
→MouseMove事件
→Initialize事件
Unload UserForm1 实现关闭窗体
件
常用函数
→ Instr(2, "eAlex", "e") 返回e在Alex中第一次出现的位置（从第1个字符开始算起，结果是4）
→ Round(34.566, 2) 返回前者保留2位小数的四舍五入结果
→ Int(34.43) 返回不大于此数的最大整数
→ Val("22.3") 转成数字
→ Left("Alex", 3) 左边3个字符
→ Mid("Alex", 1, 2) 索引1开始，长度为2的字符
→ Right("Alex.exe", 3) 右边3个字符
→ Asc("A") 返回一个 Integer，代表字符串中首字母的字符代码
→ Trim(" Alex ") 去除所有空格
→ LTrim(" Alex ") 去除左空格
→ RTrim(" Alex ") 去除右空格
→ Len("Sleep") 计算长度
→ CInt("123") 转成整型Integer
→ CStr(123) 转成字符型String
→ Space(2) 两个空格
→ r = Cells(Rows.Count, 1).End(xlUp).Row 获取内容的最后一行
Range("A1:A10").Select
Selection.Copy
Cells(2, 2).Select
ActiveSheet.Paste
Application.CutCopyMode = false '选区复制，然后黏贴，最后取出选区框
→ Workbooks.Open "F:\Desktop\1.xls" 打开文件
→ ActiveWorkbook.Close savechanges:=True 关闭文件，保存文件
→ ActiveWorkbook.SaveAs Filename:="F:\Desktop\2.xlsx" 另存为文件
TextBox控件
→ TextBox1.Text
→ TextBox1.SetFocus 将光标定位到TextBox1上
→ TextBox1.SelStart 指定选中文本的起点位置
→ TextBox1.MaxLength 文本框可输入的最长长度
→ TextBox1.MultiLine 多行
→ TextBox1.Top
→ TextBox1.Left
→ TextBox1.Width
→ TextBox1.Height
CommandButton控件
→ CommandButton1.Top
→ CommandButton1.Left
→ CommandButton1.Width
→ CommandButton1.Height
ListBox控件
→ ListBox1.ListIndex 选中文本的索引，-1为没选定，0为第一个
→ ListBox1.List(0) 第一个条目的内容
→ ListBox1.ListCount 条目数目
→ ListBox1.ListStyle 值为1是有选框的
→ ListBox1.MultiSelect 值为1可以多选
UserForm控件
→ UserForm1.Show
→ Unload UserForm1
ComboBox控件 → ComboBox1.List 可以直接用数组赋值
→ ComboBox1.ListIndex = 0 ComboBox上显示第一个文本
→ ComboBox1.Clear 去除上面所有内容
→ ComboBox1.AddItem "北京" 加入内容
MultiPage控件
→ MultiPage1.Value = 0 多页显示的时候显示第一页的内容
→ MultiPage1.SelectedItem.Index > 2 选中出了第一页以外的其他页
MultiPage控件与TabStrip控件的区别就在于前者每一页之间没有任何关系，而后者则是公用同一个页面，只是标签名称不同的~
TabStrip控件
→ TabStrip1.Value = 0 多页显示的时候显示第一页的内容
→ TabStrip1.SelectedItem.Caption 不同Tab的名称
→ TabStrip1.SelectedItem.Index 不同Tab的索引
→ TabStrip1.Style 有三个选择，默认是0，1是按钮形式的
Image控件
→ Image1.Picture = LoadPicture(FilPath) 加载图片，其中FilPath是图片的完整地址
Dim Arr As Variant
Dim r As Integer
r = Cells(Rows.Count, 1).End(xlUp).Row
Arr = Range("A1:A" & r)
ListBox1.List = ArrComboBox也有同样地用法~
