VisualBasic程序的输入和输出.pptVIP

Visual Basic 程序设计第四章程序的输入和输出 主要内容 利用控件输入、输出 文本框的 Text属性，I/O 标签的 Caption属性，Output 对话框 输入对话框函数InputBox 消息对话框函数MsgBox Print方法 输入对话框 InputBox(Prompt,Title,Default,Xpos,Ypos) Prompt 提示字符串 Title 对话框标题 Default 缺省输入值 Xpos,Ypos 对话框位置（左上角座标） 返回用户输入（String类型） 例：a=InputBox(n=,输入,1) 消息对话框 MsgBox(Prompt,Buttons,Title) Prompt 提示字符串 Buttons 按钮及图标 Title 对话框标题 返回用户所单击的按钮对应值 消息对话框中的按钮 消息对话框中的图标 MsgBox函数的返回值 Print方法 格式： [对象名.] Print [表达式表] [; | , |空格] 分号(;)表示后面内容将接着输出 逗号(,)表示后面内容将跳至下个制表站输出制表站位置：n*14+1 回车表示后面内容将从下一行开始输出 可以用问号(?)代替 Print 以简化输入 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 具有Print方法的对象 窗体（Form） 图片框（PictureBox） 立即窗口（Debug） 打印机（Printer） 说明：引用所在窗体时，对象名可以省略，也可以用Me代表 在Print方法中常用的函数 Tab(n) 跳至第n列，输出后面内容 Spc(n) 插入n个空格 例： Print Tab(10);学号;Tab(20);姓名;Tab(30);性别 Print 学号;Spc(4);姓名;Spc(6);性别 与Print有关的属性 AutoRedraw（自动重画）属性为False（初值）时，用Print方法和绘图方法输出的内容被其他窗体遮挡后会被抹去。为此，应将该属性设置为True 改变CurrentX和CurrentY属性（当前输出位置）可以改变下个输出的位置例如： CurrentX=Width/2 : CurrentY=Height/2 Print 0 ‘在窗体中心位置输出 0 输出字体与颜色 与Print有关的方法 可用Cls方法清除用Print方法和绘图方法输出的内容，格式： [对象名.]Cls 清除后，当前座标回到对象的左上角 文本框的主要属性 Text 显示的文本,缺省属性 MultiLine 为True时允许多行显示 ScrollBar 滚动条,只有在MultiLine属性为True时才有意义 PassWordChar 口令字符。代替显示用户输入的字符。只当MultiLine属性为False时才起作用。 Locked 禁止用户输入，使文本框只能输出 关于焦点（Focus） 事件：GotFocus和LostFocus 获得焦点和失去焦点。任何时刻只能有一个控件获得焦点。 方法：SetFocus 属性：TabIndex Tab键序 TabStop 允许/禁止获得焦点 没有TabStop属性的控件当然不会获得焦点。 滚动条－Hscrollbar和Vscrollbar 主要属性 Max 最大值 Min 最小值 Value 当前值 LargeChange 大增量 SmallChange 小增量 事件 Change 值改变时 Scroll 滚动时 ? ■ Visual BASIC 程序设计 * 按钮 图标 重试，取消 5 vbRetryCancel 是，否 4 vbYesNo 是，否，取消 3 vbYesNoCancel 终止，重试，忽略 2 vbAbortRetryIgnore 确定，取消 1 vbOKCancel 确定 0 vbOKOnly 按钮 数值 常量名称 64 vbInformation 48 vbExclamation 32 vbQuestion 16 vbCritical 图标 数值 常量名称 否 7 vbNo 是 6 vbYes 忽略 5 vbIgnore 重试 4 vbRetry 终止 3 vbAbort 取消 2 vbCancel 确定 1 vbOK 用户点击的按钮