程序接龙

Author: 小彦 Date: 2000年 第43期

  自从程序接龙这个栏目推出后,许多PFans纷纷来信询问详情,有的提出了很好的软件创意,有的想成为一名“接龙人”,有的想在这里会一会PFans。
  最初提出的这个创意源于软件开发中的组件对象模型的概念(即Component Object Model,缩写为COM),这是对于专业型和大型的软件开发而言的,也就是现在很流行的“分布式应用程序”开发。其实理解起来,这也是最容易接受的概念。简而言之,就是“搭积木”式的开发,所以也就有了“程序接龙”这个栏目。
  从这期开始,你就要密切留意我们的“程序接龙”了,将每一期所刊登的模块收集起来,你就会拥有一个由许许多多素不相识的PFans联手开发的《现代家族史》了,当然,更重要的是你能学会如何去开发一个软件了!
  运行VB 6.0,新建一个标准EXE工程,将所有的工程(后缀名为.vbp)、模块(后缀名为.bas)、窗体(后缀名为.frm)等文件保存于同一目录下。
  在新建的工程中增加一个模块,取名为“07”,然后双击这个模块,添加以下代码:
  模块代码:
  ′用一个“成员信息”的自定义数据类型来记录基本信息
  Type 成员信息
   姓名 As String
   性别 As Boolean
   地址 As String
   电话 As String
   健康状况 As String
   家族关系 As 关系
  ′你可以添加更多的信息
  End Type
  ′用枚举型数据来记录成员之间的关系
  Enum 关系
   自己=0
   母亲=1
   父亲=2
   儿子=3
   女儿=4
   同学=5
   同事=6
  ′你可以类似添加其他关系
  End Enum
  模块说明:
  在用来记录成员信息的文件中(.txt格式),可以将每个成员的信息存为一个文本文件,其中每一行中各数据用分号隔离,而关系则用“(有关系的成员姓名,成员关系)”的形式来记录。例如:
  阿天;True;023-63607422;重庆市人民路236号;健康,无病史;(偏舟,5),(成惊羽,6)
  当然,在正式的《现代家族史》中,一旦你从用户界面中输入数据后,将自动生成相应的文本文件。
  开发环境:Windows 98+VB 6.0
  (编者注:这种用中文变量来记录数据,很适合我们中国人的习惯,而且一目了然,也为解决模块05提供了数据基础。在此也希望这个模块能够得到各位PFans的点评。)