📄 m10.htm
字号:
<html>
<head>
<title>VB教程</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<p align="center"><script src="../../1.js"></script></a>
<body bgcolor="#ffffff" leftmargin="5" topmargin="1" marginheight="5" marginwidth="5">
<div align=center>
<table border=0 cellpadding=0 cellspacing=0 width=680 align="center">
<tbody>
<tr>
<td bgcolor=#000000 height=14>
<div align=center class=H1> <font color="#FFFFFF">VB.Net中文教程(13) Whole-Part关系(7)</font> </font> </font></div>
</td>
</tr>
<tr valign=top>
<td class=H1 height=236>
<p align="left"> #End Region<br>
Protected Sub Form1_Click(ByVal sender As Object, ByVal<br>
e
As System.EventArgs)<br>
Dim x As New Person("David", 32)<br>
Dim y As New Person("Hellen", 24)<br>
x.spouse(y)<br>
x.Show()<br>
y.Show()<br>
End Sub<br>
End Class<br>
<br>
此程序输出﹕<br>
David, 32, sp: Hellen<br>
Hellen, 24, sp: David<br>
<br>
资料成员p_spouse指向配偶﹐而配偶亦为Person之对象。所以p_spouse之型态应为Person。一个人刚诞生时并无配偶﹐到结婚时才有配偶﹐所以藉spouce()来建立配偶关系。对象x
与y 结婚之后﹐互为对方之配偶。所以x.p_spouse指向y ﹐而y.p_spouse则指向x 。此时﹐x 和y 之内容如下﹕<br>
<br>
<br>
<br>
于是这Person类别表达了「婚姻」关系。<br>
<br>
<br>
<br>
<br>
<br>
<br>
4. 集合／成员关系<br>
<br>
集合意谓着「团体」(Group) ﹐由其成员(Member)组成的群体。例如﹐学校里的社团内有团员﹔公司的销售部含有推销人员。这团体并不像汽车实际包含着司机﹐而只是其成员之集合而已。这情形﹐统称为「集合／成员」(Collection-members)关系。<br>
有趣的是﹕在企业活动中﹐人们规划的方案﹐含许多小方案﹔则大方案是由小方案所组成。例如﹐东北亚旅行团的行程表包括在日本的观光行程、在韩国的观光行程和在香港的观光行程。这总行程表图标如下﹕<br>
<br>
<br>
<br>
总行程是次行程（或称段行程）之集合﹐这是「集合／成员」关系。<br>
<br>
<br>
<br>
此外﹐棒球队是由经理、教练和球员组成﹕订单中含若干产品项目﹐皆为集合／成员关系。实际写程序时﹐不需明确划分「包含者／内容」和「集合／成员」两种关系。其原因是﹕集合与成员之间亦可互为独立﹐不具「生死与共」之亲蜜关系﹔例如﹐「香港观光行程」是独立存在的﹐它既可含于东北亚总行程中﹐又可含于东南亚旅行团的总行程中。因之﹐「集合／成员」关系是一种特殊的「组合」(Composition)
结构。<br>
兹拿上节Person类别做为例子﹐如果Person之对象会加入Club（俱乐部）成为俱乐部的会员﹐则Club与Person之关系为「集合／成员」关系。兹定义Club类别如下﹕<br>
<br>
'ex05.bas<br>
Imports System.ComponentModel<br>
Imports System.Drawing<br>
Imports System.WinForms<br>
Imports System.Collections<br>
'----------------------------------------------------<br>
Class Person<br>
Private p_name As String<br>
Private p_age As Integer<br>
<br>
Public Sub New(ByVal na As String, ByVal a As Integer)
</font> </span> <br>
</p>
</td>
</tr>
</table>
</div>
<p align="center"><a href="../../pian/vb.htm">回首页</a>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -