3 数据的输入与输出

假设输出行的宽度为80个（字符），则下一个输出位置为:
90 MOD 80=10。
第3章 数据的输入与输出
(2) Spc(n)

参数n必须是数值表达式，其值为一整数，用来指定显示或 Spc函数与输出项之间用分号隔开。
打印下一个表达式之前插入的空格数。

例：Print “Visual”;Spc(5);”Basic”
第3章 数据的输入与输出
[<对象名称>.]Print[<表达式列表>][{,|;}]

表达式可以是数值或字符串表达式,数值表达式先计算后输 a=100:b=200
出,字符串原样输出。如果省略表达式列表，则输出一个空行。 例:
Print a+b
Print Print “abcdefg”
第3章 数据的输入与输出
第3章 数据的输入与输出
3.1 数据输出
VB中的数据输出方法有:使用Print方法,借助于控件。
3.1.1 直接输出到窗体 1. 使用Print方法 语法格式为: [<对象名称>.]Print[<表达式列表>][{,|;}]
第3章 数据的输入与输出
[<对象名称>.]Print[<表达式列表>][{,|;}]
第3章 数据的输入与输出
3.使用位置属性: CurrentX, CurrentY 为数值型，在程序代码中设置下一次打印方法的水平 （CurrentX)或者垂直(CurrentY)坐标，引用的格式为： [<对象名>.]CurrentX＝X，
[<对象名>.]CurrentY＝Y

<对象名>为Form,
数对应一个输出项，各输出项之间用分号分隔。
第3章 数据的输入与输出

如果当前的显示位置已经超过n,则自动下移一行。当n大于
行的宽度时，显示位置为n MOD行宽。 例：Print “1234567890"; Tab(5); “Visual Basic“ Print Tab(90);”Visual Basic”
2.TextBox控件的Locked属性的含义。
3.TextBox控件Change事件的触发时机。
第3章 数据的输入与输出
【例】TextBox控件的MultiLine,ScrollBars,PassWordChar属 性的含义。 MultiLine:True-可显示多行文本，False-不可显示多行文本。 ScrollBars:0-无滚动条
[<对象名称>.]Print[<表达式列表>][{,|;}]

当输出多个表达式时，各表达式用”;”或”,”隔开，用”,”分 割
则用标准格式显示数据项，用”;”隔开，按紧凑格式输出。
例:
x=5:y=10:z=15
Print x,y,z;”abcdefg”;”hij”
第3章 数据的输入与输出
[<对象名称>.]Print[<表达式列表>][{,|;}]
Picture1.BackColor=QBColor(8) Picture1.Cls
第3章 数据的输入与输出
【例3-5】使用Print方法在图片框中输出文本（如）

Private Sub Command1_Click() Picture1.Print Picture1.Print Tab(2); "2*3+4="; 2 * 3 + 4 Picture1.Print Picture1.Print Tab(3); "欢迎学习"; Tab(17); "visual basic" Picture1.Print Picture1.Print Tab(4); "欢迎学习"; Spc(3); "visual"; Spc(2); "basic" End Sub
第3章 数据的输入与输出
设计步骤为: 1.新建一个工程,使用窗体设计器,制作应用程序的界面. 2.设置对象的属性 3.编写事件代码:



Private Sub Command1_Click() Dim a As String, textw As Integer, texth As Integer FontName = “黑体“ ‘对于VB来说,可用的中文字体类型取决于windows 的汉字环境 FontSize = 60 ForeColor = QBColor(15) BackColor = QBColor(8)
【3-11】输入球体的半径，计算球体的体积和表面积。 知识点:1.VB中变量的定义方法。 2.算术表达式在VB中的表示方法。 3.TextBox控件的text属性的设置及在代码中的引用方
法。
第3章 数据的输入与输出
【3-10】设某职工应发工资X元，试求各种票额钞票总张数最少 的付款方案。 知识点：1.TextBox控件的text属性的设置及在代码中的引用方 法。
第3章 数据的输入与输出

a = "你好" textw = TextWidth(a) / 2 texth = (TextHeight(a) + Command1.Height) / 2 CurrentX = ScaleWidth / 2 - textw CurrentY = ScaleHeight / 2 - texth Print a End Sub
PictureBox,
Printer,如果省略为
Form。

只能在程序代码中设置该属性的值。
第3章 数据的输入与输出
【例3-3】单击“你好”按钮，按照指定尺寸、颜色和外观在窗
体的中间输出文本。
注：文本的属性的初始状态（字体、字号、颜色等）可以 在属性窗口中设置，在程序中也可以设置其属性。 1.字体类型：[<对象名>.]FontName=“字体类型“ 2.字体大小：[<对象名>.]FontSize=“点数“ 3.粗体字： [<对象名>.]FontBold=Rrue|False 4.斜体字: [<对象名>.]FontItalic=Rrue|False
第3章 数据的输入与输出
位置属性：Height Left Top Width

文本框控件的特殊属性
Text:字符型，返回或者设置文本框中显示的内容。 MultiLine:逻辑型，决定控件是否允许接受多行文本。
(True—可以使用多行文本，False—只能输入一行文本)
ScrollBars:数值型，决定控件中有没有滚动条。 (0-没有滚动条，1-水平，2-垂直,3-同时具有水平和垂直)
3.1.2 信息框函数MsgBox
语法格式为： 变量＝ MsgBox(<信息内容>[,<对话框类型>,[,<对话框标题>]])

信息内容：在对话框中出现的文本。 对话框类型：指定对话框中出现的按钮和图标。
对话框标题：指定对话框的标题。
函数值表明了用户在对话框选了哪个按钮。
第3章 数据的输入与输出
图3-1
第3章 数据的输入与输出
2. 与Print方法有关的函数 (1) Tab(<n>)

参数n可选，是数值表达式，其值为一整数，用来指定表达
式输出时的起始列数；如果n省略，则输出位置为下一区段。
例：Print Tab(10);”Visual Basic”
第3章 数据的输入与输出

要输出的内容放在Tab函数后面，用分号隔开。每个Tab函 例：Print Tab(10);”姓名”; Tab(30);”年龄”
第3章 数据的输入与输出

文本框控件的事件与方法
Click事件,DblClick事件 Change事件：当文本框中的内容被改变时，或程序对文本框 的Text属性赋值，从而改变原来的Text属性时，触发该事件。
SetFocus方法：该方法的作用是把焦点移到指定的对象上，使
对象拥有焦点。
第3章 数据的输入与输出
BackColor, Font,ForeColor CurrentX:图片框中当前打印位置的横坐标 CurrentY:图片框中当前打印位置的纵坐标 2.方法:Print,Cls
第3章 数据的输入与输出
例: Print CurrentX, CurrentY Picture1.Print Picture1.CurrentX, Picture1.CurrentY Picture1.FontName=“黑体”

<对象名称>:可以是窗体(Form),
图片框(PictureBox),
打印机(Printer), 立即窗口(Debug)；如果省略表示的是窗 体。
例: Picture1.Print “Visual Basic ”
Print “Visual Basic” Printer.Print “Visual Basic” Debug.Print “Visual Basic”


对话框标题：指定对话框的标题。
默认内容：指定输入框的文本框中显示的默认内容。
第3章 数据的输入与输出
3.4 使用框架控件 “框架”控件用于窗体上的对象分组。 【例3-13】利用“框架”修饰上题的窗体。

Байду номын сангаас
一般情况下，每执行一次Print方法要自动换行，为了仍在同一 行上显示，可在末尾加上“,”或”;”
例: Print “30+50=“,
Print 30+50
Print “100+50=“; Print 100+50
第3章 数据的输入与输出