第2章顺序结构程序设计.

1第2章顺序结构程序设计掌握窗体、标签、文本框、命令按钮的常用属性、方法和事件的使用理解常量、变量、数据类型、运算符和表达式的概念和作用掌握常用内部函数的功能和使用掌握赋值语句、End语句掌握InputBox函数、MsgBox函数和MsgBox语句的使用掌握计时器控件的使用学习目标2第2章顺序结构程序设计知识结构图案例1设计窗体文字显示顺序结构程序设计案例2简易记事本案例3计算圆的周长和面积案例4随机抽奖案例5倒计时案例6钓鱼游戏窗体的属性、方法和事件标签、文本框、命令按钮数据类型、常量、变量Format格式输出函数计时器MsgBox函数和语句赋值语句和End语句字符串函数算术运算符及表达式字符串运算符及表达式数学函数和转换函数日期与时间函数InputBox函数32.1案例1——设计窗体文字显示案例1设计窗体文字显示案例演示案例描述案例分析案例设计相关知识42.1案例1——设计窗体文字显示程序运行后，窗体背景为蓝色，字体颜色为红色，显示信息如图2.1所示；单击窗体后，清除窗体上原来的信息，以隶书、粗体格式显示新的信息，如图2.2所示；双击窗体，退出程序。案例描述图2.1程序运行后显示的信息图2.2单击窗体后显示的信息52.1案例1——设计窗体文字显示在窗体的Load事件中设置窗体的前景色和背景色。在窗体的Activate事件中调用Print方法输出信息。在窗体的Click事件中首先调用Cls方法清除屏幕上的显示内容，然后重新设置窗体的字体、字号等格式，最后调用Print方法输出信息。在窗体的DblClick事件中执行End语句，退出程序。案例分析62.1案例1——设计窗体文字显示界面设计：只涉及窗体对象，所以界面非常简单，无需设计属性设置案例设计对象属性名称属性值Form1Caption欢迎学习VB程序设计Font字体：宋体；字形：常规；字号：四号72.1案例1——设计窗体文字显示代码设计案例设计PrivateSubForm_Click()Form1.ClsForm1.FontName=隶书Form1.FontSize=20Form1.FontBold=TrueForm1.PrintTab(5);快乐学习VB！Form1.PrintForm1.PrintTab(3);只要努力，就能学会！EndSub窗体单击事件清除窗体原有信息设置窗体字体格式输出一空行跳过n个字符的位置再输出字符串82.1案例1——设计窗体文字显示代码设计案例设计PrivateSubForm_DblClick()EndEndSubPrivateSubForm_Load()Form1.BackColor=RGB(0,0,255)Form1.ForeColor=RGB(255,0,0)EndSubPrivateSubForm_Activate()Form1.PrintForm1.PrintTab(5);欢迎进入VB世界！EndSub窗体双击事件退出程序窗体激活事件设置背景色为蓝色窗体载入事件92.1案例1——设计窗体文字显示相关知识窗体的基本属性窗体的常用事件窗体的常用方法3122101.窗体的基本属性用VB创建一个应用程序的第一步就是创建用户界面，窗体是设计用户界面的“工作台”，是所有控件的容器。窗体就像一块“画布”，用户可以根据需要利用工具箱上的控件在“画布”上画界面。窗体本身也是一个对象，有自己的属性、事件和方法，以便控制窗体的外观和行为。程序的每一个窗体都是VB工程中的一个模块，并单独保存在一个窗体文件（.frm）中。在程序运行时，每一个窗体对应于一个具有Windows风格的窗口。窗体基本概念111.窗体的基本属性窗体属性决定了窗体的外观设置方法：通过属性窗口设置和通过程序代码设置。窗体的基本属性标题最小化按钮最大化按钮关闭按钮边框样式图标控制菜单121.窗体的基本属性（1）Name属性：所创建的对象名称,在程序中引用。在工程中首次创建窗体时，该窗体的名称默认为Form1。（2）Caption属性：设置窗体标题栏中显示的文本。（3）Height、Width属性：分别表示窗体的高度和宽度，单位是Twip（缇，1厘米＝567缇）。（4）Left、Top属性：窗体相对于屏幕的位置，分别表示窗体左上角到屏幕左边和屏幕顶部的距离。(0,0)TopHeightWidthLeft窗体坐标系和控件的大小、位置131.窗体的基本属性（5）ForeColor和BackColor属性：设置窗体或控件的前景颜色和背景颜色，其值用十六进制常数表示。在属性窗口使用调色板直接设置在代码中可以使用RGB函数、QBColor函数或VB颜色常量设置颜色。例如，将窗体Form1的背景色设置为红色，可以使用如下三种方法：Form1.BackColor=RGB(255,0,0)Form1.BackColor=QBColor(4)Form1.BackColor=vbRed141.窗体的基本属性（6）Enabled属性：设置对象能否对用户的操作作出响应。值为True时允许用户操作；值为False时，呈灰色，禁止用户进行操作。（7）Visible属性：设置对象在运行时是否可见，取值为True或False。（8）Font属性组：设置窗体或控件上文本的外观。FontName：字符型，字体。FontSize：整型，字体大小。FontBold：逻辑型，是否为粗体。FontItalic：逻辑型，是否为斜体。FontStrikeThru：逻辑型，是否加删除线。FontUnderLine：逻辑型，是否加下划线。151.窗体的基本属性（9）BorderStyle属性：设置窗体的边框样式。其属性取值为0～5。决定窗体是否可移动和改变大小。（10）MaxButton和MinButton属性：设置窗体上是否显示最大化和最小化按钮，取值为True或False。（11）ControlBox属性：设置窗体上是否显示控制菜单，取值为True或False。（12）WindowState属性：设置窗体窗口运行时的状态，取值为0、1、2，决定窗体正常、最小化、最大化状态161.窗体的基本属性（13）Picture属性：指定一个图片，作为窗体的背景图。在属性窗口中设置时需要在对话框中选择图片。在程序中设置时需要使用LoadPicture函数，格式如下：对象名.Picture=LoadPicture(图形文件源路径及文件名)例如，将C盘image文件夹下的图形文件scene.jpg加载到窗体上，代码如下：Form1.Picture=LoadPicture(C:\image\scene.jpg)也可以使用代码删除Picture属性中的图片文件，代码如下：Form1.Picture=LoadPicture()171.窗体的基本属性在设计和运行状态下都可设置的属性。只能在设计时设置，不能在运行时设置的属性（只读属性），如对象的Name属性。只能在运行时设置，不能在设计时设置的属性。在设计和运行状态下都可设置，但只有在运行时才能生效的属性，如Visible属性。属性的分类181.窗体的基本属性访问对象属性的格式：对象名.属性名例如：Form1.Caption通过此格式可以读取属性的值，也可以设置属性的值。例如：Form1.Caption＝你好！VisualBasicx=Form1.Left运行时对象属性的读写方法192.窗体的常用事件（1）Click事件：程序运行后，在窗体上的空白位置单击鼠标左键时触发该事件。Click事件过程：当对象接收到Click事件时所执行的代码。窗体的Click事件语法：PrivateSubForm_Click()……（语句组）EndSub用户可以把想让对象对该事件所做的反应以VB语句的形式写在事件过程中。在一个对象的事件过程中，可以设置其自身的或其它的对象的属性、执行其自身的或其它的对象的方法、甚至可以调用自身的或其它的对象的事件过程。202.窗体的常用事件（2）DblClick事件：程序运行后，在窗体上的空白位置双击鼠标左键时触发该事件。（3）Load事件：程序运行后，窗体被装入时触发该事件。通常用来在启动应用程序时对属性和变量进行初始化。（4）Unload事件：卸载窗体时触发该事件。当单击窗体右上角的“关闭”按钮或执行Unload语句时，就可以触发Unload事件。（5）Activate事件：当一个窗体对象被激活时触发该事件，使窗体成为活动窗体。显示单个窗体时，Load事件后会发生Activate事件。213.窗体的常用方法（1）Cls方法格式：[对象.]Cls作用：清除运行时在窗体上或图片框中显示的文本或图形。说明：该方法默认的对象是窗体，例如：Form1.Cls和Cls语句的效果是一样的，都是清除窗体上运行时输出的内容。Cls方法不能清除窗体设计时使用的文本和图形。223.窗体的常用方法（2）Move方法格式：[对象.]Moveleft[,top[,width[,height]]]作用：将对象移动到以left,top定义的新位置，同时可以改变该对象的大小（以width,height为新的宽与高）。说明：该方法默认的对象是窗体。left参数不可以省略，其他参数可以省略。但是，要给定任何其它的参数，必须先给定出现在语法中该参数前面的全部参数。233.窗体的常用方法（2）Move方法举例：设Form1为一窗体对象名,则Form1.Move1000,1000,1200,2000Form1.Move1000,1000Form1.Move1000Form1.Move1000,,1200既移动位置，又改变大小只移动只左右移动错误，缺少参数Form1.MoveForm1.Left+100,Form1.Top,Form1.Width/2,Form1.Height*2相对移动：指定从当前位置开始所移动的距离来移动对象243.窗体的常用方法（3）Print方法格式：[对象.]Print[定位函数][表达式列表][分隔符]作用：在对象上输出文本字符串和表达式的值说明：该方法默认的对象是窗体。定位函数：包括Tab(n)和Spc(n)函数Tab(n)用于将光标移到第n列开始输出数据；Spc(n)用于在输出时插入n个空格；无定位函数时，由对象的当前位置决定输出项的位置。表达式列表：是要输出的数值或字符串表达式，若省略则输出一个空行。253.窗体的常用方法（3）Print方法说明：分隔符：用于输出项之间的分隔，有逗号（，）和分号（；），表示输出后光标的定位。分号表示紧凑格式输出，光标定位在上一个显示的字符之后；逗号表示标准格式输出，光标定位在下一个打印区的开始位置处（每个打印区14列）；输出列表后没有分隔符表示输出后换行，即光标定位在下一行的行首。263.窗体的常用方法（3）Print方法例2.1print方法的应用PrivateSubForm_Click()a=10:b=20:c=30Printa=;a,b=;b,Printc=;cPrintPrinta=;a,Tab(20);b=;bPrinta=;a,Spc(20);b=;bEndSub末尾有逗号，表示下一个Print接着本行输出输出空行从第20列开始输出b=输出a之值后，插入20个空格后输出b=272.2案例2——简易记事本案例2简易记事本案例演示案例描述案例分析案例设计相关知识282.2案例2——简易记事本简易记事本程序运行界面如图2.6所示。提供文本的基本编辑操作：文本的剪切、复制和粘贴操作；字体、字号的格式设置；文本的查找替换操作；文本全选和清除操作。查找替换结果如图2.7所示。案例描述图2.6程序运行界面图2.7查找替换结果界面292.2案例2——简易记事本用户界面分析标签Label控件用来显示信息文本框TextBox用来输入数据命令按钮Command用来执行有关操作程序分析剪切、复制和粘贴功能：案例分析只有进行剪切或复制操作之后，“粘贴”按钮才