7、创建以用户为中心的业务对象与集合类

创建以用户为中心的业务对象与集合类

在构建以数据为中心的对象后，我们就可以进行远程调用了。不过，在添加以用户为中心的对象之前，需要一个地方来存放应用程序常量。

1. AppConstants 模块

在 NorthwindUC 项目中添加一个名为 AppConstants.vb 的类模块，并添加以下代码：

Option Explicit On
Option Strict On
Public Class AppConstants
    Public Shared REMOTEOBJECTS As String = "http://localhost:80/Northwind/"
End Class

REMOTEOBJECTS 变量保存远程对象的路径。若使用其他计算机托管远程对象，需将 localhost 替换为正确的计算机名；若 IIS 服务器使用的端口不是 80，还需更改端口号。将其声明为共享变量，无需实例化该类，直接引用即可获取变量值。

接着，在 AppConstants 模块中添加如下 ChangedEventArgs 类：

Public Class ChangedEventArgs
    Public Enum eChange
        Added = 0
        Updated = 1
    End Enum
    Private meChange As eChange
    P