VBA用途介绍
VBA用途介绍
作为办公人员，每一天都在利用Excel软件（熟称电子表格）进行大量事物处理，我们更是如此，它确实给我们的工作带来诸多方便。但由于每个行业都有其特殊性，Excel现有的操作功能不可能把我们每一个环节的工作都干出来，有时人们仍需要进行繁重的脑力劳动，其原因是因为人们只是掌握了大量Excel书籍中介绍的手工操作功能。但即使掌握了所有手工操作功能也只掌握了Excel全部功能的90％。那么剩余的10%是什么呢？就是VBA。VBA也是编程语言。它是以Excel为工作平台的编程语言。也就是我们常说的那个‘宏’！
对于我们大多数人来说：有点谈‘宏’色变，因为启动Excel时一有‘宏’它就提示：“宏可能携带病毒，取消宏虽然可以确保安全，但如果这些宏本身是安全的，则又会损失某些功能”，有些不了解‘宏’的人一看到这条信息，就惊讶的说：“完了”，我的计算机或我的这个文件被病毒感染了，不能用了，有的赶紧杀毒，有的赶紧把文件删除，造成了不良后果。
其实在Excel中关于宏的设置有三个档次，即高、中、低，提示以上信息是选中了中档次，含义是让操作者自己选择运不运行宏，如果不运行宏，宏的功能将不起作用。但若是运行自己编的可靠的宏，启动后将大大发挥其作用。
案例一：由教师任课明细表和各班级课程表
形成全校课程总表
用手工操作那可就费事了！通过编写程序一执行当即就可完成，既省时又省力. 案例二：批量数据按照固定的格式打印出来
每次打印都更
我们有大量的数据，想按照一个固定的格式打印出来。如果按照手工去操作那是无法想象的。案例三：用excel和Access或者sqlserver组合应用，在excel中操作数据库。
2010版Excel的总行数也就是1048576，列数是16384，当数据行不够用时候怎么办？另外上百万调数据直接存在文档中是不切实际的，严重影响到excel作业的效率和便利，以及数据的安全性。所以，数据库的应用就很有必要了。有人会问为什么不单独用程序来处理数据库呢。因为excel有着处理数据便利性，从数据库存取数据后直接数据加工会非常方便。
案例四：excel处理考勤数据，输出靠请报表
对于大部分中等规模的公司或工厂一般都会使用考勤机，但是考勤系统则是比较大型的工厂和公司才会购买使用。考勤机的数据都是数据库形式，每个人的每月考勤是很多条数据行。加工整理是个非常简单，但是需要重复非常多动作的大量工作来完成。这种时候就可以发挥程序的优势，让程序完成。
在此列出，目的是说明实现高难度问题，不编程是不行的，其二，是让朋友们看一下VBA的程序内涵，对其更深入的了解。
以上我只是举出沧海当中的几例。
可以这么讲，凡是手工能干得活它都能干，凡是手工不能干得活它也能干，可见VBA的作用是多么的大。既然作用这么大，是不是每个人都可以学那？诚然。对于有心人，当你操作时多录制点“宏”看看你的操作过程就可以了。学会了对你的工作帮助是非常大的，愿同仁一道研究。如果业务紧急需要也可以到gelinsoft淘宝店请店主帮忙。
有人说：VBA语言其实质是BASIC语言在excel中的应用，其实不完全正确。只能说BASIC语言中的条件语句，循环语句和一部分语句及书写格式在VBA中实用。如：上段程序中的Cells语句、Workbooks语句、Sheets语句在BASIC中是不存在的。我们知道任何语言都有它自己的体系，excel也不例外。这是提醒大家要特别注意的地方。VBA百度百科：https://www.360docs.net/doc/c41240248.html,/subview/88461/12743555.htm?fr=aladdin
vb中msgbox用法
VB中的函数，可实现弹出窗口. 作用：在对话框中显示消息，等待用户单击按钮，并返回一个Integer 告诉用户单击哪一个按钮。 语法： MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 参数说明： MsgBox 函数的语法具有以下几个命名参数： Prompt-------必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为1024 个字符，由所用字符的宽度决定。如果prompt 的内容超过一行，则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10)) 或是回车与换行符的组合(Chr(13) & Chr(10)) 将各行分隔开来。 Buttons-------可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则buttons 的缺省值为 0。 Title-------可选的。在对话框标题栏中显示的字符串表达式。如果省略 title，则将应用程序名放在标题栏中。 Helpfile--------可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了helpfile，则也必须提供context。 Context-------可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了context，则也必须提供helpfile。 用于MsgBox函数中Button参数的常量 常量值说明 vbOKOnly 0 只显示“确定”按钮 VbOKCancel 1 显示“确定”和“取消”按钮 VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮 VbYesNoCancel 3 显示“是”、“否”和“取消”按钮 VbYesNo 4 显示“是”和“否”按钮 VbRetryCancel 5 显示“重试”和“取消”按钮 VbCritical 16 显示“关键信息”图标 VbQuestion 32 显示“警告询问”图标 VbExclamation 48 显示“警告消息”图标 VbInformation 64 显示“通知消息”图标 vbDefaultButton1 0 第一个按钮是缺省值(缺省设置) vbDefaultButton2 256第二个按钮是缺省值 vbDefaultButton3 512第三个按钮是缺省值 vbDefaultButton4 768第四个按钮是缺省值 vbApplicationModal 0应用程序强制返回；应用程序一直被挂起，直到用户对消息框 作出响应才继续工作 vbSystemModal 4096系统强制返回；全部应用程序都被挂起，直到用户对消息框作 出响应才继续工作 vbMsgBoxHelpButton 16384将Help按钮添加到消息框 VbMsgBoxSetForeground 65536指定消息框窗口作为前景窗口 vbMsgBoxRight 524288文本为右对齐 vbMsgBoxRtlReading 1048576指定文本应为在希伯来和阿拉伯语系统中的从右到左显示 说明： (1)第一组值(0–5)描述了消息框中显示的按钮的类型与数目；第二组值(16,32,48,64)描述了图标的样式；第三组值(0,256,512,768)说明哪一个按钮是缺省值；而第四组值(0,4096)则决定消息框的强制返
MsgBox的使用
MsgBox函数 MsgBox函数的作用是弹出一个对话框，在其中显示的指定的数据和提示信息。此外，该函数还可以将返回用户在此对话框做的选择，并将返回值赋给指定变量。其语法格式为：MsgBox（信息内容(文本)，对话框类型+图标类型(button)，对话框题目(文本)） 注意：信息内容为必传参数。对话框类型和图标类型为非必传参数。对话框题目也为非必传参数，如果不写则为项目的标题。 button参数的取值。 名称值功能 VbOKOnly 0 确定按钮 VbOkCancel 1 确定和取消按钮 VbAortRetryIgnore 2 终止,重试和忽略按钮 VbYesNoCancel 3 是,否和取消按钮 VbYesNo 4 重试和取消按钮 Vbretrycancel 5 重试和取消按钮 VbCritical 16 停止图标 VbQuestion 32 问号(?)图标 VbExclamation 48 感叹号(!)图标 VbInformation 64 信息图标 VbDefaultButton1 0 默认按钮为第一按钮 VbDefaultButton2 256 默认按钮为第二按钮 VbDefaultButton3 512 默认按钮为第三按钮 vbDefaultButton4 768默认按钮为第四按钮 vbApplicationModal0应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作 vbSystemModal4096系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作 vbMsgBoxHelpButton16384将Help按钮添加到消息框VbMsgBoxSetForeground 65536指定消息框窗口作为前景窗口
[整理]使用MsgBox函数
使用MsgBox 函数 你目前使用的MsgBox函数局限于给用户用一个简单的，一个按钮的对话框显示信息。你点击确定按钮或者回车来关闭该信息框。要创建一个简单的信息框，只要在MsgBox函数名称后面带上一个用引号包括起来的文本就可以了。换句话说，要显示信息“过程已完成”，你应该准备下列语句：MsgBox "过程已完成" ‘（注意，英文状态的引号） 你可以将它输入立即窗口，快速地测试上面的指令，当你输入完这条指令并且回车后，VB 就显示如，图4－5的信息框。图4－5 将文本作为MsgBox函数的参数，来给用户显示信息MsgBox函数允许你使用其它参数，使你可能决定可用的按钮数目，或者将默认的信息框的标题（Microsoft Excel）改为你自己的标题。也可以设置你自己的帮助主题。MsgBox的语法如下：MsgBox (prompt [, buttons] [, title], [, helpfile, context])，注意，MsgBox函数有五个参数，只有第一个，Prompt（提示），是必须的；这些列在方括号里面的参数都是可选的。当你在提示参数输入一个非常长的文本时，VB决定如何断句，使文本适合信息框 大小。我们在立即窗口里来做些练习，看不同的文本格式技巧： 1. 在立即窗口输入以下指令，确保在一行里输入整个文本，回车 MsgBox "All done. Now open ""Chap04.xls"" and place an empty disk in the diskette drive.The following procedure will copy this file to the disk."一旦回车，VB显示信息框，如图4－6图4－6 如果你设置一下文本格式，长信息看上去将会更吸引人如果你遇到编译错误，可以点击确定，然后确定文件名用双引号括起来——““Chap04.xls””。 当你的信息文本特别长时，你可以使用VBA函数Chr将它分割为好几行。Chr函数需要你跟 参数，这个参数是0到255之间的数字，它返回这个数字代表的字符。例如Chr(13)返回的是回车（这和按下回车键相同），以及Chr(10)返回换行字符（这在文本行之间添加空行很有-------------
MsgBox函数用法讲解
MsgBox 函数用法讲解
VBA 中 msgbox 的用法小结
1、作用 在消息框中显示信息，并等待用户单击按钮，可返回单击的按钮值(比如“确定” 或者“取消”)。通常用作显示变量值的一种方式。 2、语法 MsgBox(Prompt[,Buttons][,Title][,Helpfile,Context]) 参数说明： (1)Prompt，必需的参数，为字符串，作为显示在消息框中的消息文本。其最大 长度约为 1024 个字符， 由所用字符的宽度决定。 如果 prompt 的内容超过一行， 则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10))或是回车与换行符的 组合(Chr(13)&Chr(10))将各行分隔开来。 (2)Buttons，可选的参数，为数值表达式的值之和，指定显示的按钮的数目及形 式、使用的图标样式、缺省按钮及消息框的强制回应等，可以此定制消息框。若 省略该参数，则其缺省值为 0。设置值见下表。 (3)Title，可选的参数，表示在消息框的标题栏中所显示的文本。若省略该参数， 则将应用程序名放在标题栏中。 (4)Helpfile，可选的参数，为字符串表达式，提供帮助文件。若有 Helpfile，则 必须有 Context。 (5)Context，可选的参数，为数值表达式，提供帮助主题。若有 Context，则必 须有 Helpfile。 3、Button 参数
用于 MsgBox 函数中 Button 参数的常量 常量 vbOKOnly VbOKCancel VbAbortRetryIgnore VbYesNoCancel VbYesNo VbRetryCancel VbCritical VbQuestion VbExclamation VbInformation vbDefaultButton1 vbDefaultButton2 vbDefaultButton3 vbDefaultButton4 vbApplicationModal 消息框 作出响应才继续工作 vbSystemModal 消息框作 出响应才继续工作 4096 系统强制返回； 全部应用程序都被挂起， 直到用户对 4 5 值 0 1 2 3 说明 只显示“确定”按钮 显示“确定”和“取消”按钮 显示“终止”、“重试”和“忽略” 按钮 显示“是”、“否”和“取消”按钮
显示“是”和“否”按钮 显示“重试”和“取消”按钮
16 显示“关键信息”图标 32 显示“警告询问”图标 48 显示“警告消息”图标 64 显示“通知消息”图标 0 第一个按钮是缺省值(缺省设置) 256 第二个按钮是缺省值 512 第三个按钮是缺省值 768 第四个按钮是缺省值 0 应用程序强制返回； 应用程序一直被挂起， 直到用户对
MsgBox函数用法讲解
MsgBox函数用法讲解 VBA中msgbox的用法小结 1、作用 在消息框中显示信息,并等待用户单击按钮,可返回单击的按钮值(比如“确定”或者“取消”)。通常用作显示变量值的一种方式。 2、语法 MsgBox(Prompt[,Buttons][,Title][,Help]) 参数说明: (1)Prompt,必需的参数,为字符串,作为显示在消息框中的消息文本。其最大长度约为1024个字符,由所用字符的宽度决定。如果prompt的内容超过一行,则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10))或就是回车与换行符的组合(Chr(13)&Chr(10))将各行分隔开来。 (2)Buttons,可选的参数,为数值表达式的值之与,指定显示的按钮的数目及形式、使用的图标样式、缺省按钮及消息框的强制回应等,可以此定制消息框。若省略该参数,则其缺省值为0。设置值见下表。 (3)Title,可选的参数,表示在消息框的标题栏中所显示的文本。若省略该参数,则将应用程序名放在标题栏中。 (4)Helpfile,可选的参数,为字符串表达式,提供帮助文件。若有Helpfile,则必须有C ontext。 (5)Context,可选的参数,为数值表达式,提供帮助主题。若有Context,则必须有H elpfile。 3、Button参数 用于MsgBox函数中Button参数的常量
常量值说明 vbOKOnly 0 只显示“确定”按钮 VbOKCancel 1 显示“确定”与“取消”按钮 VbAbortRetryIgnore 2 显示“终止”、“重试”与“忽略” 按钮VbYesNoCancel 3 显示“就是”、“否”与“取消”按钮 VbYesNo 4 显示“就是”与“否”按钮 VbRetryCancel 5 显示“重试”与“取消”按钮 VbCritical 16 显示“关键信息”图标 VbQuestion 32 显示“警告询问”图标 VbExclamation 48 显示“警告消息”图标 VbInformation 64 显示“通知消息”图标 vbDefaultButton1 0 第一个按钮就是缺省值(缺省设置) vbDefaultButton2 256第二个按钮就是缺省值 vbDefaultButton3 512第三个按钮就是缺省值 vbDefaultButton4 768第四个按钮就是缺省值 vbApplicationModal 0应用程序强制返回;应用程序一直被挂起,直到用户对消息框 作出响应才继续工作 vbSystemModal 4096系统强制返回;全部应用程序都被挂起,直到用户对消息框作 出响应才继续工作 vbMsgBoxHelpButton 16384将Help按钮添加到消息框
关于InputBox和Msgbox函数的用法介绍
关于InputBox和Msgbox函数的用法介绍— 关键词：Msgbox Inputbox 用法 InputBox 函数 在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的String。 语法 InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context]) InputBox 函数的语法具有以下几个命名参数的部分描述 Prompt 必需的。作为对话框消息出现的字符串表达式。prompt 的最大长度大约是1024 个字符，由所用字符的宽度决定。如果prompt 包含多个行，则可在各行之间用回车符(Chr(13))、换行符(Chr(10)) 或回车换行符的组合(Chr(13) & Chr(10)) 来分隔。 Title 可选的。显示对话框标题栏中的字符串表达式。如果省略title，则把应用程序名放入标题栏中。 Default 可选的。显示文本框中的字符串表达式，在没有其它输入时作为缺省值。如果省略default，则文本框为空。 Xpos 可选的。数值表达式，成对出现，指定对话框的左边与屏幕左边的水平距离。如果省略xpos，则对话框会在水平方向居中。 Ypos 可选的。数值表达式，成对出现，指定对话框的上边与屏幕上边的距离。如果省略ypos，则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。 Helpfile 可选的。字符串表达式，识别帮助文件，用该文件为对话框提供上下文相关的帮助。如果已提供helpfile，则也必须提供context。 Context 可选的。数值表达式，由帮助文件的作者指定给某个帮助主题的帮助上下文编号。如果已提供c ontext，则也必须要提供helpfile。 举例 本示例说明使用InputBox 函数来显示用户输入数据的不同用法。如果省略x 及y 坐标值，则会自动将对话框放置在两个坐标的正中。如果用户单击“确定”按钮或按下“ENTER”按键，则变量MyValue 保存用户输入的数据。如果用户单击“取消”按钮，则返回一零长度字符串。 Dim Message, Title, Default, MyValue
MsgBox函数和语句
MsgBox函数和语句 基础知识2007-07-27 10:15:46 阅读71 评论0 字号：大中小订阅 MsgBox其实有两种格式： 一、MsgBox函数 格式：MsgBox(msg[,type][,title][,helpfile,context]) 该函数有5个参数，第一个是必需的，后面的都是可选的。 （1）msg：是一个字符串，长度不能超过1024个字符，超过的会被截掉。这个字符串的内容就是在MsgBox 函数产生的对话框内显示。如果一行显示不完，可以用"Chr$(13)+Chr$(10)”强制换行。 （2）type：是一个整数值或符号常量，用来控制在对话框内显示的按钮、图标的种类及数量。比如说是显示“确定”、“取消”还是显示“终止”、“重试”、“忽略”等。由于type参数的取值较多，就不一一例举了，楼主可以自己去搜搜。 （3）title：也是字符串，其内容就是对话框的标题。 （4）helpfile，context：helpfile是一个字符串变量或字符串表达式，用来表示帮助文件的名字；context 是一个数值变量或表达式，用来表示相关帮助主题的帮助目录号。这两个参数必须同时使用或同时省略。如果使用了这两个参数，对话框中会出现一个“帮助”按钮，单击或按F1就可以得到相关帮助信息。 二、MsgBox语句 格式：MsgBox msg[,type][,title][,helpfile,context] 各参数的含义与作用与上面的MsgBox函数一样的。 三、MsgBox函数与MsgBox语句的区别 MsgBox函数有返回值，而MsgBox语句是没有返回值的。例如： 函数：x=MsgBox("戴草帽",vbOKOnly,"工程1") 这个对话框只有一个确定按钮，返回值为1，也就是说用户如果点了这个确定，x就等于1了。 语句：MsgBox "戴草帽",vbOKOnly,"工程" 这个是没有返回值的。 要注意的是：MsgBox作为函数使用时必须加括号，而作为语句使用时不需要括号，但MsgBox后面要有一个空格。 MsgBox函数 信息框函数（MsgBox）是常用的输出信息的函数。它在对话框中显示信息，等待用户单击按钮，并返回一个整数以标明用户单击了哪一个按钮。其语法格式如下： 变量=MsgBox (信息内容) [,<对话框类型> [,<对话框标题> ]] ) 说明：<信息内容>指定在对话框中出现的文本，在信息内容中使用硬回车符(CHR13）可以使文本换行。对话框的宽度和高度随着的内容的增加而增加，最多可以有1024个字符。 <对话框类型>指定对话框中出现的按钮和图标，一般有三个参数。其取值和含义如表3-3-1、表3-3-2和表3-3-3所示。表3-3-1参数1：出现按钮 值常量说明
vb中msgbox用法
VB中的函数,可实现弹出窗口、 作用:在对话框中显示消息,等待用户单击按钮,并返回一个Integer 告诉用户单击哪一个按钮。 语法: MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 参数说明: MsgBox 函数的语法具有以下几个命名参数: Prompt-------必需的。字符串表达式,作为显示在对话框中的消息。prompt 的最大长度大约为1024 个字符,由所用字符的宽度决定。如果prompt 的内容超过一行,则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10)) 或就是回车与换行符的组合(Chr(13) & Chr(10)) 将各行分隔开来。 Buttons-------可选的。数值表达式就是值的总与,指定显示按钮的数目及形式,使用的图标样式,缺省按钮就是什么以及消息框的强制回应等。如果省略,则buttons 的缺省值为0。 Title-------可选的。在对话框标题栏中显示的字符串表达式。如果省略 title,则将应用程序名放在标题栏中。 Help可选的。字符串表达式,识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了helpfile, 则也必须提供context。 Context-------可选的。数值表达式,由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了context,则也必须提供helpfile。 用于MsgBox函数中Button参数的常量 常量值说明 vbOKOnly 0 只显示“确定”按钮 VbOKCancel 1 显示“确定”与“取消”按钮 VbAbortRetryIgnore 2 显示“终止”、“重试”与“忽略” 按钮 VbYesNoCancel 3 显示“就是”、“否”与“取消”按钮 VbYesNo 4 显示“就是”与“否”按钮 VbRetryCancel 5 显示“重试”与“取消”按钮 VbCritical 16 显示“关键信息”图标 VbQuestion 32 显示“警告询问”图标 VbExclamation 48 显示“警告消息”图标 VbInformation 64 显示“通知消息”图标 vbDefaultButton1 0 第一个按钮就是缺省值(缺省设置) vbDefaultButton2 256第二个按钮就是缺省值 vbDefaultButton3 512第三个按钮就是缺省值 vbDefaultButton4 768第四个按钮就是缺省值 vbApplicationModal 0应用程序强制返回;应用程序一直被挂起,直到用户对消息框 作出响应才继续工作 vbSystemModal 4096系统强制返回;全部应用程序都被挂起,直到用户对消息框作 出响应才继续工作 vbMsgBoxHelpButton 16384将Help按钮添加到消息框 VbMsgBoxSetForeground 65536指定消息框窗口作为前景窗口 vbMsgBoxRight 524288文本为右对齐 vbMsgBoxRtlReading 1048576指定文本应为在希伯来与阿拉伯语系统中的从右到左显示 说明: (1)第一组值(0–5)描述了消息框中显示的按钮的类型与数目;第二组值(16,32,48,64)描述了图标的样式;第三组值(0,256,512,768)说明哪一个按钮就是缺省值;而第四组值(0,4096)则决定消息框的强制返回
Excel vba中MsgBox 函数详细说明与应用
Excel vba中MsgBox 函数详细说明与应用 MsgBox 函数 作用：在对话框中显示消息，等待用户单击按钮，并返回一个Integer 告诉用户单击哪一个按钮。 语法： MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 参数说明： MsgBox 函数的语法具有以下几个命名参数： Prompt-------必需的。字符串表达式，作为显示在对话框中的消息。prompt的最大长度大约为 1024 个字符，由所用字符的宽度决定。如果prompt 的内容超过一行，则可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组 合 (Chr(13) & Chr(10)) 将各行分隔开来。 Buttons-------可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则buttons的缺省值为 0。 Title-------可选的。在对话框标题栏中显示的字符串表达式。如果省略title，则将应用程序名放在标题栏中。 Helpfile--------可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了helpfile，则也必须提供context。 Context-------可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了context，则也必须提供helpfile。 用于MsgBox函数中Button参数的常量 常量值说明 vbOKOnly 0 只显示“确定”按钮 VbOKCancel 1 显示“确定”和“取消”按钮 VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略”按钮 VbYesNoCancel 3 显示“是”、“否”和“取消”按钮 VbYesNo 4 显示“是”和“否”按钮 VbRetryCancel 5 显示“重试”和“取消”按钮 VbCritical 16 显示“关键信息”图标 VbQuestion 32 显示“警告询问”图标 VbExclamation 48 显示“警告消息”图标 VbInformation 64 显示“通知消息”图标 vbDefaultButton1 0 第一个按钮是缺省值(缺省设置) vbDefaultButton2 256 第二个按钮是缺省值 vbDefaultButton3 512 第三个按钮是缺省值
VB_MsgBox函数
MsgBox()函数 在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。 语法： M sgBox(prompt[, buttons] [, title] [, helpfile, context]) MsgBox 函数的语法具有以下几个命名参数： Prompt 必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。如果 prompt 的内容超过一行，则可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组合 (Chr(13) & Chr(10)) 将各行分隔开来。 Buttons 可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则 buttons 的缺省值为 0。Title 可选的。在对话框标题栏中显示的字符串表达式。如果省略 title，则将应用程序名放在标题栏中。 Helpfile 可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了 helpfile，则也必须提供 context。 Context 可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了 context，则也必须提供 helpfile。
返回值： 说明： 在提供了 helpfile 与 context 的时候，用户可以按 F1 来查看与 context 相应的帮助主题。像 Microsoft Excel 这样一些主机应用程序也会在对话框中自动添加一个 Help 按钮。 如果对话框显示 Cancel 按钮，则按下 ESC 键与单击 Cancel 按钮的效果相同。如果对话框中有 Help 按钮，则对话框中提供有上下文相关的帮助。但是，直到其它按钮中有一个被单击之前，都不会返回任何值。 注意：如果还要指定第一个命名参数以外的参数，则必须在表达式中使用 MsgBox。为了省略某些位置参数，必须加入相应的逗号分界符。
msgbox函数用法详解
使用过Windows 及其应用软件的人肯定熟悉如图1所示的消息框，这在VB 中可用MsgBox 函数来实现。 MsgBox 函数的使用格式如下： 变量=MsgBox(提示[，按钮][，标题]) 其中： (1) 变量 用于指定接收函数的返回值。MsgBox 函数的返回值是一个整数，因此变量一般为整型变量。 (2) 提示与标题 意义同InputBox 函数。 (3) 按钮 整型表达式，决定消息框中按钮的数目、类型及出现在消息框上的图标类型。其设置见表1。 在表1中，“按钮”设置值被分成了三组。具体使用时，由每一组中取一个值相加而成。当然，并非每次都要取三个值，也可以取两个、一个甚至全部省略。 表 1 消息框中“按钮”设置值及意义 分组 常数 值 描述 按钮数目及类型 vbOKOnly 0 只显示“确定”按钮 vbOKCancel 1 显示“确定”及“取消”按钮 vbAbortRetryIgnore 2 显示“中断”、“重试”及“忽略”按钮 vbYesNoCancel 3 显示 “是”、“否”及“取消”按钮 vbYesNo 4 显示“是”及“否”按钮 vbRetryCancel 5 显示“重试”及“取消”按钮 图标类型 vbCritical 16 显示红色的STOP 标志，用于严重警告信息 vbQuestion 32 显示“？”图标，用于询问信息 vbExclamation 48 显示“！”图标，用于警告信息 vbInformation 64 显示“i ”图标，用于一般信息 默认按钮 vbDefaultButton1 0 第一个按钮是缺省值 vbDefaultButton2 256 第二个按钮是缺省值 vbDefaultButton3 512 第三个按钮是缺省值 如要产生图1所示的消息框，可用如下语句： x=MsgBox("是否保存对“第四章 基本控制结构.doc ”的修改？", 3 + vbExclamation + vbdefultbutton1, "Microsoft Word") 在实习时，可以将除提示与标题外的其它参数，按表中的内容进行更换，体会各种不同组合对消息框内容的影响。这一部分一定要自己在实习的时候多试一试。 变量x 用于记录用户按了消息框中哪一个按钮，不同的按钮返回的值不同。各个按钮的返回值见表2。 图1 Word 中的保存文件消息框
msgbox函数用法详解
使用过Windows及其应用软件的人肯定熟悉如图1所示的消息框，这在VB中可用MsgBox 函数来实现。 图1 Word中的保存文件消息框 MsgBox函数的使用格式如下： 变量=MsgBox(提示[，按钮][，标题]) 其中： (1) 变量用于指定接收函数的返回值。MsgBox函数的返回值是一个整数，因此变量一般为整型变量。 (2) 提示与标题意义同InputBox函数。 (3) 按钮整型表达式，决定消息框中按钮的数目、类型及出现在消息框上的图标类型。其设置见表1。 在表1中，“按钮”设置值被分成了三组。具体使用时，由每一组中取一个值相加而成。当然，并非每次都要取三个值，也可以取两个、一个甚至全部省略。 表1 消息框中“按钮”设置值及意义 如要产生图1所示的消息框，可用如下语句： x=MsgBox("是否保存对“第四章基本控制结构.doc”的修改？", 3 + vbExclamation + vbdefultbutton1, "Microsoft Word") 在实习时，可以将除提示与标题外的其它参数，按表中的内容进行更换，体会各种不同组合对消息框内容的影响。这一部分一定要自己在实习的时候多试一试。 变量x用于记录用户按了消息框中哪一个按钮，不同的按钮返回的值不同。各个按钮的返回值见表2。
表2 MsgBox 函数按钮及其返回值对照表 后续程序可根据变量不同的返回值编写程序代码，以完成相应的任务。 例1 MsgBox 函数应用举例。以前面任何一个例题为例，当单击窗体的“关闭”按钮时程序不会立即结束运行，而是给用户一个确认信息提示，如图2所示。 分析：在窗体的Form_QueryUnload 事件过程中有Cancel 和UnloadMode 两个参数，可以通过Cancel 的值来决定窗体是否退出。当Cancel 值为0时正常退出，非0值时取消退出。 Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) x = MsgBox("确认要结束程序吗？", vbQuestion + vbYesNo + 256, "确认退出") If x = vbYes Then '单击是(Y)按纽 Cancel = 0 Else Cancel = 1 '单击否(N)按纽 End If End Sub 将这段代码加到你任何一个程序代码中，当单击窗体关闭按 钮时，就可以选择是否退出了。 有时，程序中只需要用MsgBox 函数向用户提供一个信息， 并不需要返回值，这种情况只需一个“确定”按钮。VB 中对不需要返回值的MsgBox 函数调用格式如下： MsgBox 提示[，按钮][，标题] 这种方式在简单的程序设计中可以做为输出结果的有效方法，更多的是在调试程序时用以检查程序的运行情况。 第2章已经学习了VB 系统常数，通过MsgBox 函数的学习，应进一步加深对系统常数作用的理解。从以上两个表中可以看到，MsgBox 函数按钮的取值很多，如果全部按直接常数来记忆就容易混淆，而记忆系统常数就要容易得多，例如记住系统常量“vbYesNoCancel ”就要比记忆直接常数“3”容易，同样，在返回值中，记住“vbNo ”比记“7”要容易得多。 图2 MsgBox 函数举例
VB应用—函数详解与应用说明
VB—函数详解与应用说明 VB常用函数介绍 一、常用内部函数 在VB内部提供了大量函数。在这些函数中，有些是通用的。有些则与某种操作有关的。大体分成五类，分别是：转换函数、数学函数、日期函数、时间函数和随机函数。 （1）转换函数 函数名功能 Int(x) 返回不大于自变量的最大整数。 Fix(x) 去掉一个浮点数的小数部分,保留其整数部分。Hex(x) 把一个十进制数转换成为十六进制数。 Oct(x) 把一个十进制数转换成为八进制数。 Asc(x) 返回字符串中第一个字符的ASCII码。 Chr(x) 把值转换为相应的ASCII字符。 Str(x) 把值转换为一个字符串 Cint(x) 把小数部分四舍五入，转换为整数。
Ccur(x) 把值转换为货币类型，小数部分最多保留4位。CDbl(x) 把值转换为双精度数值。 CLng(x) 把值小数部分四舍五入转换为长整型数值。CSng(x) 把值转换为单精度数值。 CVar(x) 把值转换为变体类型值。 （2）数学函数 函数名功能 Sin(x) 返回正弦值。 Cos(x) 返回余弦值。 Tan(x) 返回正切值。 Atn(x) 返回反正切值。 Abs(x) 返回绝对值。 Sgn(x) 返回自变量的符号。即： 值为负数时，函数返回-1 值为0时，函数返回0 值为正数时，函数返回1 Sqr(x) 返回自变量x的平方根，自变量必须大于或等于0。
Exp(x) 返回以e为底数，以x为指数的值，即求e的x 次方。 （3）日期函数 函数名功能 Day(Now) 返回当前的日期。 WeekDay(Now) 返回当前的星期。 Month(Now) 返回当前的月份。 Year(Now) 返回当前的年份。 （4）时间函数 函数名功能 Hour(Now) 返回小时（0~23）。 Minute(Now) 返回分钟（0~59）。 Second(Now) 返回秒（0~59）。 （5）随机函数 Rnd(x) 产生一个0~1之间的单精度随机数 Rnd函数可以产生随机数，当一个应用程序不断地重复使用随机数时，同一序列的随机数会反复出现，用Randomize语句可以消除这种情况。
MSGBOX 输出函数
MsgBox函数 5.3 MsgBox函数和MsgBox语句 在使用Windows时，如果操作有误，屏幕上会显示一个对话框.让用户进行选择，然后根据选择确定其后的操作。MsgBox函数的功能与此类似，它可以向用户传送信息，并可通过用户在对话框上的选择接收用户所做的响应，作为程序继续执行的依据。 5.3.1 MsgBox函数 MsgBox函数的格式如下: MsgBox(msg[.type][.title][，helpfile，context]) 该函数有5个参数，除第一个参数外，其余参数都是可选的。各参数的含义如下: (1) msg:是一个字符小，其长度不能超过1024个字符，如果超过，则多余的字符被截掉。该字符串的内容将在由MsgBox函数产生的对话框内显示。当字符串在一行内显示不完时，将自动换行，当然也可以用“Chr$(13)+Chr$(10)”强制换行。 (2)type是一个整数值或符号常量.用来控制在对话框内显示的按钮、图标的种类及数量。该参数的值油4类数值相加产生，这4类数值或符号常量分别表示按钮的类型、显示图标的种类、活动按钮的位置及强制返回，见表5.2。
①数值0-5:对话框内按钮的类型和数量。按钮共有7种，即确认、取消、终止、重试、忽略、是、否。每个数值表示一种组合方式。 ②数值16、32、48、64;指定对话框所显示的图标。共有4种，其中16指定暂停;32表示疑问(?);48通常用于警告(!);64用于忽略(i)。 ③数值0、256、512、768;指定默认活动按钮。活动按钮中文字的周围有虚线，按回车键可执行该按钮的操作。 ④数值0、4096:分别用于应用程序和系统强制返回。
execScript的用法及msgbox详解
execScript的用法及msgbox详解 一。首先了解一下execScript的格式： execScript(sExpression , sLanguage ); sExpression表示要执行的代码； sLanguage表示执行该代码所使用的语言，分为 JavaScript,JScript,VBScript; 二。通过实例解说一下其用法： ---------------------------------------aa.php 从此开始 ---------------------------------------aa.php 到此结束 ---------------------------------------aa2.php 从此开始 ---------------------------------------aa2.php 到此结束 ---------------------------------------aa3.php 从此开始
VBA的msgbox用法
VBA的msgbox用法 显示提醒分行： Sub testLine() MsgBox "第一行" & vbCrLf _ & "第二行" & vbCrLf _ & "第三行" & vbNewLine _ & "第四行" End Sub 显示带有引号的： Sub testLine() MsgBox "I am ""a"" boy." End Sub 显示表中A1-D3的内容：
Sub 测试排列() Dim msg As String Dim r As Long, c As Long msg = "" For r = 1 To 4 For c = 1 To 3 msg = msg & Cells(r, c) & vbTab Next c msg = msg & vbCrLf Next r MsgBox msg, vbInformation End Sub vbCrLf Chr(13) + Chr(10) 回车符与换行符结合 vbCr Chr(13) 回车符 vbLf Chr(10) 换行符 得知用户按的button: Sub 测试按() Dim a As Long a = MsgBox("你按一个按钮我知道哦！", vbOKCancel + vbInformation, "试一下") '作为函数调用时这里的括号不能少 If a = vbOK Then 'vbOK 是内部常数，这里可以用vbOK对应的数值替换写成【 if a=1 then 】内部常数表见后面 MsgBox "你刚刚按了确定！" ElseIf a = vbCancel Then MsgBox "你刚刚按了取消！" End If 这段代码也可以这样写: If MsgBox("你按一个按钮我知道哦！", vbOKCancel + vbInformation, "试一下") = vbOK Then MsgBox "你刚刚按了确定！" Else MsgBox "你刚刚按了取消！" End If End Sub
VBA的msgbox用法
VBA的msgbox用法 2011-04-25 22:23 显示提醒分行： Sub testLine() MsgBox "第一行" & vbCrLf _ & "第二行" & vbCrLf _ & "第三行" & vbNewLine _ & "第四行" End Sub 显示带有引号的： Sub testLine() MsgBox "I am ""a"" boy." End Sub 显示表中A1-D3的内容： Sub 测试排列()
Dim msg As String Dim r As Long, c As Long msg = "" For r = 1 To 4 For c = 1 To 3 msg = msg & Cells(r, c) & vbTab Next c msg = msg & vbCrLf Next r MsgBox msg, vbInformation End Sub vbCrLf Chr(13) + Chr(10) 回车符与换行符结合 vbCr Chr(13) 回车符 vbLf Chr(10) 换行符 得知用户按的button: Sub 测试按() Dim a As Long a = MsgBox("你按一个按钮我知道哦！", vbOKCancel + vbInformation, "试一下") '作为函数调用时这里的括号不能少 If a = vbOK Then 'vbOK 是内部常数，这里可以用vbOK对应的数值替换写成【 if a=1 then 】内部常数表见后面 MsgBox "你刚刚按了确定！" ElseIf a = vbCancel Then MsgBox "你刚刚按了取消！" End If 这段代码也可以这样写: If MsgBox("你按一个按钮我知道哦！", vbOKCancel + vbInformation, "试一下") = vbOK Then MsgBox "你刚刚按了确定！" Else MsgBox "你刚刚按了取消！" End If End Sub
MsgBox用法
在对话框中显示消息，等待用户单击按钮，并返回一个Integer 告诉用户单击哪一个按钮。MsgBox " 你想显示的内容", vbOKCancel 在MsgBox 里显示一段话，下方再加上“确定”“取消” 语法 MsgBox(prompt[, buttons] [, title] [, helpfile, context]) MsgBox 函数的语法具有以下几个命名参数： 部分描述 Prompt 必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为1024 个字符，由所用字符的宽度决定。如果prompt 的内容超过一行，则可以在每一行之间用回车符(Chr(13))、换行符(Chr(10)) 或是回车与换行符的组合(Chr(13) & Chr(10)) 将各行分隔开来。 Buttons 可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则buttons 的缺省值为0。 Title 可选的。在对话框标题栏中显示的字符串表达式。如果省略title，则将应用程序名放在标题栏中。 Helpfile 可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了helpfile，则也必须提供context。 Context 可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了context，则也必须提供helpfile。 设置值 buttons 参数有下列设置值： 常数值描述 vbOKOnly 0 只显示OK 按钮。 VbOKCancel 1 显示OK 及Cancel 按钮。 VbAbortRetryIgnore 2 显示Abort、Retry 及Ignore 按钮。 VbYesNoCancel 3 显示Yes、No 及Cancel 按钮。 VbYesNo 4 显示Yes 及No 按钮。 VbRetryCancel 5 显示Retry 及Cancel 按钮。 VbCritical 16 显示Critical Message 图标。 VbQuestion 32 显示Warning Query 图标。 VbExclamation 48 显示Warning Message 图标。 VbInformation 64 显示Information Message 图标。 vbDefaultButton1 0 第一个按钮是缺省值。