004Visual Basic代理模式

ngbshzhn

于 2020-05-25 19:44:35 发布

阅读量160

点赞数

分类专栏： # Visual Basic 2010 设计模式

本文链接：https://blog.csdn.net/ngbshzhn/article/details/106340359

版权

本文介绍了在Visual Basic中如何实现代理模式，包括定义代理接口、追求者类、Girl类和代理类的角色，以及在客户端如何使用这些类来实现特定功能。

摘要由CSDN通过智能技术生成

1. 代理接口

Public Interface GiveGift
    Sub GiveDolls()
    Sub GiveFlowers()
    Sub GiveChocolate()
End Interface

2.追求者类

Public Class Pursuit
    Implements GiveGift
    Private mName As String
    Public Property Name As String
        Get
            Name = mName
        End Get
        Set(ByVal value As String)
            mName = value
        End Set
    End Property

    '女神的名字
    Private myGirl As SchoolGirl
    Public Property GirlName As String
        Get
            Return myGirl.Name
        End Get
        Set(ByVal value As String)
            myGirl.Name = value
        End Set
    End Property

    '创建追求者的女神
    Public Sub New(ByVal mm As Sch