`
yanfaguanli
  • 浏览: 658715 次
文章分类
社区版块
存档分类
最新评论

策略模式

 
阅读更多

昨天和大家讲解了设计模式中的职责链模式,今天意犹未尽,接着讲设计模式,今天要讲的设计模式是策略模式。

我们都知道,编程语言的三种控制结构可以解决遇到的所有问题。从宏观上来看,职责链模式好似顺序结构,事先确定好事情的执行顺序,依次执行,直到有人处理此事;策略模式好似选择结构,根据不同的问题,动态的采用对应的解决方案。

下面的策略模式的官方解释:它定义了算法家族,分别封装起来,让它们之间可以互相替换,此模式让算法的变化,不会影响到使用算法的用户。

回首已经完成的机房收费系统,有这个一个场景:在用户上机时,管理员会根据用户类型--固定用户或临时用户,采取不同的计费标准,而我们刚刚提到的策略模式整好适用于此场景。好,下面我们用一个小Demo来完成详细讲解。

在这个Demo中,一共有4个类和1个窗体。抽象类用户消费策略UserConsumeStrage、继承类一般用户RegularUserStrage、继承类临时用户TemUserStrage、策略控制类ConsumeContent、窗体类frm。

用户消费策略类UserConsumeStrage代码如下:

Public MustInherit Class UserConsumeStrage
    '收取现金的超类
    Public MustOverride Function acceptCash(ByVal ConsumeTime As Integer) As Double
End Class
继承类一般用户RegularUserStrage
Public Class RegularUserStrage : Inherits UserConsumeStrage
    '一般用户机房标准
    Private Rate As Double
    '在对象创建时,需要输入一般用户的机房标准
    Public Sub New(ByVal Rate As Double)
        Me.Rate = Rate
    End Sub
    Public Overrides Function acceptCash(ByVal ConsumeTime As Integer) As Double
        Return Rate * ConsumeTime
    End Function
End Class
继承类临时用户TemUserStrage代码和RegularUserStrage雷同

策略控制类ConsumeContent代码如下:

Public Class ConsumeContent
    Private cc As UserConsumeStrage
    '声明新对象时,需要传入计费类型
    Public Sub New(ByVal type As String)
        Select Case type
            Case "一般用户"
                Dim cc0 As New RegularUserStrage("0.8")
                cc = cc0
                Exit Select
            Case "临时用户"
                Dim cc1 As New TemUserStrage("1")
                cc = cc1
                Exit Select
        End Select
    End Sub
    Public Function GetResult(ByVal consumeTime As Integer) As Double
        Return cc.acceptCash(consumeTime)
    End Function
End Class
frm窗体代码如下:
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '获取计费策略
        Dim ustrage As New ConsumeContent(cbxType.SelectedItem.ToString())

        Dim totalPrice As Double

        totalPrice = ustrage.GetResult(Convert.ToDouble(txtConsumeTime.Text))

        lblResult.Text = totalPrice.ToString()
    End Sub

这样利用策略模式和简单工厂模式实现了上述Demo,使客户端只需认识一个类ConsumeContent类即可,降低了系统的耦合度,使得收费算法彻底与客户端分类,连算法的父类UserConsumeStrage都不让认识了。

希望我的讲解能对大家有所帮助。



分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics