第4章 顺序结构程序设计电子课件 中职 高教版 Visual Basic程序设计（第4版）

第4章 顺序结构程序设计电子课件 中职 高教版 Visual Basic程序设计（第4版） 单元四 顺序结构程序设计 单元四 顺序结构程序设计 数 据 输 出 1 常用基本语句 2 利用文本框进行数据输入 3 使用对话框 4 4.1 数据输出 4.1.1 直接输出到窗体 1. 使用Print方法 [〈对象名〉.] Print [表达式表] [{, | ;}] 逗号分隔符，各输出项按标准输出（分区输出）格式显示，此时，以14个字符宽度为单位将输出行分为若干区段，逗号后面的表达式在下一个区段输出。 分号分隔符，按紧凑格式输出，即各输出项之间无间隔地连续输出。 Private Sub Command1_Click() Print Print "2 * 3 + 4 ="; 2 * 3 + 4 Print Print "祝你学好" Print , "Visual«  Print , , "Baisc" Print Print " 祝您学好", Print "Visual"; " Baisc" End Sub 2. 与Print方法有关的函数 (1) Tab函数 (2) Spc函数 Private Sub Form_Click() Show FontSize = 12 Print Print Tab(10); "姓名"; Tab(25); "性别"; Tab(40); "年龄" Print Print Tab(10); "张红"; Tab(25); "女"; Tab(40); 17 Print Tab(10); "海小翔"; Tab(25); "男"; Tab(40); 18 End Sub 3. 使用位置属性和字体属性 Private Sub Command1_Click() Dim x As String x = "轻轻松松学VB" FontSize = 20 FontName = "黑体" CurrentX = 2000 CurrentY = 1500 Show Print x End Sub 4. 清除方法Cls Private Sub Command2_Click() Cls End Sub 4.1.2 使用Label控件实现数据输出 Private Sub Command1_Click() Label1.Caption = "你是男是女呀？" Label2.Caption = "女生" Label2.Alignment = 2 Label2.BorderStyle = 0 End Sub Label控件的常用属性： (1) Caption属性 用来在标签中显示文本。在缺省情况下，Caption（标题）是Label控件中唯一的可见部分。 (2) BorderStyle属性 用来设置标签的边框。该属性可以取两个值，即0和1。默认情况下，该属性值为0，标签无边框。如果把BorderStyle（边框样式）属性设置成1，那么Label就有了一个边框。 (3) 其他外观属性 可以通过设置Label控件的BackColor、ForeColor和Font等属性来改变Label的外观。 返回目录 4.2 常用基本语句 4.2.1 赋值语句 [Let]〈名称〉=〈表达式〉 实现两变量的交换。 Private Sub Command1_Click() t = Label3.Caption Label3.Caption = Label4.Caption Label4.Caption = t End Sub 4.2.2 卸载对象语句Unload Unload〈 对象名〉 Private Sub Command2_Click() Unload Me ' Me表示按钮所在的窗体对象 End Sub 4.2.3 注释语句Rem Rem 〈注释内容〉 ' 〈注释内容〉 例如： s = pi * r ^ 2 ' 计算圆的面积 v = 4 / 3 * pi * r ^ 3 : Rem 计算球的体积 返回目录 4.3 利用文本框进行数据输入 4.3.1 TextBox控件的简单使用 (1) Text属性：文本框中包含的文本内容。 (2) Loc