isua|Basi程序设计 第四章 程序的输入和输出 万博科技职业学院
Visual Basic 程序设计 第四章 程序的输入和输出 万博科技职业学院
博科技业学院 主要内容 ●利用控件输入、输出 文本框的Text属性,WO 标签的 Caption属性, Output 对话框 输入对话框函数 inpuTbox 程序设计 消息对话框函数 Msg Box ● Print方法
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程序设计 主要内容 利用控件输入、输出 ⚫ 文本框的 Text属性，I/O ⚫ 标签的 Caption属性，Output 对话框 ⚫ 输入对话框函数InputBox ⚫ 消息对话框函数MsgBox Print方法
博科技业学院 输入对话框 e InputBox(Prompt, Title, Default, Xpos, Ypos) Prompt提示字符串 ●Tite 对话框标题 Default 缺省输入值 Xpos,Ypos对话框位置(左上角座标) 程序设计 返回用户输入( String类型) ●例:a= InputBox("n=","输入","1)
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 输入对话框 InputBox(Prompt,Title,Default,Xpos,Ypos) ⚫ Prompt 提示字符串 ⚫ Title 对话框标题 ⚫ Default 缺省输入值 ⚫ Xpos,Ypos 对话框位置（左上角座标） 返回用户输入（String类型） 例：a=InputBox("n=","输入","1")
博科技业学院 肖息对话框 e Msg Box(Prompt, Buttons, Title) Prompt提示字符串 ● Buttons按钮及图标 按钮 Title 对话框标题 ●返回用户所单击的按钮对应值① 程序设计
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 消息对话框 MsgBox(Prompt,Buttons,Title) ⚫ Prompt 提示字符串 ⚫ Buttons 按钮及图标 ⚫ Title 对话框标题 返回用户所单击的按钮对应值 按钮 图标
博科技业学院 肖息对话框中的按钮 常量名称 数值 按钮 vbOKonly 0确定 vboKcancel 1确定,取消 HQ babortRetrylgnore2终止,重试,忽略 vb Yes NoCancel 3是,否,取消 vb YesNo 4是,否 vbRetry Cancel 5重试,取消
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 消息对话框中的按钮 常量名称 数值 按钮 vbOKOnly 0 确定 vbOKCancel 1 确定，取消 vbAbortRetryIgnore 2 终止，重试，忽略 vbYesNoCancel 3 是，否，取消 vbYesNo 4 是，否 vbRetryCancel 5 重试，取消
博科技业学院 消息对话框中的图标 常量名称 数值 图标 vb Critical 16 vb Question 32 exclamation 48 程序设计 inFormation 64
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 消息对话框中的图标 常量名称 数值 图标 vbCritical 16 vbQuestion 32 vbExclamation 48 vbInformation 64
博科技业学院 MsgBox函数的返回值 常量名称数值用户点击的按钮 vbOK 确定 vbCancel 2取消 abort 3终止 vbRetr 4重试 程序设计 vblgnore 5忽略 vb Yes 6是 Vbn 7否
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 MsgBox函数的返回值 常量名称 数值 用户点击的按钮 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否
博科技业学院 Print方法 格式: 对象名]Prnt[表达式表>][|,空格] 分号()表示后面内容将接着输出 逗号()表示后面内容将跳至下个制表站输出 程 制表站位置:n*14+1 例 序 回车表示后面内容将从下一行开始输出 没 计 ●可以用问号(?)代替 Print以简化输入
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 Print方法 格式： [对象名.] Print [] [; | , |空格] ⚫ 分号(;)表示后面内容将接着输出 ⚫ 逗号(,)表示后面内容将跳至下个制表站输出 制表站位置：n*14+1 ⚫ 回车表示后面内容将从下一行开始输出 可以用问号(?)代替 Print 以简化输入 例
博科技业学院 Private Sub Command1 Click Print"135791357913579" Print,. color Picture1. Print"135791357913579 Picture1 Print "more","no","yes End sub 制表站 制表站的135791357913579 位置: a but color Command1 程序设计 1,15,29 35791357913579 e no yes (14n+1)
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 Private Sub Command1_Click() Print "1 3 5 7 9 1 3 5 7 9 1 3 5 7 9" Print "ax", "but", "color" Picture1.Print "1 3 5 7 9 1 3 5 7 9 1 3 5 7 9" Picture1.Print "more", "no", "yes" End Sub 制表站的 位置： 1,15,29, … (14n+1)
博科技业学院 具有 Print方法的对象 ●窗体(Form) 图片框( Picture Box) ●立即窗口( Debug ●打印机( Printer) 序 说明:引用所在窗体时,对象名可以省略,许 也可以用Me代表
■ 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. Visual BASIC 程 序 设 计 具有Print方法的对象 窗体（Form） 图片框（PictureBox） 立即窗口（Debug） 打印机（Printer） 说明：引用所在窗体时，对象名可以省略， 也可以用Me代表