VBA数据输入和输出.ppt

4.2数据输入:inputbox函数,产生一个对话框,作为输入数据的界面,并返回所输入的内容.,1函数的格式,格式：InputBox（PROMPT,TITLE,DEFAULT,XPOS,YPOS,HELPFILE,CONTEXT）,2.函数的参数,（1）PROMPT：提示信息（不超过1024个字符）,（2）TITLE：对话框的标题,（3）DEFAULT：作为默认输入值；缺省，输入区空白,（4）XPOS,YPOS：整数，单位twip。对话框在屏幕中的显示位置XPOS：左边距；YPOS：上边距。XPOS和YPOS或者成对使用，或者都省略缺省：对话框位于屏幕中心线向下三分之一处,（5）HELPFILE,CONTEXT：,HELPFILE：字符串变量或字符串表达式，帮助文件的名称；CONTEXT：数值变量或表达式，相关帮助主题的目录号。,使用这组参数，在对话框中将增加一个帮助按钮。按帮助按钮或F1键将得到相应的帮助信息。这两个参数或者全部使用，或者全部缺省。,例4-3.vbp,例4-4.vbp,3.说明：,（1）PROMPT：系统可以自动换行。人为换行，需插入回车符chr$(13)+chr$(10)或vbcrlf,（2）返回值：字符串。想输入非字符串类型信息，需要类型转换或对返回值的类型事先声明,（3）InputBox一次只能输入一个值，需要多个输入时，需要多次调用InputBox函数,（4）InputBox函数也可以写成InputBox$，两种形式等价,4.3MsgBox函数和MsgBox语句,在使用windows时,如果操作有误,屏幕上会显示一个对话框,让用户进行选择,然后根据选择确定其后的操作.Msgbox函数的功能与此类似,它可以向用户传送信息,并可通过用户在对话框上的选择接收用户所做的响应,作为程序继续执行的依据.,4.3.1MsgBox函数,1.函数的格式,MsgBox（MESSAGE，TYPE,TITLE,HELPFILE,CONTEXT,2.函数的参数,（1）MESSAGE：不超过1024个字符的字符串。提示信息.自动换行,也可利用chr$(13)+chr$(10)手动换行.,（2）TYPE：对话框内图标和按钮的种类及数量。参数的值由表中四种类型的数值相加产生，通常只用前三类数值若省略TYPE,默认值为0,只显示一个”确定”按钮,不显示任何图标.,使用MsgBox函数，可以产生一个对话框来显示消息当用户单击某个按钮后，将返回一个数值以标明用户单击了哪个按钮,应用程序强制返回系统强制返回,04096,VbApplicationModalvbSystemModal,强制返回,第一个按钮是默认值第二个按钮是默认值第三个按钮是默认值第四个按钮是默认值,0256512768,vbDefaultButton1VbDefaultButton2VbDefaultButton3VbDefaultButton4,默认活动按钮,功能,数值,符号常量,类型,（3）TITLE：对话框的标题。省略参数，工程的名称将作为对话框标题；不想显示标题，参数设为空串,3.函数的返回值,（1）返回1或符号常量vbOK，表明选择了“确定”按钮（2）返回2或符号常量vbCancel，表明选择了“取消”按钮（3）返回3或符号常量vbAbort，表明用户选择了“终止”按钮（4）返回4或符号常量vbRetry，表明用户选择了“重试”按钮（5）返回5或符号常量vbIgnore，表明用户选择了“忽略”按钮（6）返回6或符号常量vbYes，表明用户选择了“是”按钮（7）返回7或符号常量vbNo，表明用户选择了“否”按钮,共有7种按钮，返回值为17之间的一个数，分别与7个按钮相对应,例4-5.vbp,例4-6.vbp,5.说明：,（1）信息框内标有虚线框的按钮是当前活动按钮，鼠标单击该按钮或按回车键，表示选中该按钮,“模态窗口”：程序运行时，出现对话框，用户必须做出选择，否则不能继续运行，处于等待状态,（2）提示信息（MESSAGE）可以按自己的要求换行，需要自行插入回车符,（3）MsgBox的返回值常作为程序继续运行的依据,（4）MsgBox产生的对话框属于“模态窗口”（ModalWindow）,4.3.2MsgBox语句