《简单的VB程序设计》PPT课件.ppt

1,第二章 简单的 Visual Basic程序设计,2.1 窗体 2.2 基本控件 2.3 程序编码规则 2.4 基本语句,2,2.1 窗体,窗体也称作表单（Form），是一种特定的类，它用于定义一个窗口。窗体是设计VB应用程序的基本平台。,2.1.1 窗体的属性,窗体属性决定了窗体的外观、位置和行为等。设置窗体属性可以在程序设计时在属性窗口中手工设置，也可以在程序运行时由代码实现。,3,Name属性：允许用户给窗体设置合适的名字，一个新窗体的缺省名是窗体Form加上一个特定的整数。窗体不能用系统中的关键字来命名，否则可能在用户的代码中引起冲突。引用窗体的Name属性的语法形式为： Form1.Name 其中Form1为窗体名。,Caption属性：决定窗体标题栏中显示的文本。当用户创建一个新窗体时，其标题栏的缺省值也是窗体Form加上一个特定的整数。引用窗体的Caption属性的语法是：Form1.Caption,4,BorderStyle属性：可以控制窗体边界类型及是否可以调整大小，缺省值是2。允许用户通过窗体边缘的热点改变窗体的大小和形状。在代码中引用BorderStyle属性的方法是： Form1.BorderStyle=【Value】 Value=0，窗体无框架； Value=1，窗体不可调整大小且具有单线框架； Value=2，窗体可调整大小且具有双线框架； Value=3，窗体不可调整大小且具有双线框架。,5,ControlBox属性：当用户运行应用程序时该属性有效，用来在窗体标题栏左边设置一个控制框，单击控制框显示一个控制菜单，有【最大化】、【最小化】、【关闭】等菜单选项。缺省设置为True，能够使窗体显示控制框。当窗体的BorderStyle属性设置为0时控制框将不能显示。,6,BackColor属性：决定窗体的背景颜色。 ForeColor属性：决定窗体的前景颜色。 引用这两种属性的语法是： Form1.BackColor=【Color】 Form1.ForeColor=【Color】 十六进制颜色值，是VB中表达颜色最直接的方法。 格式： &HBBGGRR& 说明：BB、GG、RR分别为两位十六进制数，表示蓝、绿、红色的亮度，其值为 00 FF，中间值 为80。,7,AutoRedraw属性：控制窗体图像的重建，可以设置为True或False。在其他窗口覆盖某窗口后，又返回该窗口时，如果将AutoRedraw属性设置为True，将自动刷新或者重画该窗体的所有图形。如果将该属性设置为False，则必须调用一事件过程来执行该项任务。此属性是使用图形方法(如Circle、Point、Cls和Print)的核心，设置AutoRedraw为True，可以在窗体中重画这些方法的输出。其默认值为False。,8,Height属性和Width属性：可以确定窗体的初始高度和宽度，包括边框和标题栏。对于一个窗体，Height和Width属性随用户或代码确定的窗体大小而改变，它们的最大值由系统决定。,Left属性和Top属性：根据屏幕左上角确定窗体的位置。Left属性确定窗体最左端和它的包容器最左端之间的距离；Top属性确定窗体最上端和它的包容器最上端之间的距离。,9,MaxButton属性和MinButton属性：决定窗体是否能最大化或最小化。Maxbutton属性为True时，表明窗体有最大化按钮；为False时，表明窗体没有最大化按钮。MinButton属性为True时，表明窗体有最小化按钮；为False时，表明窗体没有最小化按钮。要显示最大化或最小化按钮，BoderStyle属性应设置为1或2。当一个窗体被最大化时，最大化按钮会自动变为恢复按钮。,10,Enable属性：确定窗体是否对用户产生的事件发生反应。该属性为True时，允许窗体对事件作出反应；为False时，禁止窗体对事件作出反应。,Visible属性：确定窗体是被显示还是被隐藏。设置为True时，能够使窗体可见；设置为False时，窗体将被隐藏。若要在启动时隐藏一个对象，可设置Visible属性为False。,11,2.1.2 窗体的事件,Click事件：在程序运行时单击窗体内某个位置，VB将调用Form_Click事件过程。如果单击的是窗体内的控件，这时只能调用相应控件的Click事件。,DblClick事件： 在程序运行时双击窗体内某个位置，就触发了两个事件。第一次按动鼠标，触发Click事件，第二次按动鼠标时触发DblClick事件。,12,Load事件：一旦装载窗体，启动应用程序就自动产生该事件，Load事件适用于在启动应用程序时对属性和变量的初始化。,UnLoad事件：卸载窗体时发生Unload事件。当该窗体再被装载时，它的所有控件都要重新初始化。这个事件是由用户动作（用控件菜单关闭窗体）或一个Unload语句触发的。,GotFocus、LostFocus事件：当窗体收到或失去焦点时，GotFocus或LostFocus事件会发生。,13,2.2 基本控件,2.2.1 控件的基本概念,2.2.2 焦点的概念,焦点是接收用户鼠标和键盘输入的能力。当对象具有焦点时，可接受用户的输入。 对象得到焦点时发生GotFocus事件；对象失去焦点时发生LostFocus事件。窗体和大多数控件支持这两个事件。 只有当对象的Enable和Visible属性为True时，才能接受焦点。,14,2.2.3 标签（Label控件）,Label控件用于在窗体或其它容器中显示文本。标签的内容是只读的，用户不能直接修改显示的内容。通常用标签来标注本身不具有Caption属性的控件。在编程中常用Label作为其它控件的标志，用来说明它们的意义或用法，还可以用于显示标题、说明性文字或帮助信息等。可以编写代码改变Label控件显示的文本以响应运行时的事件。,15,Caption属性：用来改变Label控件中显示的文本。其允许的文本长度最多为1024个字符。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件的高度时，超出部分将被裁掉。,Alignment属性：用于设置Caption中文本的对齐方式，共有3种可选值。 0 左对齐（LeftJustify） 1 右对齐（RightJustify） 2 居中对齐（CentreJustify）,16,BackStyle属性：用于确定标签的背景是否透明。有两种可选值： 值为0时，背景透明，标签后的背景和图形可见； 值为1时，背景不透明，标签后的背景和图形不可见。,17,Autosize属性：确定标签是否会随标题内容的多少自动变化。值为True，则随内容多少自动调整控件本身的大小，且不换行；值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。,Wordwrap属性：用来设置当标签在水平方向上不能容纳标签中的文本时是否换行显示文本。值为True时，表示文本换行显示，在垂直方向上放大或缩小以适合文本的大小，水平方向宽度保持不变；值为False时，表示文本不换行。,18,2.2.4 文本框（TextBox控件）,Text属性：该属性的值就是文本框控件内显示的内容。当文本内容改变时，Text属性也随之变化。通常，Text属性允许的最大字符数为2048。,MaxLength属性：该属性用于设置在文本框中允许输入的最大字符数，缺省值为0，表示字符数无限制；若给该属性赋一个具体的数值，该数值就作为文本的长度限制 。,19,MultiLine属性：该属性缺省值为False，表示只允许单行输入，并忽略回车键的作用。当该属性值为True时，表示允许多行输入，当文本长度超过文本框宽度时，文本会自动换行，同时，允许的文本容量也会相应增加。,PassWordChar属性：设置该属性是为了掩盖文本框中输入的字符。它常用于设置密码输入，如果PassWordChar设定为“*”，则无论用户在文本框输入什么字符，用户设置替代的字符，显示形式为“*”。,20,Scrollbar属性：由于受文本框大小的限制，可能无法完全显示文本的内容，这就可以用ScrollBar属性来指定是否在文本框中添加水平或垂直滚动条，该属性有四个值： None 0 无滚动条 Horizonal 1 只添加水平滚动条 Vertical 2 只添加垂直滚动条 Both 3 同时添加水平和垂直滚动条,21,Locked属性：该属性设置文本框的内容是否可以编辑，其缺省值为False，表示可以编辑。如果该属性设置为True，则文本框中的文本成为只读文本，这时候和标签控件类似，文本框只能用于显示，不能进行输入和编辑操作。,22,Change事件：当用户在文本框中输入新的信息或在程序运行时将文本框的Text属性设置为新值时，触发该事件。用户每向文本框输入一个字符就引发一次该事件。因此，Change事件常用于对输入字符类型的实时检测。,LostFocus事件：当用户用Tab键或鼠标选择窗体上的其他对象而离开文本框时，触发该事件。通常，可用该事件来检查文本框中用户输入的内容。,23,KeyPress事件：当进行文本输入时，每一次键盘输入时，都将是文本框接受一个ASCII码字符，发生一次KeyPress事件，通过该事件对某些特殊键（如回车键和Esc键等）进行处理是十分有效的。,24,2.2.5 命令按钮（CommandButton控件）,Caption属性： 用于设置命令按钮上显示的文本。Caption属性最多包含255个字符。若标题超过了命令按钮的宽度，文本将会自动换行。创建快捷方式，在字母前加“&”。,Style属性：该属性的作用是设置控件的外观是标准的（标准Windows）还是图形的（带有自定义图片）。其值为0时是标准的，为1时是图形的。,25,Default属性：在每个窗体上都可选择一个命令按钮作为缺省的命令按钮，也就是说，不管窗体上的哪个控件有焦点，只要用户按Enter键，就已单击此缺省按钮。为了指定一个缺省命令按钮，应将其Default属性设置为True。,Cancel属性：把命令按钮的Cancel属性设置为True后，就指定了缺省的取消按钮，不管窗体的哪个控件有焦点，按Esc键，就已单击此缺省按钮。,26,Picture属性：该属性可以在命令按钮上加图案。要使用带图案的按钮，步骤如下： (1) 选中要加载图案的命令按钮，然后在属性窗口中将该控件的Style属性设置为1。 (2) 选择按钮的Picture属性，单击右边的浏览按钮，出现加载图片对话框，选择合适的图案即可。,27,ToolTipText属性：该属性是设置当光标在空间上暂停时显示的文本。对于某一命令按钮，将ToolTipText属性设置为需要的提示文本，当程序运行后，光标在按钮上停留片刻，按钮下方将会出现简单的文字提示行。,28,Click事件：单击命令按钮将触发按钮的Click事件，并调用已写入Click事件过程中的代码。同时，单击命令按钮后也将生成MouseDown和MouseUp事件。控件不同，这三个事件发生的顺序也不同，命令按钮中发生的顺序为：MouseDown、Click、MouseUp。 要确保操作不发生冲突。 命令按钮不支持双击事件。,29,Private sub Command1_Click() Text1.FontSize=28 End Sub,Private sub Command2_Click() Text1.FontName=“隶书” End Sub,Private sub Form_Activate() Text1.SetFocus Text1.SetStart=0 End Sub,例：2-1,30,2.2.6 定时器 （Timer控件）,定时器控件主要有两个功能： 用于定时完成某项任务，即每隔一段固定时间就执行一次相同的任务； 进行某种后台处理。 计时器控件运行时不可见，所以它的位置无关紧要。,31,Interval属性：该属性指定Timer事件被触发的间隔毫秒数，其值在0 64767之间。若将其设为0或负数，定时器停止工作。其语法格式为： Timer . Interval = 时间间隔,32,Enable属性：该属性决定定时器控件是否能响应Timer事件，设置为True时，定时器以Interval属性值为时间间隔触发Timer事件；若设置为False定时器控件失效。,Timer事件：每隔固定时间所运行的程序代码写在这个事件中。,33,例：2-2,Private Sub Timer1_Timer() LblShow.FontSize=10 LblShow.FontName=“宋体” LblShow.Caption=“当前时间为：” & Time End Sub,34,2.3 程序编码规则,2.3.1 注释,要添加注释，有三种情况： 1.用撇号“”开始引导注释行； 2.用Rem开头引导注释行； 3.使用【编辑】工具栏中的【设置注释块】、【解除注释块】命令将若干语句行或文字设置/取消为注释块。 注释可以和语句在同一行，要写在语句的后面；也可独占一行。,35,2.3.2 语句书写自由,1. 一行中写下多条语句，每条语句中间用冒号“:”作为分隔符号。 2. 在一行内写不下，用续行符（一个空格后跟一个下划线“_”）将长语句分成多行。 3. 一行最多允许255个字符。 4. 字母不区分大小写。 (1) 程序代码中关键字的首字母总被转换成大写字母；(2) 对于用户自定义的变量名、过程名、函数名，VB以第一次定义的为准。,36,2.3.3良好的编程习惯,1. 使用缩进 在编写代码时，习惯上对过程、判断语句、循环结构的正文部分进行缩进，使程序代码的可读性大为改善，很清楚看清代码中的嵌套。,2. 添加注释 每个人的编程思路都不一样，添加注释会使别人看你的程序或阅读别人的程序变得相对容易一些。,37,4. 变量命名 在程序中，常量和变量应该用一致的前缀来命名，这样很容易识别他们的数据类型。而且变量或过程名的主体应该使用大小写混合形式，并且应该足够长以描述它的作用。,3. 当一行代码过长时，应使用续行符将代码截短为多行代码。,38,2.4 基本语句,2.4.1 赋值语句,赋值语句可以把指定的值赋给某个变量或某个带有属性的对象。其语句格式为： 格式1：变量名 = 表达式 格式2：对象名属性名 = 表达式 在格式2中，如果对象名省略，则默认对象为当前窗体。 功能：把“=”右边的表达式的值赋给“=”左边的变量或对象的属性。兼有计算功能。,39,在赋值时，需要注意下列问题： 1. 在赋值语句中，”=”是赋值号，与数学意义上的符号不一样。 2. 赋值号左边只能是变量，不能是常量、符号常量或表达式。 3. 利用赋值语句在给对象的属性赋值时，必须将类型相容的数据赋给它。,40,(1) 当数值型表达式与左边的变量精度不同时，右边的表达式会强制转化为左边变量的精度。例如: a%=2.7 a为整型变量，转换时四舍五入，a中的结果为3 (2) 当逻辑型数据赋给数值型时，True转化为 -1，False转化为0。 (3) 当数值型数据赋给逻辑型时，非0转化为True，0转化为False。,41,(4) 当左边是数值类型，右边是数字字符串时，右边会自动转换成数值类型，然后再赋值。当右边的数字字符串中有非数字字符或空字符串时，就会出现错误。 (5) 任何非字符型数据赋值给字符型，都自动转换为字符型。 (6) 任何类型的表达式都可以赋值给变体数据类型的变量。,42,4. 不允许在同一个赋值语句中，同时给多个变量赋值。例如： Dim a%, b%, c% a = b = c = 1 执行a = b = c = 1时，系统会认为右边的两个”=”是等号，而左边的”=”是赋值号。 正确的书写格式为： a = 1: b =1: c = 1,43,2.4.2 输入函数,最常见的是InputBox()函数语句，程序通过此语句得到用户的输入语句。 InputBox()函数可以打开一个对话框，等待用户输入内容或按下按钮，当用户按下【确定】按钮或回车键时，函数返回所输入的值。其语法格式如下： InputBox(prompt , title ,default ,xPos ,yPos),44,InputBox(prompt , title ,default ,xPos ,yPos),45,1. 各参数的含义 prompt：用作在对话框中显示提示用户操作的信息。该项不能省略，是一个字符串。可自动换行。如果要自己换行，则必须在行末加回车Chr(13)和换行Chr(10)控制符。 title：标题。是一个字符串，可以省略。,46,default：输入文本框的默认值。当输入对话框中无输入值时，则default值作为输入对话框的值。如果不想用这个default值作为输入值，可以直接在输入区中输入数据取代default值。省略该参数，输入区为空白。 xPos和yPos：x坐标位置和y坐标位置，这两个参数必须全省略或全给出。,47,2. 函数中各参数次序必须一一对应，除了“prompt”不能省略，其余各项均能省略。如果省略中间的部分，逗号占位符不能省略。例如： i = InputBox(a3, , “ZhangSan”) 省略了标题，但中间的逗号占位符没有省略。,48,3. 对话框上有两个按钮：【确定】和【取消】。输入数据后，单击【确定】（或回车），对话框消失，输入的数据作为函数的返回值赋给变量。如果不想保留输入的数据，则可以单击【取消】（或Esc键），返回一个空字符串。InputBox（）函数一次只能输入一个值。如果想输入多个值，必须多次调用InputBox（）函数。该函数经常与循环语句一起使用，进行多个指定的输入。,49,2.4.3 输出语句,Print语句不仅可以在窗体上显示文本字符串和表达式的值，而且可以在其它图形对象或打印机上输出信息。其语法格式为： Print 表达式表 ，| ；,说明： (1) 表达式表：要输出的一个或多个数值或字符串表达式。如果省略该项，则输出一个空行。对于数值表达式，打印出表达式的值；对于字符串则原样输出。,50,(2) 当输出多个表达式或字符串时，各个表达式之间用分隔符（逗号、分号或空格）隔开。如果用逗号分隔，即以14个字符位置为单位把一个输出行分为若干个区域段；如果用分号或空格作为分隔符，则按紧凑输出格式输出数据。,(3) 对于数值型数据输出时，系统会在数值的前面自动加一个符号位，后面加一个空格，而字符串前后都没有空格。,51,(5) Print语句具有计算和输出双重功能。对于表达式，是先计算后输出。但是，Print语句没有赋值功能。,(4) 若Print语句的末尾使用了逗号或分号，则表示显示的数据不换行，下一个Print语句仍在该行输出；当输出的数据超过显示行的宽度时，多余的数据自动输出到下一行。,52,Print方法的功能是在对象上输出信息。其格式为： 对象名称Print Spc(n)|Tab(n)表达式表，|；,说明： (1) 与Print语句相同的参数使用方法也一样。 (2) 对象名称可以是窗体（Form）、图片框（PictureBox）或打印机（Printer），也可以是立即窗口（Debug），如果省略“对象名称”，则在当前窗体上输出。,53,(3) Spc(n)函数：用于在输出时插入n个空格，允许重复使用。参数n是一个数值表达式，其取值范围为0 32767之间的整数。Spc(n)函数与输出项