第八章vb net程序设计使用教程.pptVIP

归纳说明： 本任务通过动态计算矩形面积和周长程序的实现过程，详细讲解了类的属性和属性过程的定义方法，讲解了类的继承的实现方法，讲解了在类中定义事件指定事件触发时机的方法以及在程序中触发事件执行事件过程代码的方法，讲解了方法重载的实现方法。 本章小结 1、了解面向对象的基本概念 2、掌握命名空间、类的定义与对象的声明 3、掌握类的构造器和析构器 4、掌握属性定义、方法重载、类的继承与事件处理 编写 Button1（录入）按钮的Click事件过程代码，如下： Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Static num As Integer = 0 Dim jsh As String, xm As String Dim xb As String, nl As Integer Dim gz As Single, hf As Boolean 获得教师的各项信息 jsh = TextBox1.Text Xm= TextBox2.Text xb =ComboBox1.Text nl=Val(TextBox3.Text) gz = Val(TextBox4.Text) : hf = CheckBox1.Checked ‘调用教师的SetTeacher方法设置各项信息 t.SetTeacher(jsh, xm, xb, nl, gz, hf) ReDim Preserve objTeacher(num) objTeacher(num) = t num = num + 1 ‘Num的值加1准备输入下一个教师信息 清除界面上的输入 TextBox1.Text = : TextBox2.Text = TextBox3.Text = : TextBox4.Text = ComboBox1.Text = : CheckBox1.Checked = False End Sub 程序中的语句“t.SetTeacher(jsh, xm, xb, nl, gz, hf)”用来调用对象变量t的SetTeacher方法。对象创建之后，在应用程序中就可以使用这个对象。例如，可使用下面代码为对象设置属性： 对象名.属性名=属性值 使用下列代码读取对象的属性值： 变量=对象名.属性名 使用下列代码调用对象的方法： 对象名.方法名([参数]) 上述代码中的“属性”也可以是带有Public访问修饰符的成员变量。 编写 Button2按钮的Click事件过程代码，如下: Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim sal As Single Dim n As Integer n = InputBox(请输入要显示的教师的序号：, 输入教师序号) If n - 1 objTeacher.GetUpperBound(0) Then MsgBox(序号超出范围, , 序号超出范围提示) Exit Sub End If n = n - 1 与数组下标对应起来 TextBox1.Text = objTeacher(n).No : TextBox2.Text = objTeacher(n).Name ComboBox1.Text = objTeacher(n).Sex TextBox3.Text = objTeacher(n).Age sal = objTeacher(n).GetSalary TextBox4.Text = CStr(sal) CheckBox1.Checked= objTeacher(n).Marriage End Sub 归纳说明： 本任务通过教师信息的设置和显示程序的实现过程，讲解了在程序中定义类的方法、定义类的成员的方法、根据类定义对象和数组的方法以及访问对象变量成员的方法。在讲解过程后，还着重强调了类成员的访问修饰符的使用方法，构造器和析构器的特点等较难掌握的知识点。 三、属性、事件、