Visual Basic 程序设计 第四章 程序的输入和输出

Presentation on theme: "Visual Basic 程序设计 第四章 程序的输入和输出"— Presentation transcript:

1 Visual Basic 程序设计 第四章 程序的输入和输出

2 主要内容 利用控件输入、输出 对话框 Print方法 文本框的 Text属性，I/O 标签的 Caption属性，Output
输入对话框函数InputBox 消息对话框函数MsgBox Print方法

3 输入对话框 InputBox(Prompt,Title,Default,Xpos,Ypos) 返回用户输入（String类型）
例：a=InputBox("n=","输入","1")

4 消息对话框 MsgBox(Prompt,Buttons,Title) 返回用户所单击的按钮对应值 Prompt 提示字符串
图标

5 消息对话框中的按钮 常量名称 数值 按钮 vbOKOnly 确定 vbOKCancel 1 确定，取消 vbAbortRetryIgnore
确定 vbOKCancel 1 确定，取消 vbAbortRetryIgnore 2 终止，重试，忽略 vbYesNoCancel 3 是，否，取消 vbYesNo 4 是，否 vbRetryCancel 5 重试，取消

6 消息对话框中的图标 常量名称 数值 图标 vbCritical 16 vbQuestion 32 vbExclamation 48
vbInformation 64

7 MsgBox函数的返回值 常量名称 数值 用户点击的按钮 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 终止
vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否

8 Print方法 格式： 可以用问号(?)代替 Print 以简化输入
分号(;)表示后面内容将接着输出 逗号(,)表示后面内容将跳至下个制表站输出 制表站位置：n*14+1 回车表示后面内容将从下一行开始输出 可以用问号(?)代替 Print 以简化输入 例

9 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 " " Picture1.Print "more", "no", "yes" End Sub 制表站的位置： 1,15,29,… (14n+1)

10 具有Print方法的对象 窗体（Form） 图片框（PictureBox） 立即窗口（Debug） 打印机（Printer）
说明：引用所在窗体时，对象名可以省略，也可以用Me代表

11 在Print方法中常用的函数 Tab(n) 跳至第n列，输出后面内容 Spc(n) 插入n个空格 例：
Print Tab(10);"学号";Tab(20);"姓名";Tab(30);"性别" Print "学号";Spc(4);"姓名";Spc(6);"性别"

12 与Print有关的属性 AutoRedraw（自动重画）属性为False（初值）时，用Print方法和绘图方法输出的内容被其他窗体遮挡后会被抹去。为此，应将该属性设置为True 改变CurrentX和CurrentY属性（当前输出位置）可以改变下个输出的位置 例如： CurrentX=Width/2 : CurrentY=Height/2 Print ‘在窗体中心位置输出 0

13 输出字体与颜色 属性 意义 类型 FontName 字体名 String FontSize 大小 Single FontBold 粗体
Boolean FontItalic 斜体 FontUnderline 下划线 ForeColor 前景色 Long

14 与Print有关的方法 可用Cls方法清除用Print方法和绘图方法输出的内容，格式： [对象名.]Cls 清除后，当前座标回到对象的左上角

15 文本框的主要属性 Text 显示的文本,缺省属性 MultiLine 为True时允许多行显示
ScrollBar 滚动条,只有在MultiLine属性为True时才有意义 PassWordChar 口令字符。代替显示用户输入的字符。只当MultiLine属性为False时才起作用。 Locked 禁止用户输入，使文本框只能输出

16 关于焦点（Focus） 事件：GotFocus和LostFocus 获得焦点和失去焦点。任何时刻只能有一个控件获得焦点。
方法：SetFocus 属性：TabIndex Tab键序 TabStop 允许/禁止获得焦点 没有TabStop属性的控件当然不会获得焦点。

17 滚动条－Hscrollbar和Vscrollbar
Value= Min= 滚动块 Max=100 主要属性 Max 最大值 Min 最小值 Value 当前值 LargeChange 大增量 SmallChange 小增量 事件 Change 值改变时 Scroll 滚动时 例