《VB编程入门》PPT课件

第2章 VB编程入门,Visual Basic 程序设计教程,Visual Basic程序设计教程,2,本章将介绍有关VB程序的构成和数据类型以及变量的定义和使用、表达式以及基本的输入输出操作。这些知识是编程的基础。我们将通过简单示例的分析，帮助理解如何进行VB编程。,Visual Basic程序设计教程,3,本章主要内容: 确定数据的性质：数据类型 两种数据表达：常量和变量 算术运算符和表达式 VB编程的开始：使用窗体 赋值和输入输出,Visual Basic程序设计教程,4,所谓编程就是针对要解决的任务，设计解决问题的步骤，使用计算机程序设计语言进行描述，最后通过编码、测试、修改等过程实现编程的目的。 编程有两个方面的要求: 一 需要理解编程的任务并给出算法 二 要使用特定的计算机语言具体地表示这些算法。,2.1 概 述,Visual Basic程序设计教程,5,1加法器界面设计,2.2 一个简单的加法器程序,Visual Basic程序设计教程,6,2编写程序代码,Visual Basic程序设计教程,7,Private Sub CmdAdd_Click()计算”按钮代码 Dim Temp As Long TxtNum1.Text = TxtNum2.Text = TxtSum.Text = TxtNum1.Text = InputBox (请输入第一个数) TxtNum2.Text = InputBox(请输入第二个数) Temp = Val(TxtNum1) + Val(TxtNum2) TxtSum.Text = Temp End Sub Private Sub CmdExit_Click()“退出”按钮代码 FrmAdder1.Hide MsgBox (加法器程序运行结束，谢谢使用) End End Sub,Visual Basic程序设计教程,8,数据是程序处理的对象。为了更好地处理各种各样的数据，VB定义了多种数据类型，数据类型定义了值的范围并确定了它能够进行的操作。,2.3 确定数据的性质：数据类型,Visual Basic程序设计教程,9,Visual Basic程序设计教程,10,使用数值类型,1. 字节型(Byte) 字节型数可以表示无符号的整数，0255 2. 整型(Integer)和长整型(Long) 不带小数部分的数，表示正整数、负整数和零 整型数: -3276832767 98、98 长整型数： -21474836482147483647 45678、45678R,”面积”;Area,”周长”;Perimeter输出半径、面积。周长 End Sub,Visual Basic程序设计教程,63,2.7.2 使用输入对话框InputBox函数 【例2-4】计算半径为R的圆面积和周长，半径值由键盘输入。 Private Sub Form_Click() Const PI = 3.141526 Dim R As Integer, Area As Single, Perimeter As Single R = Val(InputBox(请输入圆的半径：, 输入) Area = PI * R * R Perimeter = 2 * PI * R Print 半径; R, 面积; Area, 周长; Perimeter End Sub 这个例子中使用了InputBox函数产生输入对话框。,Visual Basic程序设计教程,64,1输入对话框的使用 InputBox函数的使用格式如下： InputBox（提示，标题，默认值，xpos，ypox） 它们的含义如下： （1）提示信息。这是InputBox对话框所必须的信息，也可以使用空文本，即“”。 （2）标题。这是在对话框窗口标题栏显示的内容。可设置，也可以没有标题。,Visual Basic程序设计教程,65,（3）默认值。在输入框中的默认输入。系统默认为空，可选。 （4）xpos和ypos为对话框的左侧与屏幕左边的距离和上边与屏幕顶部的距离值。可选。,Visual Basic程序设计教程,66,2在提示中使用多行文本 如果提示信息比较多，可以使用ASCII控制符回车Chr（13）和换行符Chr（10）产生另起一行。 例如：提示信息为“请输入圆的半径” + Chr（13）+ Chr（10）+“使用正整数” ， 产生如图效果,Visual Basic程序设计教程,67,3使用转换函数 InputBox函数接受的是文本，也就是字符型数据，在程序中根据变量类型不同，可以使用转换函数。如： R = Val(InputBox(请输入圆的半径：, 输入) 这里的Val就是转换函数，将文本类型的数据转换为整型数以便参加运算。 VB提供了在不同类型数据之间的转换。,Visual Basic程序设计教程,68,2.7.3 使用Print方法输出数据 使用Print在对象中显示（打印）输出文本。 使用格式如下： 对象名.Print 表达式 ,表达式 1对象名 一般情况下，Print输出到窗体或者图片框。在本窗体中输出，可以缺省对象名。,Visual Basic程序设计教程,69,2表达式 Print方法支持多个表达式的输出，可输出数字、文字字符、日期、逻辑值等。如果Print后面没有任何表达式，则输出空行（在显示效果上相当于回车换行）。,Visual Basic程序设计教程,70,3输出格式 多个表达式输出，可以使用分号和逗号分隔。 （1）逗号分隔（标准格式输出）。逗号后的下一个表达式按照14个字符的空间分开显示。实际分隔位置还与所在输出行的宽度和分隔的数目有关。 （2）分号分隔（紧凑格式输出）。后一个表达式的值接着前一个表达式的输出。,Visual Basic程序设计教程,71,（3）在Print语句最后使用逗号或分号结束，不换行，下一个Print接着按格式输出。 （4）使用Spc()和Tab()函数，前者控制插入空格，后者确定列位置,Visual Basic程序设计教程,72,例： Private Sub Form_click() Me.FontSize = 16 Print 空行 Print A=; 1, B=; 2 Print 1, 2; 3, 4 Print A; Spc(4); B Print Tab(10); B Print 1234567890 End Sub,Visual Basic程序设计教程,73,2.7.4 使用消息对话框MsgBox函数 MsgBox函数提供了一个显示应用程序运行信息的标准途径，如图所示：,MsgBox的格式如下： 变量名 = MsgBox( 提示 , 对话框类型 , 对话框标题 ),Visual Basic程序设计教程,74,（1）使用形式: MsgBox有两种使用形式，注意区分，如： A = MsgBox(您确定要退出吗？, vbOKCancel + vbDefaultButton2, 退出)和MsgBox 您确定要退出吗？, vbOKCancel + vbDefaultButton2, 退出“ 格式1是具有返回值的使用，程序根据用户的不同选择把选择结果赋值给变量A。格式2没有返回值。,Visual Basic程序设计教程,75,（2）提示 必选参数项。如果显示多行，可使用Chr(13)+ Chr(10) 。 （3）对话框标题 在对话框标题栏显示的信息文本。,Visual Basic程序设计教程,76,（4）对话框类型 类型参数由三部分组成，分别确定对话框中的按钮形式、默认的焦点在哪一个按钮上和按钮使用的图标。把按钮形式、焦点选择、图标三组参数中各选一个进行组合，或直接把它们对应的符号常量进行相加确定对话框类型值,Visual Basic程序设计教程,77,Visual Basic程序设计教程,78,Visual Basic程序设计教程,79,（5）返回值 使用一个变量保存MsgBox函数返回值，返回值的符号常量和有关描述如表所示。,Visual Basic程序设计教程,80,Visual Basic程序设计教程,81,（6）省略参数项 如果只给出提示，系统默认为对话框类型参数值为0，没有对话框标题。如果要省略某一个参数项，需要加上逗号分隔符。例如：A = MsgBox ( “您确定要退出吗？”, , “退出” ),Visual Basic程序设计教程,82,【例2-5】在窗体上设置三个命令按钮，分别为“放大窗口”“缩小窗口”和“结束程序”。点击“放大窗口”“缩小窗口”窗体相应进行放大和缩小操作，并在窗体上显示操作后窗口的宽度和高度，点击“结束程序”则程序结束运行退出。,2.8 程序举例,Visual Basic程序设计教程,83,【例2-6】在窗体上放置一个标签显示文本，单击窗体空白处输入字体和字号使显示的文本随之变化。使用三个命令按钮“隐藏显示”“恢复显示”和“程序结束”。其中“隐藏显示”有效时“恢复显示”处于无效状态，反之亦然。,