昨天和大家讲解了设计模式中的职责链模式,今天意犹未尽,接着讲设计模式,今天要讲的设计模式是策略模式。
我们都知道,编程语言的三种控制结构可以解决遇到的所有问题。从宏观上来看,职责链模式好似顺序结构,事先确定好事情的执行顺序,依次执行,直到有人处理此事;策略模式好似选择结构,根据不同的问题,动态的采用对应的解决方案。
下面的策略模式的官方解释:它定义了算法家族,分别封装起来,让它们之间可以互相替换,此模式让算法的变化,不会影响到使用算法的用户。
回首已经完成的机房收费系统,有这个一个场景:在用户上机时,管理员会根据用户类型--固定用户或临时用户,采取不同的计费标准,而我们刚刚提到的策略模式整好适用于此场景。好,下面我们用一个小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
继承类一般用户RegularUserStragePublic 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都不让认识了。
希望我的讲解能对大家有所帮助。