山东外贸学院VB第3章简单VB程序设计.ppt

Visual Basic 程 序 设 计,山东外贸职业学院,E-mail：,信息管理系 柳淑花,2019年4月25日,第3章 简单 VB 程序设计,本章主要内容 1、窗体 2、命令按钮 3、文本框 4、标签 5、赋值语句,6、Print方法 7、输入框 8、消息框 9、注释与结束语句 10、程序调试,本章小结 作业,退出,2019年4月25日,窗体（Form）是一块“画布”，在窗体上可以 直观地建立应用程序。在设计程序时，窗体是 程序员的“工作台”，而在运行程序时，每个窗 体对应于一个窗口。 窗体是所有控件的“容器”： 各种控件对象必须建立在窗体上，一个窗体对 应一个窗体模块。,3.1 窗体,上一页,下一页,返回本章首页,2019年4月25日,1. 窗体的主要属性,设制窗体属性有两种方法： 方法一：在设计状态，通过“属性窗口”为其设定各种 属性值 。 只能在属性窗口设置的属性称为只读属性。 方法二：在程序代码中改变属性值（运行时改变）。 格式： 对象名. 属性名 = 表达式（属性值） 注：如果属性值是字符串，则用西文引号括起来。,上一页,下一页,返回本章首页,2019年4月25日,1、Name属性：窗体名称,窗体名称在程序代码中作为窗体对象的标识名。在运 行时是只读的。 窗体名称的默认值是（Form1），也可以自定义 （建议用前缀：frm）。 窗体名称的命名规则： 必须以字母或汉字开头，不能多于40个字符，可以包含数字、字母和下划线，但不能包含空格或标点符号。 注意： Name属性运行时只读。,上一页,下一页,返回本章首页,2019年4月25日,2Caption 属性：窗体标题,窗体标题是出现在窗体标题栏的文本内容。 窗体标题默认与窗体名称相同（Form1）。标题 也可以自定义，只要是字符串即可，不受其他约束。 如：form1.caption=“欢迎” me .caption=“欢迎” caption=“欢迎” 注意：窗体名称与窗体标题的区别。,上一页,下一页,返回本章首页,2019年4月25日,3Visible 属性：窗体的可见性,Visible 属性：表明窗体是否可见。 它的取值为逻辑值：True （默认）或 False 4. Enabled属性：窗体的可用性 Enabled 属性：决定窗体能否被访问。 它的取值为逻辑值：True 或 False True 窗口可操作（默认） False窗口不能操作 注意： Enabled 属性为False时， 通过程序仍可操作它。,上一页,下一页,返回本章首页,2019年4月25日,5. Icon属性：最小化图标,Icon属性：设置位于窗体左上角控制按钮上的图标，当窗体最小化为任务栏上的按钮时，也使用此图标。（.ico）程序编译后也使用此图标。 6. ControlBox 属性：控制框 ControlBox属性的值为逻辑值。 False标题栏只显示标题文字，不显示控制按钮、最大化、最小化、关闭按钮。 True（默认）正常。 MaxButton属性、Minbutton属性：最大、最小化按钮 WhatsThisButton 帮助按钮 说明：二者均为False时按钮消失，帮助按钮才出现。 注意：此属性运行时只读。,上一页,下一页,返回本章首页,2019年4月25日,7. BorderStyle属性：边框样式,BorderStyle属性决定窗体的边框类型。 用数值0 5来表明窗体边框的风格： 0 无边框的窗口（无标题栏） 1 固定大小的单线边框 2 可调大小的边框（默认） 3 对话框风格（有控制菜单和标题栏） 4 不能改变大小的工具栏风格 5 可以改变大小的工具栏风格 注意：此属性运行时只读。,上一页,下一页,返回本章首页,2019年4月25日,8. Left、Top、Height、Width属性：,Left、Top、Height、Width属性用来设置窗体的位置与大小。 单位为缇（Twip）。 Twip（缇）是一种与屏幕分辨率无关的一种计量单位。 1 英寸= 1440 Twip（缇） 1 缇 = 1/ 567 cm 说明：在 VB 中， twip 是默认单位。 ScaleHeight和ScaleWidth用来决定窗体的净高度和净宽度； Top属性决定窗体到屏幕顶端的距离； Left属性决定了窗体到屏幕左边缘的距离。,上一页,下一页,返回本章首页,2019年4月25日,9. BackColor与ForeColor属性：,BackColor与ForeColor：设置窗体的背景色与前景色。 颜色值用一个长整数表示。点击属性栏右边的 ，会弹出一个颜色设置组合框。或使用“视图”菜单中的“调色板”命令也可以设置窗体等对象的前景色和背景色。,上一页,下一页,返回本章首页,2019年4月25日,10. Font 属性：正文字体,Font 属性为指定对象上显示的文本设置字体属性，包括字体（FontName） 字号（FontSize） 字形（FontBold、FontItalic） 下划线（FontUnderline）等。 点击字体属性栏右边的按钮时会弹出一个“字体对话框” 。 默认的字体为“宋体”。,上一页,下一页,返回本章首页,2019年4月25日,11. WindowState 属性：窗口状态,WindowState 属性决定窗体的当前状态是还原、最小化还是最大化。 用数值0 2来表明窗体的状态： （vbNormal）-0 正常（默认） （vbMinimized）-1 最小化 （vbMaximized）-2 最大化 Picture 属性：背景图片 Picture 属性可以为窗体指定一幅背景图像。可以在“属性窗口”中加载图片，也可在运行时用LoadPicture 函数来动态设置该属性。 动态加载图片见例题1：li3_1.vbp,上一页,下一页,返回本章首页,2019年4月25日,2. 窗体的常用事件,事件：是指对象能够识别并做出反应的外部刺激 这些刺激可能来自用户的操作、也可能来自于程序自身发出的消息、也可能来自于操作系统 每一类对象能支持哪些事件，系统都已预置好了。要让某个事件做出反应，就必须编写这个事件对应的“事件过程” 事件过程：是一个相对独立的程序段，是应用程序代码的重要组成部分。,上一页,下一页,返回本章首页,2019年4月25日,事件过程的语法格式,在 Visual Basic 中，事件过程的语法格式是： Private Sub 对象名_事件名（参数） VB 语句 End Sub 窗体常用的事件有： Click：单击窗体时发生 DblClick：双击窗体时发生 Load：当窗体被加载到内存中准备显示时发生 Resize：当窗口第一次显示或窗口大小改变时该事件发生 MouseMove、 MouseDown、MouseUp,上一页,下一页,返回本章首页,2019年4月25日,例题2: li3_2.vbp,设计一个窗体，窗体在装载时，显示“大家好”、“新北京，新奥运“；界面如图所示。单击“隐藏”按钮时，文本框隐藏，单击“显示”按钮时，文本框显示，同时文本框中显示“重新显示”，字号为20磅，字颜色为红色；当单击窗体时，窗体移动到点（3000，2500），同时窗体宽度变为8000缇，并将鼠标的位置显示在窗口的标题栏中。,上一页,下一页,返回本章首页,2019年4月25日,3. 窗体的常用方法,VB中的“方法”：是指对象具有的行为和能执行的动作。 在程序中引用方法的格式如下： 对象名. 方法名 或： 对象名. 方法名 参数1，参数2 窗体可调用多个方法。常用的方法有： Move：把窗体移到某个位置 Hide： 隐藏窗体 Show： 显示窗体 Print： 在窗体上显示文本或数据 例：在窗体上显示“大家好”，在程序中加入代码： Form1 . Print “大家好”,上一页,下一页,返回本章首页,2019年4月25日,Move 方法,格式：对象名 . Move left, top, width, height 作用：将对象移至left , top （窗体左上角的坐标，单位为 twip）指定的新位置。 例：在程序代码中增加下列内容： form1.Move 1000 , 1000 , 8000 , 6000 form1.Move 1000 , , , 8000 错误 Cls方法 格式：对象名 . Cls 作用： 用来清除运行时窗体或图片框所生成的图形和文本。,上一页,下一页,返回本章首页,2019年4月25日,Hide 方法,格式：对象名 . Hide 作用：将指示的窗体隐藏，但不卸载。 例：单击“隐藏”按钮，将隐藏窗体： form1.Hide Show 方法 格式：对象名 . Show 作用：用来显示指定窗体。 例：单击“显示”按钮，将显示窗体： form1. Show,上一页,下一页,返回本章首页,2019年4月25日,Print 方法,格式：对象名. Print 参数1 ，参数2 作用：将文本输出到指定对象上。 如果缺省对象，则将内容输出到当前窗体上 例：Private sub form_load() form1. Print “新北京！” ; “新奥运！” form1. Print “新北京！” , “新奥运！” End Sub 说明：在窗体的Load 事件中，如果要使用Print 方法在窗体上输出，就必须先将窗体的AutoRedrow属性设置为True，否则启动窗体后将没有输出结果。这是因为窗体是在Load 事件执行完后才显示的。,上一页,下一页,返回本章首页,2019年4月25日,3.2 命令按钮,命令按钮（CommandButton）用来在窗体内添加命令按钮。运行时用户单击此按钮，则执行一段程序代码。,1. 命令按钮的常用属性,除与窗体共同的一些属性外，还有几个重要属性： Style：按钮外观（0-字符 / 1-图形） Cancel： 取消按钮（Esc）-True Default：默认按钮（Enter）-True 注意：按钮上热键的设置,上一页,下一页,返回本章首页,2019年4月25日,Value：取值属性（若按钮被选中，则 Value =,True，触发Click事件)，其 默认值为 False。 Picture：按钮上可显示图片(.BMP、.ICO)，只 有当 Style=1 时有效。 ToolTipText：工具小提示（文本） 2. 命令按钮的Move 方法 其意义与窗体的 Move 方法相同 3. 命令按钮的Click 事件 Move 方法与Click 事件举例，见例题3：li3_3.vbp 注意： 按钮不支持双击事件,上一页,下一页,返回本章首页,2019年4月25日,3.3 文本框（TextBox）,文本框：用于接收用户在框内输入的信息(如姓名、地址、密码等),或显示由程序提供的信息。(单行最多输入2048个字符；多行时可输入多达32KB的文本) 1. 文本框的常用属性 Text框中显示的文本 PasswordChar显示密码（通常为*， MultiLine 为 False 时有效） MaxLength可输入字符的最大长度 *MultiLine文本框中可输入多行文本 *ScrollBars滚动条（MultiLine为True时有效） *Alignment文本的对齐方式 Locked文本框中的内容是否被锁定 说明：带 * 者为运行时只读,上一页,下一页,返回本章首页,2019年4月25日,只能在代码窗口设置的属性：,SelText当前所选择的文本内容 SelStart选定文本的首字符在文本框中的位置（0） SelLength当前选定文本的长度（单位为字符） 文本框还有Name,Left,Top,BorderStyle, Enabled,Font,ForeColor等属性与以前相同。 2. 文本框的常用方法 Move：与窗体的用法相同。见例4: li3_4.vbp SetFocus：用来将光标从其他位置移动到文本框中。 3. 文本框的常用事件 见例5: li3_5.vbp Change文本框中的内容发生改变时触发。 LostFocuse失去焦点时触发。 KeyPress按下字符键时触发。 见例题6：Li3_6.vbp,上一页,下一页,返回本章首页,2019年4月25日,3.4 标签（label）,标签常用来标注本身不具有Caption属性的控件，也可用它们为窗体添加说明文字(最长1024字节）。 1.标签的常用属性 见例题7：Li3_7.vbp Font,Name,Caption,Alignment属性同窗体。 AutoSize自动缩放，即大小自适应属性。 默认为 False，若为True，根据文本自动调整标签宽度。 WordWrapFalse时：内容增加时，文字换行； True 时：内容增加时，文字不换行； BackStyle背景是否透明（0透明，1不透明） BorderStyle边框样式（0无边框，1有边框）,上一页,下一页,返回本章首页,2019年4月25日,2.标签的 Move 方法,3.标签的常用事件 Click：单击鼠标左键时触发。 DbClick：双击鼠标左键时触发。 Change：标签上显示的内容发生改变时触发。 上机实训: 实训四 几个简单控件的应用,上一页,下一页,返回本章首页,2019年4月25日,3.5 赋值语句,VB程序是由语句组成， 语句的功能是： 向系统提供必要的信息； 规定系统应该执行的操作。 语句的一般形式是： 语句定义符 语句体 语句定义符规定语句的功能； 语句体提供语句所要说明的具体内容或者要执行的具体操作。,上一页,下一页,返回本章首页,2019年4月25日,语句的书写规则是：,Visual Basic 程序中不区分代码的大小写； 每输完一条语句后应按 Enter 键； 一条语句占一行，也可以分多行书写(换行符为“ _” -空格与下划线）； 一行可以输多个语句，中间用冒号(:) 分隔； 编程时应养成加注释的好习惯。,上一页,下一页,返回本章首页,2019年4月25日,。,赋值语句又称为Let语句，其作用是把指定的值赋给某个变量或某个带有对象的属性。 一般格式为： Let 变量名 = 表达式 Let 对象名.属性名 = 表达式 说明： （1）“=”为赋值号，不同于数学意义上的等号。 （2）赋值语句具有赋值和计算的双重功能，即首先计算赋值号右边的表达式的值，然后赋给左边的变量。 （3）变量和表达式应具有相同的数据类型。但不管表达式是什么类型，都可以赋给一个Variant变量。 如： x=x+1 Text1.Text=“您好！”,上一页,下一页,返回本章首页,2019年4月25日,3.6 Print方法,Print方法的语法格式为： 对象名.Print Spc(n) | Tab(n) ,| ; Print方法的功能为：在对象名上输出表达式的值 说明： 对象名可以是窗体（Form）、立即窗口（Debug） 、 图片框（Picture） 、打印机（Printer）等对象名。 是一个或多个表达式，中间用 ,| ;分 隔，省略表示输出一空行。用 ，分隔表示按标准格式 输出，用 ；分隔表示按紧凑格式输出。末尾有 ,| ; 表示下一个输出不换行。 如：Print 1;2;3 :Print 4,5, :Print 6,上一页,下一页,返回本章首页,2019年4月25日,3.6 Print方法, Tab函数 格式：Tab(n) 功能：对输出进行定位(应与 Print 方法一起使用) 注意：当在一个 Print方法中有多个Tab函数时，每个Tab函数对应一个输出项，各输出项之间用分号隔开。 例8： Print方法与Tab函数应用，见Li3_8.vbp Private Sub Form_Click() Print “12345678901234567890“ Print Tab(5); “5”; Tab(10 - 2); “8”, “ 注意这里10-2 当前位置5，故同行显示“ Print Tab(5); “5“; Tab(10 - 6); “4“; Tab(20 - 15); “5“; “ 注意这里10-6当前位置4，故同行显示“ End Sub,2019年4月25日,3.6 Print方法, Spc函数 格式：Spc(n) 功能：在显示或打印列表中的下一个表达式之前 插入n个空格数，n为032767之间的整数。 说明： Spc函数与输出项之间用分号隔开。 使用位置属性 位置属性CurrentX和CurrentY常用来把文本精确地输出到窗体、图片框或打印页上。这两个属性分别表示当前输出位置的横坐标与纵坐标。 格式：对象名称.CurrentX =x 对象名称.CurrentY =y 例9：将图片框相对于窗体居中显示，图片框 中的文字居中显示。 Li3_9.vbp,上一页,下一页,返回本章首页,2019年4月25日,3.6 Print方法,Cls方法 格式：对象名.Cls 功能：清除Print方法显示的文本或在图片 框中显示的图形。 说明： 对象名.只能是窗体或图片框,上一页,下一页,返回本章首页,2019年4月25日,3.7 输入框,InputBox 函数用来提示用户输入一个字符串。 格式：InputBox ( 提示字符串 , 标题字符串 , 文本框 缺省字符串 ,xpos,ypos ) 作用：在一对话框中显示提示，等待用户输入正文或按下按钮，并返回包含文本框中内容，函数值的类型为 String类型。 说明： 提示字符串 的最大长度是1024个字符。若想包含多个行，则可在各行之间用回车换行符的组合Chr(13) & Chr(10) （或VbCrLf）来分隔。 标题字符串若省略，则把应用程序名放入标题栏中。 文本框缺省字符串若省略，则文本框为空。,上一页,下一页,返回本章首页,2019年4月25日,输入框举例 例题10：输入框应用举例 li3_10.vbp,上一页,下一页,返回本章首页,2019年4月25日,3.8 消息框,MsgBox函数-可以在屏幕上弹出一个消息框 作用：在对话框中显示信息，等待用户单击按钮，并返回一个整数以标明用户单击了哪个按钮。 格式：变量=MsgBox（, , ） MsgBox语句 格式为： MsgBox , , 其中：、的意义同InputBox函数。 可选项是一个整型表达式，指定显示按钮的数目及形式，使用的图标类型，缺省按钮的种类以及消息框的强制回应等。如果省略，则 的缺省值为 0。见P41-42.,例题11：消息框应用举例 li3_11.vbp,上一页,下一页,返回本章首页,2019年4月25日,3.9 注释语句与结束语句,1、注释语句 注释就是在程序中添加的文字说明。 注释语句是非执行语句。 注释语句的格式是： （1）Rem 语句，一般形式为：Rem （2）单引号，一般形式为： 使用单引号更加灵活、方便，它可以给一个代