发布时间 : 星期二 文章Visual Basic教案第29、30课时更新完毕开始阅读1f2aca6524c52cc58bd63186bceb19e8b8f6ec35
3.1 在窗体指定位置显示文本
【教学目标】
1、了解窗体的常用属性 2、了解窗体的常用方法
3、掌握窗体的Load事件和Click事件的应用 【教学重点】
Load事件和Click事件的应用 【教学难点】
窗体的常用属性 【教具】
多媒体、计算机 【教学过程】 一、复习
1、找出程序中出现错误的方法？ 二、导入
上一章讨论了Visual Basic中的找出程序出错的方法。本节课我们来学习窗体的属性及常用方法以及窗体的Load事件和Click事件的应用。 三、自主学习
1、窗体的常用属性
窗体的属性既可在设计阶段通过属性窗口设置，也可在运行阶段通过代码改变窗体的部分属性，也有一些窗体属性是不能通过代码来设置的，例如Name属性，只能在设计阶段通过属性窗口进行设置，而不能通过代码在运行阶段改变该属性的值，这类窗体属性在程序运行阶段是只读的。在属性窗口中所做的设置大多数情况下可立即在窗体设计器中反映出来，而在代码中所做的设置只能在程序运行时才能显示设置结果。
窗体的常用属性如下。 1） 2）
Caption：用于设置显示窗体的标题。
BackColor：用于设置窗体的背景颜色，语法如下：
窗体名.BackColor=颜色值
在设计阶段，可以利用系统提供的调色板进行设置。也可以在程序运行时对该属性值进行设置。
3）ForeColor：用于设置窗体的前景颜色，该属性可改变窗体中图形和文本的颜色。
4）FontName：用于设置窗体中显示文本所用的字体。在属性中如果无法对该属性进行设置，可以通过Font属性设置文本的字体、大小和样式等。
5）CurrentX、CurrentY：用于设置下一次打印或绘图方法的水平或垂直坐标。这些属性在设计时是不可用的。在窗体中进行绘制图形或输出结果时，经常要使用CurrentX属性和CurrentY属性来设置或返回当前坐标的水平坐标和垂直坐标。
2、窗体的常用方法 窗体的常用方法如下。
1）Print：用于在窗体或图片框上输出文本。语法格式如下： 对象.Print 输出的内容列表
2）Cls：用于清除在运行时窗体或图片框中显示的文本和图形，语法如下： 对象.Cls
3、窗体的常用事件
1）Click：在鼠标单击窗体的一个空白区或一个无效控件时发生，语法如下：
Private Sub Form_Click()
2)Load：在窗体被载入时发生。运行程序时，会自动装载Form1窗体，从而产生该事件，语法如下：
Private Sub Form_Load()
通常利用Load事件过程来设置窗体启动时的初始属性。
四、合作探究
编程设计：在本任务中创建一个应用程序，在程序执行时窗体背景色被设置成白色，字体设置为“楷体”，字体设置大小为20。每单击一次窗体，将在窗体的不同位置上以不同颜色显示文字信息“欢迎使用 Visual Basic 6.0”。
设计步骤：
1、创建一个标准EXE工程。并把窗体文件和工程文件分别命名并保存。 2、在对象窗口中，将窗体Form1调整到合适的大小。
3、在属性窗口，把窗体Form1的Caption属性值修改为“在窗体指定位置显示文本”。
4、在窗体Form1的代码窗口中编写以下代码。 Private x As Long, y As Long Private Sub Form_Click()
Dim r As Integer, g As Integer, b As Integer Form1.Cls
Form1.CurrentX = x Form1.CurrentY = y x = x + 300 y = y + 300
r = Int(Rnd * (255)) g = Int(Rnd * (255)) b = Int(Rnd * (255))
Form1.ForeColor = RGB(r, g, b)
Form1.Print \欢迎使用Visual Basic 6.0\End Sub
Private Sub Form_Load() Form1.FontSize = 20
Form1.FontName = \楷体_GB2312\Form1.BackColor = vbWhite Form1.ForeColor = vbRed End Sub
5、保存所有文件。 6、按F5运行程序。
7、用鼠标单击窗体时，出现“欢迎使用 Visual Basic 6.0”的问候语。当鼠标连续单击窗体时，问候语不断改变位置并随即变换颜色。 五、课堂小结
本节课主要通过设计小程序，熟悉了窗体的常用属性和窗体的常用方法，并理解了窗体的Load事件和Click事件。