VB中的常用命令
VB常用命令大全
常用命令FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。
FontItalic属性是逻辑型，决定对象上正文是否是斜体。
窗体的其它常用属性2．Icon 控制图标属性：返回或设置窗体左上角显示或最小化时显示的图标。
注意：此属性必须在ControlBox属性设置为Ture才有效3．ControlBox控制菜单框属性：设置Ture为有，如设置为False则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture。
5. BorderStyle：边框风格, 通过改变BorderStyle 属性，可以控制窗体如何调整大小。
0-None：无边框；1-Fixed Single：单线边框，不可以改变窗口大小；2-Sizable：双线边框，可以改变窗口大小；3-Fixed Double：双线框架，不可以改变窗口大小。
4-Fixed Tool Window:窗体外观与工具条相似。
有关闭按钮，不可以改变窗口大小。
5-Sizable Tool Window：窗体外观与工具条相似。
有关闭按钮，可以改变窗口大小。
6. WindowsState属性用来设置窗体的运行状态。
0-Normal：正常窗口状态，有窗口边界；1-Minimized：最小化状态，以图标方式运行；2-Maximized：最大化状态，无边框，充满整个屏幕。
7. AutoRedraw属性该属性决定窗体被隐藏或被另一窗口覆盖之后，是否重新还原该窗体被隐藏或覆盖以前的画面。
即是否重画如Circle、Line、Pset和Print等方法的输出。
当为True时，重新还原该窗体以前的画面。
当为False时，则不重画AutoRedraw属性。
4 Resize事件无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件。
5 Activate事件：当窗体由非活动窗体变为活动窗体，即当窗体得到焦点时触发该事件。
VISUAL BASIC 常用语句74条详解
首先打开 Microsoft Excel，然后运行程序，单击命令按钮，你将看到 Excel 变成活动窗 体。
下面示例用 Shell 函数启动 Microsoft Excel，然后用 AppActivate 语句来激活 Microsoft Excel。在运行程序前，首先找到 Microsoft Excel 的路径，并关闭 Excel。
元素，以及释放动态数组的存 23
储空间。
模拟错误的发生。
23
定义用户自定义的事件。
24
提前退出控制结构、循环或过
程的语句体。
26
3
20 FileCopy 语句
复制一个文件。
27
21 ForEach...Next 语句
针对一个数组或集合中的每个
元素，重复执行一组语句。
28
22 For...Next 语句
建立一标准工程，在窗体上添加一命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click() On Error GoTo ErrorHandler '发生错误转到错误处理入口
MsgBox "程序运行" Exit Sub '程序运行完毕，没有错误退出程序 ErrorHandler: '错误处理入口 Beep '发出声响。 MsgBox "出错" End Sub
13 Do...Loop 语句
14 End 语句 15 Enum 语句 16 Erase 语句 17 Error 语句 18 Event 语句 19 Exit 语句
VB命令按钮常用属性
VB命令按钮常用属性命令按钮通常用来在它的单击事件中完成一种特定的程序功能。
尽管其他控件的单击事件也可以做同样的事情，但使用命令按钮已经成为Windows应用程序的风格。
熟悉Windows 的人都知道，单击命令按钮就会完成程序提供的一个功能。
因此，向用户提供的服务功能通常都以命令按钮的形式出现在用户界面中。
常用属性命令按钮的基本属性：Name、(：aption、Height、Width、Top、Left、Enabled、Visible、FontName、FontSize、FontBold、FontI—talic、FontUnderline等。
命令按钮特有属性：Default、Cancel、Style、Picture、DownPicture、DisabledPicture、MaskColor、IJseMaskColor和ToolTipText属性。
(1)Default属性如果一个命令按钮的Default属性设置为Tme，则不论焦点在窗体的哪个控件上，只要用户按Enter键，就产生这个按钮的单击事件。
在一个窗体中，只允许一个命令按钮的Default 属性被设置为True，当把一个命令按钮的Default属性设置为‘Frue，会自动将其他命令按钮的Default属性设为False。
(2)Cancel属性如果一个命令按钮的Cancel属性设置为True，则不论焦点在窗体的哪个控件上，只要用户按Esc键，就产生这个按钮的单击事件。
在一个窗体中，只允许一个命令按钮的Cancel 属性被设置为True，其他命令按钮的Cancel属性将自动设为False。
本人首发中国自学编程网，通常在该按钮的Click事件中完成的是退出或取消之类的操作。
(3)Style属性Style属性决定命令按钮中是否可以显示图形。
如果设置为0，则不显示图形只显示标题；如果设置为1，则可同时显示文本和图形。
(4)Picture属性该属性可以给命令按钮指定一个图形。
Vb指令12
Vb指令12Vb指令第2章Visual Basic6.0语言基础（1）Dim str1As String*5'定义限定字符串长度（2）自定义数据类型Private Type Employee04empName As String'职员姓名05empAge As Integer'职员年龄06empAddr As String'职员住址07End Type（3）Const dateRem As Date=#1/10/2008#可以赋值（只定义在自己的事件里）a)Dim<变量名>[As<常数的数据类型>]b)Static<变量名>[As<常数的数据类型>]c)Private/Dim<变量名>[As<常数的数据类型>]d)Public<变量名>[As<常数的数据类型>]第3章程序控制结构(1)Print Tab(15);"ID";Tab(26);"姓名";Tab(36);"工资"'打印表头（2）05Print Tab(14);String(27,"-")'打印分隔符选择1．If…Then语句2．If…Then…Else语句3．If…Then…ElseIf…Else语句4．IIf函数嵌套5．If语句的嵌套Select Case语句Is、To关键字的使用循环While…Wend语句For…Next语句For Each…Next语句While型Do…Loop语句Until型Do…Loop语句GoTo语句、Exit语句、End语句、With语句及第4章数组（1）Dim A(1T o10)As Integer'定义数组A，其下标从1到10（2）Public|Private|Dim|Static数组名()[As数据类型]（3）ReDim[Preserve]数组名(下标)[As数据类型]（4）Print Tab(5);"平均成绩："&Format(average,"##.00")控制输出格式（5）Randomize'初始化随机数生成器A(i,j)=Int((99-10+1)*Rnd+10)（6）Dim A()As StringReDim A(1T o5)(定义动态数组)（7）ReDim Preserve A(1To6)'Preserve保护原有数据不被破坏第5章过程和函数（1）传值调用ByVal（2）传址调用ByRef（3）Sub过程实质上是一组具有一定功能的代码块（4）Function过程是一个具有数据类型和返回值的过程第6章应用程序用户界面一。
VB常用快捷键
VB常用快捷键窗体设置，控件布局时用:alt+v+x可以快速显示出工具框Alt+P+N 引用ctrl+左右键头可以移动控件shift+左右键头调整控件大小F7 切换到编辑窗口Shift+f7 切换代码窗口开发代码，调试代码都能用的：Ctrl+C复制Ctrl+V粘贴Ctrl+X剪贴Ctrl+F查找开发代码时用的:Tab 向右推Shift+Tab 向左推Ctrl+H 替换Ctrl+J 呵呵，有点显丑。
有几个函数。
老要看总是记不住，呵呵（Alt+→）ctrl+home jump to 首行ctrl+end jump to 末尾调试时使用的：F5 运行F8 断点运行F9 设置/清除断点Ctrl+G 立即窗口Shift+F2 到定义处Ctrl+Shift+F9 清除所有断点Ctrl+shift+F2 到上次编辑处Ctrl+PauseBreak 强行暂停程序（专门对付死循环之类的）shift+F9 可以监视表达式Ctrl+W 编辑监视窗口Ctrl+n n Enter 偶经常要另开一个程序先做试验，你们可能很少用吧？呵呵以上几个，是我使用中最多的。
当然。
其它的我也有使用。
如:Ctrl+J(所选控件置前),Ctrl+J(所选控件置底),F7，Shift+F4还有那些Windows通用的那些快捷键:Ctrl+C,Ctrl+V ，哈哈，这二个快捷键，偶好像使用次数。
也可以在所有使用快捷中前几名呢!哈哈!1、F1：显示MSDN帮助。
当然你要安装MSDN，否则得不到真正的帮助了2、F2：显示对象浏览器。
这里你可以看到对象的各种属性、方法与事件3、F3：查找一下个满足条件的内容4、F4：显示当前选中控件的属性窗体5、F5：运行程序（则是F8了）6、F7：由窗体设计切换到对应的代码窗体7、F8：单步执行程序8、F9:切换断点9、Alt+A:打开外接程序菜单10、Alt+D:打开调试菜单11、Alt+E:打开编辑菜单12、Alt+F:打开文件菜单13、Alt+H:打开帮助菜单14、Alt+I:打开图表菜单15、Alt+O:打开格式菜单16、Alt+T:打开工具菜单17、Alt+P:打开工程菜单18、Alt+R:打开运行菜单19、Alt+U:打开查询菜单20、Alt+Q:退出21、Alt+V:打开视图菜单22、Alt+W:打开窗口菜单23、Alt+→:根据输入的字符检索出可以使用的关键字24、Tab:让选中的代码，集休缩进25、Shift+F2：查看当前光标所在的变量或函数、子过程的定义。
wincc中常用的vb指令
在WinCC中，常用的VB指令有很多，以下是一些常见的示例：
1. **ScreenItems**：这个函数用于获取屏幕上的项目。
例如，你可以使用`ScreenItems(圆1)`来获取名为"圆1"的项目。
2. **HMIRuntime.Screens**：这个函数用于获取要操作的窗体。
例如，你可以使用`HMIRuntime.Screens(Home1)`来获取名为"Home1"的窗体。
3. **Set**：这个函数用于设置对象的属性。
例如，你可以使用`Set objCircle= ScreenItems(圆1)`来获取名为"圆1"的项目并将其赋值给`objCircle`变量。
4. **InStr**和**InStrRev**：这两个函数都在主字符串中搜索子字符串，并返回找到的子字符串在主字符串中出现的位置。
不同之处在于，InStr从左到右搜索，而InStrRev从右到左搜索。
以上只是WinCC中VB指令的一部分，还有很多其他的指令和函数可供使用，具体取决于你的需求和场景。
VB常用代码
y = - x
ElseIf x < 5 Then
y = 2 * x + 3
Else
y = 3 * x - 1
End If
多分支选择结构语句
Case 6
Text2.Text = "及格"
Case 0 To 5
Text2.Text = "不及格"
End Select
IIf 函数
循环结构程序设计
While 条件表达式
Static sum As Double -留过程中变量的结果
模块级变量
顶部用Dim或 Private 声明
Dim x As Integer
Private y As Single
全局变量
顶部用Public
私有过程
Private Sub/Function -本模块内被调用
9. Exp（x）函数 -返回以e为底的x幂值
10. Sin（x），Cos（x），Tan（x），Atn（x）
数据类型转换函数
CCur（表达式） 转为 Current 类型
CDbl（表达式） 转为 Double 类型
CInt（表达式） 转为 Integer 类型
CLng（表达式） 转为 Long 类型
打怪 BE SEND 命令
---------------VB代码
hwd = a.获取游戏进程句柄值("植物大战僵尸中文版.exe")
b.Pushad'进堆栈
b.Push -1 '压入一个技能ID参数--这个是CALL的参数
VB方法使用大全
VB方法使用大全VB（Visual Basic）是一种广泛使用的编程语言，用于开发Windows应用程序。
在VB中，可以创建各种不同类型的方法来执行特定的任务。
以下是一些常见的VB方法：1. Sub 方法：Sub方法用于执行一系列操作，但不返回任何值。
它通常用于执行一些功能或改变对象的状态。
2. Function 方法：Function方法与Sub方法相似，但它返回一个特定的值。
可以使用Return语句来指定返回的值。
3. Public 方法：Public方法是公共方法，可以在整个项目中访问。
可以通过创建一个实例来调用这些方法。
4. Private 方法：Private方法是私有方法，只能在定义它们的类中访问。
它们通常用于辅助公共方法或执行类内部的任务。
5. Protected 方法：Protected方法是受保护的方法，可以在定义它们的类及其子类中访问。
它们提供了一种继承机制，允许子类重写和扩展该方法。
6. Overloaded 方法：VB允许在同一个类中创建多个方法具有相同的名称，但具有不同的参数列表。
这叫做方法重载。
根据提供的参数，编译器将找到并调用匹配的方法。
7. Shared 方法：Shared方法是静态方法，与特定的实例无关。
可以直接通过类名调用这些方法，而无需创建实例。
8. Virtual 方法：Virtual方法是虚方法，可以在派生类中进行重写。
这提供了一种多态性的机制，允许基类的方法在派生类中具有不同的实现。
9. Abstract 方法：Abstract方法是抽象方法，只能在抽象类或接口中定义。
它们没有具体的实现，而是必须在派生类中进行实现。
10. Event 方法：Event方法用于处理事件的发生。
可以使用AddHandler语句将方法与特定的事件关联起来。
11. Recursive 方法：递归方法是一种调用自身的方法。
递归方法通常用于解决问题，其中问题的解决方法可以通过自身的较小实例来表示。
vb语句大全
Beep语句
描述：通过计算机喇叭发出声音。 一、语法：
Beep 二、说明：
呼叫的频率与时间长短取决于硬件和系统软件，并随计算机不同而不同。 三、应用举例：
在调试程序时，有时需要在发生错误时发出音响。本例在程序运行时，如果某一步发生 错误，则转到错误处理入口，使用 Beep 语句让计算机发出响声，同时 MsgBox 函数将提示 错误。
必需的。文字，其它常量，或由除 Is 之外的任意的算术操作符和逻辑操作符所 expression 构成的任意组合。
二、说明： 对于程序中多次出现的数值、文字等最好使用常量，这样在程序运行时不易出错。常量
可以使程序更具可读性，以及易于修改。 在缺省情况下常量是局部的。在 Sub、Function 或 Property 过程中声明的常量都是该过
用 AppActivate 语句时必须打开应用程序，否则程序会报错。所以通常先用 Shell 函数启动 一个应用程序，然后使用 AppActivate 语句激活。 三、应用举例：
本例使用 AppActivate 语句来激活 Microsoft Excel。建立一个标准工程，在窗体上添加 一个命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click()
若省略 filenumberlist，则将关闭 Open 语句打开的所有活动文件。文件被关闭后，相关 联的缓冲区空间被释放，文件与其文件号之间的关联也将终结。 三、应用举例：
本示例使用 Close 语句来关闭为 Output 而打开的文件。建立一个标准工程，在窗体上 添加一命令按钮，将下面的程序粘贴过去。 Private Sub Command1_Click()
程的局部常量，在类模块声明的常量也是局部的。在标准模块中，可以用 Public 关键字来 声明常量为全局的。
(word完整版)vb编程常用命令集锦
vb编程常用命令集锦API函数声明数据类型与”类型安全”常数结构小结一些API函数集：控件与消息函数、硬件与系统函数、菜单函数、绘图函数什么是API首先，有必要向大家讲一讲，什么是API。
所谓API本来是为C和C++程序员写的.API说来说去，就是一种函数，他们包含在一个附加名为DLL的动态连接库文件中.用标准的定义来讲，API就是Windows的32位应用程序编程接口，是一系列很复杂的函数，消息和结构，它使编程人员可以用不同类型的编程语言编制出的运行在Windows95和Windows NT操作系统上的应用程序.可以说，如果你曾经学过VC，那么API对你来说不是什么问题。
但是如果你没有学过VC，或者你对Windows95的结构体系不熟悉,那么可以说，学习API将是一件很辛苦的事情。
如果你打开WINDOWS的SYSTEM文件夹，你可以发现其中有很多附加名为DLL的文件。
一个DLL中包含的API 函数并不只是一个，数十个，甚至是数百个。
我们能都掌握它嘛?回答是否定的∶不可能掌握.但实际上，我们真的没必要都掌握，只要重点掌握Windos系统本身自带的API函数就可以了.但,在其中还应当抛开掉同VB本身自有的函数重复的函数。
如，VB的etAttr命令可以获得文件属性，SetAttr可以设置文件属性。
对API来讲也有对应的函数GetFileAttributes和SetFileAttributes，性能都差不多。
如此地一算，剩下来的也就5、600个.是的，也不少。
但,我可以敢跟你说，只要你熟悉地掌握100个,那么你的编程水平比现在高出至少要两倍。
尽管人们说VB和WINDOWS具有密切的关系，但我认为，API更接近WINDOWS。
如果你学会了API,首要的收获便是对WINDOWS体系结构的认识。
这个收获是来自不易的。
如果你不依靠API会怎么样?我可以跟你说，绝大多是高级编程书本(当然这不是书的名程叫高级而高级的，而是在一开始的《本书内容》中指明《本书的阅读对象是具有一定VB基础的读者》的那些书)，首先提的问题一般大都是从API开始。
最为常用的VB代码大全
隐藏form1：form1.hide显示form1：form1.show--------------------------------------------------------------------------------------------- 退出程序时，弹出窗口提示是否要退出：Private Sub Form_Unload(Cancel As Integer)Dim iAnswer As IntegeriAnswer = MsgBox("真要退出吗?", vbYesNo)If iAnswer = vbNo ThenCancel = TrueElseEndEnd IfEnd Sub---------------------------------------------------------------------------------------------- 只能用任务管理器关闭程序的代码：Private Sub From_Unload(Cancel As Integer)Cancel = trueEnd Sub------------------------------------------------------------------------------------------------ 点击command1打开33IQ网：Dim strURLPrivate Sub Command1_Click()strURL = "错误！超链接引用无效。
Shell "explorer.exe " & strURL, 1End Sub------------------------------------------------------------------------------------------------ 运行c:\1.exeshell "c:\1.exe"执行c:\1.batshell "c:\1.bat"注：只适用于大部分exe和全部bat。
VB编程总结(输入输出)
名
院
学
VB总结与辅导
VB
程
提示：
序 设
1. VB应用方式
计
2. VB常用语句
——
总
3. VB程序设计一般步骤
结 一
4. VB程序的分析方法
茂一院名、学VB应用方式
1：命令方式（立即窗口）
VB
操作：视图→立即窗口
程
常用命令：赋值语句
序 设
输出语句
计
——
总 2：程序方式（对象→ 事件）
结 一
茂 二院名、学VB常用语句(1)
序
设 4：编写对象事件（程序代码）
计
5：调试修改 总 6：保存
结
一 7：编译成可执行文件*.exe（商品化软件）
——
茂小院名结学:
输入
VB
程
序 设
计算
计
——
总
结
输出
一
赋值语句 文本框 IntputBox函数
赋值语句
标签 文本框 Print语句 MsgBox函数
茂四院名、学VB习题
1：已知任意三角形的三边，求面积S
1：字母不区分大小写
VB
2：一般一行一条语句
程 序
3：一行多条语句，用 ：分隔开
设 计
4：一条语句占多行，前行尾用“ _”为续行符
5：设置好自动语法检查
——
总 结 一
VB
茂三院名、V学B程序设计一般步骤
1：阅读题目，寻找已知量、未知量 2：建立算法（计算公式、处理操作及顺序） 程 3：设计窗体（控件、属性）
1
输入语句
变量=inputbox( “提示”，“标题”，“ 初值 ”)
VB命令语名一览表
X必须定义为wariant类型
子程序过程定义
Sub过程名(byval x!, byref Y!)
……
Exit sub
End sub
值传递：byval
地址传递：byref(缺省方式)
调用子过程
Call过程名(x0,y0)
过程名x0,y0
函数过程定义
Function函数名( byval x!, byref Y!) as类型
…….
Case else
…….
End select
循环语句
For变量=a to b step c
…
Next变量
循环次数=(b-a)\c
while (条件)
…
wend
Do while |until(条件)
…
loop
Do
…
loop while |until(条件)
定义数组P76
Dim a(最大下标) as类型
……
Exit function
函数名=表达式
End function
调用函数
W=函数名（x0,Y0）
打开文件
Open “路径\文件名.TXT” for模式as #文件号
Output|input|
append
写文件
Write #文件号，表达式列表
读文件记录数据
Input #文件号，表达式列表
关闭文件
Close #文件号
VB语句（命令）一览表
作用
语法格式
参数举例
定义变量（关注变量的作用域）
Dim变量as数据类型
Dim变量<类型符>
基本数据类型：Integer, long, single, double, string
vb常用代码大全
移动无标题栏的窗体dim m(borderstyle=none)ouseX as integerdim mouseY as integerdim moveX as integerdim moveY as integerdim down as booleanform_mousedown: 'mousedown事件down=truemouseX=xmouseY=yform_mouseup: 'mouseup事件down=falseform_mousemoveif down=true thenmoveX=me.left-mouseX+XmoveY=me.top-mouseY+Yme.move moveX,moveYend if********************************* **********闪烁控件比如要闪烁一个label（标签）添加一个时钟控件间隔请根据实际需要设置 enabled属性设为true代码为：label1.visible=not label1.visible ********************************* **********禁止使用 Alt+F4 关闭窗口Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nP osition As Long, ByVal wFlags As Long) As LongPrivate Declare Function GetMenuItemC ount Lib "user32" (ByVal hMenu As Long) As LongPrivate Const MF_BYPOSITION = &H400& Private Sub Form_Load()Dim hwndMenu As LongDim c As LonghwndMenu = GetSystemMenu(Me.hwnd , 0)c = GetMenuItemCount(hwndMenu) DeleteMenu hwndMenu, c - 1, MF_BYPO SITION c = GetMenuItemCount(hwndMenu) DeleteMenu hwndMenu, c - 1, MF_BYPO SITIONEnd Sub启动控制面板大全'打开控制面板Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL", 9)'辅助选项属性-键盘Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL access.cpl,,1", 9)'辅助选项属性-声音Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL access.cpl,,2", 9)'辅助选项属性-显示Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL access.cpl,,3", 9)'辅助选项属性-鼠标Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL access.cpl,,4", 9)'辅助选项属性-常规Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL access.cpl,,5", 9)'添加/删除程序属性-安装/卸载Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Appwiz.cpl,,1", 9)'添加/删除程序属性-Windows安装程序Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Appwiz.cpl,,2", 9)'添加/删除程序属性-启动盘Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Appwiz.cpl,,3", 9)'显示属性-背景Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL desk.cpl,,0", 9)'显示属性-屏幕保护程序Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL desk.cpl,,1", 9)'显示属性-外观Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL desk.cpl,,2", 9)'显示属性-设置Call Shell("rundll32.exe shell32.dll,ControVB常用代码l_RunDLL desk.cpl,,3", 9)'Internet 属性-常规Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Inetcpl.cpl,,0", 9)'Internet 属性-安全Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Inetcpl.cpl,,1", 9)'Internet 属性-内容Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Inetcpl.cpl,,2", 9)'Internet 属性-连接Call Shell("rundll32.exe shell32.dll,Contro l_RunDLL Inetcpl.cpl,,3", 9)********************************* **********怎样关闭一个程序你可以使用API函数FindWindow和PostMessage来寻找一个窗口并且关闭它。
(完整word版)VBA经典常用语句400句
VBA经典常用语句400句目录一、定制模块行为 (3)二、工作簿 (3)三、单元格/单元格区域 (5)四、图表 (9)五、窗体 (10)六、事件 (11)七、对象 (12)八、其他 (13)九、工作簿 (13)十、工作表 (14)十一、公式与函数 (17)十二、图表 (17)十三、窗体和控件 (18)十四、对象 (19)十五、Range对象 (23)十六、Collection与object (25)十七、Windows API (25)十八、Application对象 (38)十九、Documents/Document对象 (40)二十、Paragraphs/Paragraph对象 (41)二十一、Sentences对象 (43)二十二、Words对象 (43)二十三、Characters对象 (43)二十四、Sections/Section对象 (43)二十五、Range对象 (44)二十六、其它 (45)一、定制模块行为(1) Option Explicit ’强制对模块内所有变量进行声明Option Private Module '标记模块为私有，仅对同一工程中其它模块有用,在宏对话框中不显示Option Compare Text ’字符串不区分大小写Option Base 1 ’指定数组的第一个下标为1(2) On Error Resume Next '忽略错误继续执行VBA代码,避免出现错误消息（3） On Error GoTo ErrorHandler '当错误发生时跳转到过程中的某个位置(4) On Error GoTo 0 '恢复正常的错误提示(5) Application.DisplayAlerts=False ’在程序执行过程中使出现的警告框不显示(6） Application。
ScreenUpdating=False '关闭屏幕刷新Application。
VB命令大全..
Abs 求绝对值ActiveControl 得到焦点的对象ActiveForm 得到焦点的表单Array 指定数组App 得知程序信息AppActivate 激活执行中的应用程序Asc 求字符的内码AscB 求字符的ASCIIAscW 求字符的UniCode Atn 求Tan-1BBeep 发出预设的警示声CCall 调用子程序Calendar 选择月历Choose 取出一列值的某个值CBool 数值转成布尔数CByte 数值转成位元格式CCur 数值转成货币格式CDate 数据转成时间CDbl 数值转成双精度浮点数CDec 数据转成十进数ChDir 改变目前路径缓充的路径ChDrive 改变目前磁盘缓充的磁盘Chr 由内码求得一字符ChrB 由ASCII求得一字符ChrW 由UniCode求得一字符CInt 数据转成Integer CLng 数据转成LongCommand 读出程序的参数Const 定义常数Cos COS CSng 数值转成单精度浮点数CurDir 得知目前路径缓充的路径CVar 数值转成可变变量DDate 得到目前电脑的时间Date$ 得到目前电脑时间字符串DateAdd 日期加法得日期DateDiff 日期相减得数值DatePart 日期部份资讯DateSerial 字符串转日期DateValue 数字转日期Day 得知日期变量内是几号DDB 折旧的计算DeleteSetting 删除系统登录内的数据Dir 得知目前路径内的文件名DoEvents 闲置函数EEnd 结束程序Environ 取得环境变量的数据EOF 某个文件缓冲的指标是否到档尾Erase 重新初始化数组Err 错误资讯Error 错误代码信息Exp 得到自然对数FFix 去除小数FileCopy To 复制文件FileAttr 文件开启模式FileDateTime 文件存档日期FileLen 文件长度Filter 筛选数组Format 数据格式化输出FreeFile 空的文件编号FV 求得定期、定额支付且固定利率下之年金的值GGetAllSetting 得到所有系统登录的资讯GetAttr 得知文件属性GetSetting 得到系统登录的资讯HHex 将数值转成16进数表示的字符串Hour 得知日期变量内是几时IIf . Then . Else 判断结构IMEStatus 得知IME输入法状态InStr 寻找字符串里的字符串InStrB 寻找字符串里的ASCIIIntStrRev 由字符串右边开始寻找字符串里的字符串Int 取整数JJoin 将数组数据加入分隔字符后组合成一新字符串KKill 删除文件LLBound 得知数组最小起始范围LCase 字符串转小写Left 截取字符串左边几个字Len 得知字符串的字数LenB 得知变量占用记忆体几个Byte LoadPicture 载入图形Log 求对数值LSet 字符串向左对齐LTrim 移除字符串最左边的空白字符MMid 截取字符串里某些字符串Minute 得知日期变量内是几分MkDir 建立新的数据颊Month 得知日期变量内是第几月NName As 更改文件名Now 得知目前点脑的日期与时间O Oct 字符转成八进制的字符串Option VB内部一些选项设定PPopupMenu 跳出菜单Print 列印数据QQBColor 设定颜色(16色)RRandomize 随机数初始化声明Replace 取代字符串中某些字符串VB6提供RGB 设定颜色(255*255*255色) RmDir 移除数据颊Rnd 得到一个随机数RSet 字符串向右对齐RTrim 去除字符串最右边的空白字符SSavePicture 储存图形Screen 得知屏幕简易资讯Second 得知日期变量内是几秒SetAttr 设定文件属性Sgn 得知是整数还是负数v Shell 执行外部程序Sin 得知Sin Space 填入数个空白字符Split 以某字符串将字符串拆解成数组VB6提供Sqr 求平方根Str 数值转字符串StrComp 比较字符串StrConv 改变字符串型态String 设定一个重覆的字符串StrReverse 字符串反转VB6提供TTab 列印n个制表符Tan 得知TanTime 得知、设定电脑时间Time$ 得知、设定时间字符串Timer 得知今天电脑总秒数TimeSerial 字符串转时间TimeValue 数字转时间Trim 去除字符串首尾的空白字符TypeName 得知变量类别的名称UUBound 得知数组的最值UCase 字符串转大写VVal 将字符串转成数字VarType 得知变量的类型WWeekDay 得知日期变量内是星期几WeekdayName 将WeekDay传回值改成文字显示YYear 得知日期变量内是几年AAbs 求绝对值ActiveControl 得到焦点的对象ActiveForm 得到焦点的表单Array 指定数组App 得知程序信息AppActivate 激活执行中的应用程序Asc 求字符的内码AscB 求字符的ASCIIAscW 求字符的UniCode Atn 求Tan-1Beep 发出预设的警示声CCall 调用子程序Calendar 选择月历Choose 取出一列值的某个值CBool 数值转成布尔数CByte 数值转成位元格式CCur 数值转成货币格式CDate 数据转成时间CDbl 数值转成双精度浮点数CDec 数据转成十进数ChDir 改变目前路径缓充的路径ChDrive 改变目前磁盘缓充的磁盘Chr 由内码求得一字符ChrB 由ASCII求得一字符ChrW 由UniCode求得一字符CInt 数据转成Integer CLng 数据转成LongCommand 读出程序的参数Const 定义常数Cos COS CSng 数值转成单精度浮点数CurDir 得知目前路径缓充的路径CVar 数值转成可变变量DDate 得到目前电脑的时间Date$ 得到目前电脑时间字符串DateAdd 日期加法得日期DateDiff 日期相减得数值DatePart 日期部份资讯DateSerial 字符串转日期DateValue 数字转日期Day 得知日期变量内是几号DDB 折旧的计算DeleteSetting 删除系统登录内的数据Dir 得知目前路径内的文件名DoEvents 闲置函数EEnd 结束程序Environ 取得环境变量的数据EOF 某个文件缓冲的指标是否到档尾Erase 重新初始化数组Err 错误资讯Error 错误代码信息Exp 得到自然对数FFix 去除小数FileCopy To 复制文件FileAttr 文件开启模式FileDateTime 文件存档日期FileLen 文件长度Filter 筛选数组Format 数据格式化输出FreeFile 空的文件编号FV 求得定期、定额支付且固定利率下之年金的值G GetAllSetting 得到所有系统登录的资讯GetAttr 得知文件属性GetSetting 得到系统登录的资讯HHex 将数值转成16进数表示的字符串Hour 得知日期变量内是几时IIf . Then . Else 判断结构IMEStatus 得知IME输入法状态InStr 寻找字符串里的字符串InStrB 寻找字符串里的ASCIIIntStrRev 由字符串右边开始寻找字符串里的字符串Int 取整数JJoin 将数组数据加入分隔字符后组合成一新字符串KKill 删除文件LLBound 得知数组最小起始范围LCase 字符串转小写Left 截取字符串左边几个字Len 得知字符串的字数LenB 得知变量占用记忆体几个Byte LoadPicture 载入图形Log 求对数值LSet 字符串向左对齐LTrim 移除字符串最左边的空白字符MMid 截取字符串里某些字符串Minute 得知日期变量内是几分MkDir 建立新的数据颊Month 得知日期变量内是第几月NName As 更改文件名Now 得知目前点脑的日期与时间O Oct 字符转成八进制的字符串Option VB内部一些选项设定PPopupMenu 跳出菜单Print 列印数据QQBColor 设定颜色(16色)RRandomize 随机数初始化声明Replace 取代字符串中某些字符串VB6提供RGB 设定颜色(255*255*255色) RmDir 移除数据颊Rnd 得到一个随机数RSet 字符串向右对齐RTrim 去除字符串最右边的空白字符SSavePicture 储存图形Screen 得知屏幕简易资讯Second 得知日期变量内是几秒SetAttr 设定文件属性Sgn 得知是整数还是负数v Shell 执行外部程序Sin 得知Sin Space 填入数个空白字符Split 以某字符串将字符串拆解成数组VB6提供Sqr 求平方根Str 数值转字符串StrComp 比较字符串StrConv 改变字符串型态String 设定一个重覆的字符串StrReverse 字符串反转VB6提供TTab 列印n个制表符Tan 得知TanTime 得知、设定电脑时间Time$ 得知、设定时间字符串Timer 得知今天电脑总秒数TimeSerial 字符串转时间TimeValue 数字转时间Trim 去除字符串首尾的空白字符TypeName 得知变量类别的名称UUBound 得知数组的最值UCase 字符串转大写VVal 将字符串转成数字VarType 得知变量的类型WWeekDay 得知日期变量内是星期几WeekdayName 将WeekDay传回值改成文字显示YYear 得知日期变量内是几年Abs 求绝对值ActiveControl 得到焦点的对象ActiveForm 得到焦点的表单Array 指定数组App 得知程序信息AppActivate 激活执行中的应用程序Asc 求字符的内码AscB 求字符的ASCII AscW 求字符的UniCode Atn 求Tan-1 B Beep 发出预设的警示声 C Call 调用子程序Calendar 选择月历Choose 取出一列值的某个值CBool 数值转成布尔数CByte 数值转成位元格式CCur 数值转成货币格式CDate 数据转成时间CDbl 数值转成双精度浮点数CDec 数据转成十进数ChDir 改变目前路径缓充的路径ChDrive 改变目前磁盘缓充的磁盘Chr 由内码求得一字符ChrB 由ASCII求得一字符ChrW 由UniCode求得一字符CInt 数据转成Integer CLng 数据转成Long Command 读出程序的参数Const 定义常数Cos COS CSng 数值转成单精度浮点数CurDir 得知目前路径缓充的路径CVar 数值转成可变变量 D Date 得到目前电脑的时间Date$ 得到目前电脑时间字符串DateAdd 日期加法得日期DateDiff 日期相减得数值DatePart 日期部份资讯DateSerial 字符串转日期DateValue 数字转日期Day 得知日期变量内是几号DDB 折旧的计算DeleteSetting 删除系统登录内的数据Dir 得知目前路径内的文件名DoEvents 闲置函数 E End 结束程序Environ 取得环境变量的数据EOF 某个文件缓冲的指标是否到档尾Erase 重新初始化数组Err 错误资讯Error 错误代码信息Exp 得到自然对数 F Fix 去除小数FileCopy To 复制文件FileAttr 文件开启模式FileDateTime 文件存档日期FileLen 文件长度Filter 筛选数组Format 数据格式化输出FreeFile 空的文件编号FV 求得定期、定额支付且固定利率下之年金的值G GetAllSetting 得到所有系统登录的资讯GetAttr 得知文件属性GetSetting 得到系统登录的资讯H Hex 将数值转成16进数表示的字符串Hour 得知日期变量内是几时I If . Then . Else 判断结构IMEStatus 得知IME输入法状态InStr 寻找字符串里的字符串InStrB 寻找字符串里的ASCII IntStrRev 由字符串右边开始寻找字符串里的字符串Int 取整数J Join 将数组数据加入分隔字符后组合成一新字符串K Kill 删除文件L LBound 得知数组最小起始范围LCase 字符串转小写Left 截取字符串左边几个字Len 得知字符串的字数LenB 得知变量占用记忆体几个Byte LoadPicture 载入图形Log 求对数值LSet 字符串向左对齐LTrim 移除字符串最左边的空白字符M Mid 截取字符串里某些字符串Minute 得知日期变量内是几分MkDir 建立新的数据颊Month 得知日期变量内是第几月N Name As 更改文件名Now 得知目前点脑的日期与时间O Oct 字符转成八进制的字符串Option VB内部一些选项设定P PopupMenu 跳出菜单Print 列印数据Q QBColor 设定颜色(16色) R Randomize 随机数初始化声明Replace 取代字符串中某些字符串VB6提供RGB 设定颜色(255*255*255色) RmDir 移除数据颊Rnd 得到一个随机数RSet 字符串向右对齐RTrim 去除字符串最右边的空白字符S SavePicture 储存图形Screen 得知屏幕简易资讯Second 得知日期变量内是几秒SetAttr 设定文件属性Sgn 得知是整数还是负数v Shell 执行外部程序Sin 得知Sin Space 填入数个空白字符Split 以某字符串将字符串拆解成数组VB6提供Sqr 求平方根Str 数值转字符串StrComp 比较字符串StrConv 改变字符串型态String 设定一个重覆的字符串StrReverse 字符串反转VB6提供T Tab 列印n个制表符Tan 得知Tan Time 得知、设定电脑时间Time$ 得知、设定时间字符串Timer 得知今天电脑总秒数TimeSerial 字符串转时间TimeValue 数字转时间Trim 去除字符串首尾的空白字符TypeName 得知变量类别的名称U UBound 得知数组的最值UCase 字符串转大写V Val 将字符串转成数字VarType 得知变量的类型W WeekDay 得知日期变量内是星期几WeekdayName 将WeekDay传回值改成文字显示VB6提供Y Year 得知日期变量内是几年。
VB命令大全
VB命令(mìng lìng)大全VB命令(mìng lìng)大全VB命令(mìng lìng)大全命令(mìng lìng)Call：调用(diàoyòng)事件处理器Close关闭(guānbì)用Open命令所打开文件(wénjiàn)的输入输出。
格式：Close #文件号1, #文件号2……。
若无文件号，则关闭打开的所有活动文件。
Const：声明常量,格式:Const常量名[As类型] =常量值DoEvents：让应用程序提供少量时间处理等待的任务，然后控制权立即返回应用程序。
Dim声明变量，格式：Dim变量名As变量类型Exit sub：中途退出子程序End：结束程序Global：声明全局变量Load：装入窗体MsgBox消息(xiāo xi)内容：将结果显示在消息框中Open打开或保存(bǎocún)文件。
格式：Open文件(wénjiàn)全名For模式(móshì)As #文件(wénjiàn)号[Len =文件长度]其中，模式有：Append、Binary、Input、Output、Random(缺省)；文件号在1到511之间，可用FreeFile函数取得；文件长度在1到32767之间。
例：Open CommonDialog1.FileName For Output As #1Option Base 1：放在声明部分,强制数组从1开始索引,(如果不习惯从0开始的话)Option Explicit：强制声明变量(放在窗体或模块的声明部分)PopupMenu调出弹出式菜单。
格式：PopupMenu弹出式菜单名, flags, x, y, Boldcommand（只有前面两项为必选）。
vb命令汇总
·常量定义Const name [as type] = valueName:常量名Value:值type:常量数据类型（可有可无）变量定义Dim name [as type]如：Dim I as long, j as longName:变量名type:变量数据类型（可有可无）选取范围Range(“A1”). Font.ColorIndex = 3 ' Red Worksheets("Sheet1").Cells(1, 1).Value = 10条件语句：If anyDate < Now Thencar = oldElsecar = newEnd If或If condition1 Then [statements] ElseIf condition2Select Case markCase 0Msgbox(“缺考”)Case is<60Msgbox(“不及格”)Case 60 to 98Msgbox(“合格”) Case 99,100Msgbox(“优秀”) Case ElseMsgbox(“出错”) End Select循环语句：i=1Do while i<=10sum=sum+ii=i+1Loopi=1Do until i>10sum=sum+ii=i+1Loopi=1dosum=sum+ii=i+1Loop while i<=10i=1dosum=sum+ii=i+1Loop until i>10Do While n<100n=n+1m=m*nif m>=100000 Then Exit Do LoopFor i=1 To 100 Step 1sum=sum+iNext iFor Each mycell In SelectionIf mycell.Value Like "OK" Thenmycell.Font.Bold = TrueEnd IfNext当前活动工作簿（一个Workbook对象）Application.ActiveWorkbook当前活动工作表（一个Sheet对象）Application.ActiveSheet当前活动单元格（一个Range对象）Application.ActiveCell当前活动窗口中被选中的对象Application.Selection命令：ClearContents删除内容Msgbox 输出内容InputBox 输入内容命名Sheets(1).Name=”VBA世界”字体属性Application.Worksheets(“Sheet 1”).Cells(5,3).Font.Size=14ActiveCell.Font.Bold=True获取对象属性Sheet_name=Sheets(3).Name 获取工作表3的名称窗体1.Load:加载窗体Load UserForm2Unload：卸载窗体Show：显示窗体UserForm2.ShowHide：隐藏窗体Move：移动窗体Private Sub UserForm_Initialize（初始化事件）/ Termiate（销毁事件）/ Activate/Deactivate（激活/非激活事件）控件：控件名_事件名。
vb指令集1
Calendar 常数: vbCalGreg vbCalHijriColor 常数: vbBlack vbRed vbGreen vbYellow vbBlue vbMagenta vbCyan vbWhiteComparison常数: VbUseCompareOption VbBinaryCompare VbTextComparevbDatabaseCompareCompiler 常数: Win16 Win32Date 常数: vbUseSystem vbSunday vbMonday vbTuesday vbWednesdayvbThursday vbFriday vbSaturdayfirstdayofyear: vbUseSystem VbUseSystemDayOfWeek VbFirstJan1vbFirstFourDays vbFirstFullWeek返回值: vbSunday vbMonday vbTuesday vbWednesdayvbThursday vbFriday vbSaturday日期格式常数: vbGeneralDate vbLongDate vbShortDate vbLongTimevbShortTimeDir、GetAttr 和 SetAttr 常数: vbNormal vbReadOnly vbHidden vbSystemvbVolume vbDirectory vbArchive驱动器类型常数: Unknown Removable Fixed Remote CDROM RAMDisk文件属性常数: Normal ReadOnly Hidden System Volume DirectoryArchive Alias Compressed文件输入/输出常数: ForReading ForWriting ForAppendingIMEStatus 常数: vbIMEModeNoControl vbIMEModeOn vbIMEModeOffvbIMEModeDisable vbIMEModeHiragana vbIMEModeKatakana vbIMEModeKatakanaHalf vbIMEModeAlphaFull vbIMEModeAlpha Keycode 常数: vbKeyLButton vbKeyRButton vbKeyCancel vbKeyMButtonvbKeyBack vbKeyTab vbKeyClear vbKeyReturn vbKeyShift vbKeyControl vbKeyMenu vbKeyPause vbKeyCapital vbKeyEscape vbKeySpace vbKeyPageUp vbKeyPageDownvbKeyEnd vbKeyHome vbKeyLeft vbKeyUp vbKeyRightvbKeyDown vbKeySelect vbKeyPrint vbKeyExecutevbKeySnapshot vbKeyInsert vbKeyDelete vbKeyHelpvbKeyNumlockvbKeyA vbKeyB vbKeyC vbKeyD vbKeyE vbKeyF vbKeyG vbKeyH vbKeyI vbKeyJ vbKeyK vbKeyL vbKeyM vbKeyNvbKeyO vbKeyP vbKeyQ vbKeyR vbKeyS vbKeyT vbKeyU vbKeyV vbKeyW vbKeyX vbKeyY vbKeyZvbKey0 vbKey1 vbKey2 vbKey3 vbKey4 vbKey5 vbKey6vbKey7 vbKey8 vbKey9vbKeyNumpad0 vbKeyNumpad1 vbKeyNumpad2 vbKeyNumpad3 vbKeyNumpad4 vbKeyNumpad5 vbKeyNumpad6 vbKeyNumpad7 vbKeyNumpad8 vbKeyNumpad9 vbKeyMultiply vbKeyAdd vbKeySeparator vbKeySubtract vbKeyDecimal vbKeyDivide vbKeyF1 vbKeyF2 vbKeyF3 vbKeyF4 vbKeyF5 vbKeyF6vbKeyF7 vbKeyF8 vbKeyF9 vbKeyF10 vbKeyF11 vbKeyF12 vbKeyF13 vbKeyF14 vbKeyF15 vbKeyF16Miscellaneous 常数: vbCrLf vbCr vbLf vbNewLine vbNullCharvbNullString vbObjectError vbTab vbBackvbFormFeed vbVerticalTabMsgBox 常数: vbOKOnly vbOKCancel vbAbortRetryIgnore vbYesNoCancelvbYesNo vbRetryCancel vbCritical vbQuestionvbExclamation vbDefaultButton1 vbDefaultButton2vbDefaultButton3 vbDefaultButton4 vbApplicationModalvbSystemModal vbMsgBoxHelpButton VbMsgBoxSetForeground vbMsgBoxRight vbMsgBoxRtlReadingvbOK vbCancel vbAbort vbRetry vbIgnore vbYes vbNo QueryClose常数: vbFormControlMenu vbFormCode vbAppWindowsvbAppTaskManagerShell 常数: vbHide vbNormalFocus vbMinimizedFocus vbMaximizedFocus vbNormalNoFocus vbMinimizeNoFocus特殊文件夹常数: WindowsFolder SystemFolder TemporaryFolderStrConv 常数: vbUpperCase vbLowerCase vbProperCase vbWide vbNarrow vbKatakana vbHiragana vbUnicode vbFromUnicodeSystem Color 常数: vbScrollBars vbDesktop vbActiveTitleBarvbInactiveTitleBar vbMenuBar vbWindowBackgroundvbWindowFrame vbMenuText vbWindowText vbTitleBarText vbActiveBorder vbInactiveBorder vbApplicationWorkspace vbHighlight vbHighlightText vbButtonFace vbButtonShadow vbGrayText vbButtonText vbInactiveCaptionTextvb3Dhighlight vb3DDKShadow vb3Dlight vbInfoTextvbInfoBackground三态常数: TristateTrue TristateFalse TristateUseDefaultVarType 常数: vbEmpty vbNull vbInteger vbLong vbSingle vbDouble vbCurrency vbDate vbString vbObject vbError vbBoolean vbVariant vbDataObject vbDecimal vbBytevbUserDefinedType vbArrayBoolean 数据类型 Byte 数据类型 Currency 数据类型 Date 数据类型Decimal 数据类型 Double 数据类型 Integer 数据类型 Long 数据类型Object 数据类型 Single 数据类型 String 数据类型用户定义数据类型Variant 数据类型#Const 指令 #If...Then...#Else 指令 Abs(number) Array(arglist) Asc(string) Atn(number) CallByName(object, procedurename, calltype,[arguments()])Choose(index, choice-1[, choice-2, ... [, choice-n]]) Chr(charcode) CommandCos(number) CreateObject(class,[servername]) CurDir[(drive)]CVErr(errornumber) Date DateAdd(interval, number, date)DateDiff(interval, date1, date2[, firstdayofweek[,firstweekofyear]])DatePart(interval,date[,firstdayofweek[,firstweekofyear]])DateSerial(year, month, day) DateValue(date) Day(date)DDB(cost,salvage, life, period[, factor]) Dir[(pathname[, attributes])]DoEvents( ) Environ({envstring| number}) EOF(filenumber) Error[(errornumber)] Exp(number) FileAttr(filenumber, returntype) FileDateTime(pathname)FileLen(pathname) Filter(InputStrings,Value[,Include[,Compare]])Format(expression[, format[, firstdayofweek[, firstweekofyear]]]) FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit[,UseParensForNegativeNumbers [,GroupDigits]]]])FormatDateTime(Date[,NamedFormat])FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit[,UseParensForNegativeNumbers [,GroupDigits]]]])FreeFile[(rangenumber)] FV(rate, nper, pmt[, pv[, type]])GetAllSettings(appname,section) GetAttr(pathname)GetObject([pathname] [, class]) GetSetting(appname,section,key[,default])Hex(number) Hour(time) IIf(expr,truepart,falsepart) IMEStatusInput(number, [#]filenumber)InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context]) InStr([start, ]string1, string2[, compare])InstrRev(string1,string2[,start[,compare]])Int(number) Fix(number) IPmt(rate, per, nper, pv[, fv[, type]])IRR(values()[, guess]) IsArray(varname) IsDate(expression)IsEmpty(expression) IsError(expression) IsMissing(argname)IsNull(expression) IsNumeric(expression) IsObject(identifier)Join(list[, delimiter]) LBound(arrayname[, dimension]) LCase(string)Left(string, length) Len(string | varname) Loc(filenumber) LOF(filenumber)Log(number) LTrim(string) RTrim(string) Trim(string)Mid(string, start[, length]) Minute(time)MIRR(values(),finance_rate, reinvest_rate) Month(date)MonthName(month[,abbreviate])MsgBox(prompt[, buttons] [, title] [, helpfile, context])Now NPer(rate, pmt, pv[, fv[, type]]) NPV(rate, values()) Oct(number) Partition(number, start, stop, interval) Pmt(rate, nper, pv[, fv[, type]])PPmt(rate, per, nper, pv[, fv[, type]]) PV(rate, nper, pmt[, fv[, type]]) QBColor(color) Rate(nper, pmt, pv[, fv[, type[, guess]]])Replace(expression,find,replacewith[,start[,count[,compare]]])RGB(red, green, blue) Right(string, length) Rnd[(number)]Round(expression [,numdecimalplaces]) Second(time) Seek(filenumber)Sgn(number) Shell(pathname[,windowstyle]) Sin(number)SLN(cost, salvage, life) Space(number) Spc(n)Split(expression[,delimiter[,count[,compare]]])Sqr(number) Str(number) StrComp(string1, string2[, compare])StrConv(string, conversion, LCID) StrReverse(string1)String(number, character)Switch(expr-1,value-1[,expr-2,value-2 _ [,expr-n,value-n]])SYD(cost, salvage, life, period) Tab[(n)] Tan(number) TimeTimer TimeSerial(hour,minute,second) TimeValue(time)CBool(expression)CByte(expression) CCur(expression)CDate(expression)CDbl(expression)CDec(expression)CInt(expression)CLng(expression)CSng(expression)CStr(expression)CVar(expression)CStr(expression) TypeName(varname) UBound(arrayname[, dimension]) UCase(string)VarType(varname) Weekday(date, [firstdayofweek])WeekdayName(weekday,abbreviate,firstdayofweek) Year(date)数据类型概述: Byte Boolean Integer Long Single Double CurrencyDecimal Date Object String String Variant VariantType导出的数学函数: Secant Cosecant Cotangent Inverse SineInverse Cosine Inverse Secant Inverse CosecantInverse Cotangent Hyperbolic Sine Hyperbolic CosineHyperbolic Tangent Hyperbolic SecantHyperbolic Cosecant Hyperbolic CotangentInverse Hyperbolic Sine Inverse Hyperbolic Cosinenverse Hyperbolic Tangent Inverse Hyperbolic SecantInverse Hyperbolic Cosecant nverse Hyperbolic Cotangent 逻辑运算符: And Eqv Imp Not Or Xor数学函数: Abs Atn Cos Exp Fix Int Log Rnd Sgn Sin Sqr Sqr运算符优先顺序: ^ - (*、/) \Mod (+、-) &= <> < > <= >= LikeNot And Or Xor Eqv Imp Is数组关键字总结: IsArrayArrayOption BaseDim, Private, Public, ReDim, StaticLBound, UboundErase, ReDimCollection 对象关键字总结: IsArrayArrayOption BaseDim, Private, Public, ReDim, StaticLBound, UboundErase, ReDim编译命令关键字总结: #Const#If...Then...#Else控制流关键字总结: GoSub...Return, GoTo, On Error, On...GoSub, On...GoTo DoEvents, End, Exit, StopDo...Loop For...Next, For Each...Next, While...Wend, With Choose, If...Then...Else, Select Case, SwitchCall, Function, Property Get, Property Let, Property Set, Sub 变换关键字总结: Chr Format, LCase, UCase DateSerial, DateValue Hex, Oct Format, StrCBool, CByte, CCur, CDate, CDbl, CDec, CInt, CLng, CSng,CStr, CVar, CVErr, Fix, IntDay, Month, Weekday, YearHour, Minute, Second Asc ValTimeSerial, TimeValue数据类型关键字总结: CBool, CByte, CCur, CDate, CDbl, CDec, CInt, CLng,CSng, CStr, CVar, CVErr, Fix, IntBoolean, Byte, Currency, Date, Double, Integer, Long, Obect, Single,String, Variant (default)IsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull,IsNumeric, IsObject日期与时间关键字总: Date ,Now, Time DateAdd, DateDiff, DatePartDateSerial, DateValue TimeSerial, TimeValueDate, Time Timer目录和文件关键字总结: ChDir ChDrive FileCopy MkDirRmDir Name CurDir FileDateTimeGetAttr FileLen Dir SetAttr错误关键字总结: Clear, Error, Raise Error Err CVErrOn Error, Resume IsError金融关键字总结: DDB, SLN, SYD FV Rate IRR, MIRRNPer IPmt, Pmt, PPmt NPV, PV输入与输出关键字总结: DDB, SLN, SYD FV Rate IRR,MIRR NPer IPmt, Pmt, PPmt NPV, PV 数学关键字总结: Atn, Cos, Sin, Tan Exp, Log, Sqr Randomize, RndAbs Sgn Fix, Int其他关键字总结: DoEvents AppActivate, Shell SendKeysBeep Environ Command MacID, MacScriptCreateObject, GetObject QBColor, RGB运算符关键字总结: DoEvents AppActivate, Shell SendKeysBeep Environ Command MacID, MacScriptCreateObject, GetObject QBColor, RGB注册关键字总结: DoEvents AppActivate, Shell SendKeysBeep Environ Command MacID, MacScriptCreateObject, GetObject QBColor, RGB字符串处理关键字总结: StrComp StrConv Format, LCase, UCaseSpace, String Len Format LSet, RSetInStr, Left, LTrim, Mid, Right, RTrim, TrimOption Compare Asc, Chr变量与常数关键字总结: Let Const, Dim, Private, Public, New, StaticOption Private ModuleIsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull,IsNumeric, IsObject, TypeName, VarTypeMe Option Explicit DeftypeAs: Const 语句 Declare 语句 Dim 语句 Function 语句 Name 语句Open 语句 Private 语句 Property Get 语句 Property Let 语句Property Set 语句 Public 语句 ReDim 语句 Static 语句Sub 语句 Type 语句Binary: Open 语句 Option Compare 语句ByRef: Call 语句 Declare 语句 Function 语句 Property Get 语句Property Let 语句 Property Set 语句 Sub 语句ByVal: Call 语句 Declare 语句 Function 语句 Property Get 语句Property Let 语句 Property Set 语句 Sub 语句Date: Date 数据类型 Date 函数 Date 语句Else: If...Then...Else 语句 Select Case 语句Empty: Empty关键字是用作 Variant 子类型。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB中的常用命令
一、工程的组成
工程文件(.vbp)包含了一个应用程序的所有文件
窗体文件（.frm）:控件及属性、事件过程和自定义过程
窗体的二进制数据文件（.frx）,自动产生同名..frx文件。
标准模块文件（.bas）
类模块的文件（.cls）
资源文件（.res）
ActiveX控件的文件（.ocx）
二、VB中的最常用的命令
FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。
FontItalic属性是逻辑型，决定对象上正文是否是斜体。
窗体的其它常用属性
2．Icon 控制图标属性：返回或设置窗体左上角显示或最小化时显示的图标。
注意：此属性必须在ControlBox属性设置为Ture才有效
3．ControlBox控制菜单框属性：设置Ture为有，如设置为False则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture。
5. BorderStyle：边框风格, 通过改变BorderStyle 属性，可以控制窗体如何调整大小。
0-None：无边框；
1-Fixed Single：单线边框，不可以改变窗口大小；
2-Sizable：双线边框，可以改变窗口大小；
3-Fixed Double：双线框架，不可以改变窗口大小。
4-Fixed Tool Window:窗体外观与工具条相似。
有关闭按钮，不可以改变窗口大小。
5-Sizable Tool Window：窗体外观与工具条相似。
有关闭按钮，可以改变窗口大小。
6. WindowsState属性
用来设置窗体的运行状态。
0-Normal：正常窗口状态，有窗口边界；
1-Minimized：最小化状态，以图标方式运行；
2-Maximized：最大化状态，无边框，充满整个屏幕。
7. AutoRedraw属性
该属性决定窗体被隐藏或被另一窗口覆盖之后，是否重新还原该窗体被隐藏或覆盖以前的画面。
即是否重画如Circle、Line、Pset和Print等方法的输出。
当为True时，重新还原该窗体以前的画面。
当为False时，则不重画AutoRedraw属性。
4 Resize事件
无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件。
5 Activate事件：当窗体由非活动窗体变为活动窗体，即当窗体得到焦点时触发该事件。
窗体常用的方法有：
打印输出Print
移动Move
清除Cls
显示Show
隐藏Hide等方法。
方法的使用的形式:
[对象.]方法[参数]
1.Print方法
形式: [窗体名.]Print[{Spc(n)|Tab(n)}][表达式列表][；|，]
作用:在对象上输出信息
Spc(n)函数：插入n个空格，允许重复使用。
Tab(n)函数：从窗体第n列开始输出，允许重复使用。
；(分号)：光标定位上一个显示的字符后(紧凑格式)。
，(逗号)：光标定位在下一个打印区的开始位置处。
每个打印区占14列(标准格式)。
无；，换行。
2. Cls方法
形式: [对象.]Cls
作用: 清除运行时在窗体中显示的文本或图形。
注意:
Cls方法不能清除在设计时的文本和图形。
清屏后坐标当前回到原点。
3. Move方法
形式: [对象.]Move Left[，Top[，Width[，Height]]]
作用: 移动窗体或控件，并可改变其大小。
对象：可以是窗体及除时钟、菜单外的所有可视控件，省略代表窗体。
左边距离，上边距离，宽度，高度：数值表达式，以twip为单位。
如果是窗体对象，则“左边距”和“上边距”是以屏幕左边界和上边界为准。
其它则是以窗体的左边和上边界为准。
Move方法至少需要一个Left参数值，其余均可省略。
4．Show(显示)方法
Show方法用于在屏幕上显示一个窗体，调用Show 方法与设置窗体Visible 属性为True 具有相同的效果。
其调用格式如下：
窗体名.Show [vbModal | vbModeless]
说明:（1）它有两种可能值：0-vbModal（缺省）或1-vbModeless。
当参数为vbModal时，要求用户必须对当前的窗口或对话框做出响应，才能切换到其他窗口。
（2）如果要显示的窗体事先未装入，该方法会自动装入该窗体再显示。
Form2.Show vbModal
Form2.Show VbModaless
5．Hide（隐藏）方法
Hide方法用于使指定的窗体不显示，但不从内存中删除窗体。
其调用格式为：
窗体名.Hide
说明：当一个窗体从屏幕上隐去时，其Visible属性被设置成False，并且该窗体上的控件也变得不可访问，但对运行程序间的数据引用无影响。
若要隐去的窗体没有装入，则Hide方法会装入该窗体但不显示。
2．常用属性
（1）Caption: 标题属性——命令按钮显示的内容，可在某字母前加“&“设置快捷键。
例如：&Ok , 显示Ok
（2）Default：确认属性（逻辑值），设置为True时，按Enter键相当于用鼠标器单击了该按钮。
注意：在一个窗体只能的一个按钮的Default设置为Ture
（3）Cancel:取消功能属性（逻辑值），当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同。
注意：在一个窗体只能的一个按钮的Cancel属性设置为Ture
（4）Picture : 按钮可显示图片文件(.bmp和.Ico)，只有当Style属性值设为1时有效（5）Style : 确定显示的形式. 0 只能显示文字, 1 文字、图形均可。
（6）ToolTipText ：设置工具提示，和Picture结合使用。
三、文本框TextBox
是一个文本编辑区域，在该区域输入，编辑和显示文本。
（一）属性
1．基本属性
Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。
?
2．常用属性
（1）Text文本属性
在文本框中显示的正文内容存放在Text属性中。
当程序运行时，用户通过键盘输入正文内容，保存在Text属性中。
文本框没有Caption属性
（2）Maxlength：设置正文的最多字符个数, 0任意长度值。
（3）MultiLine：是否为多行,默认一行. False
（4）ScrollBars：当MultiLine为True时,该属性才有效,滚动条的形式。
0-None：无滚动条、1-Horizontal：水平滚动条、
2-Vertical垂直滚动条、3-Both水平和垂直滚动条。
（5）Locked：是否可被编辑属性，False，表示为可编辑。
（6）PassWordChar属性
设置PasswordChar属性为了掩盖文本框中输入的字符。
该属性的设置只有在MultiLine设为False才有效
（7）SelStart、SelLength和SelText属性
这三个属性是文本框中对文本的编辑属性。
SelStart：确定在文本框选中文本的起始位置。
SelLength：设置或返回文本框中选定的文本字符串长度（字符个数）。
SelText：设置或返回当前选定文本中的文本字符串。
Text2.Text = Text1.SelStart
Text2.Text = Text1.SelText
LostFocus ：当控件失去焦点时发生。
GotFocus ：当控件获得焦点时发生。
文本框最有用的方法是：SetFocus，使用形式：[对象.]SetFocus
功能：是把光标移到指定的文本框对象中。