所谓的专家,就是在一个很小的领域把所有的错误都犯过的人
---------题记
做机房收费系统也有一段时间了,目前已经进行到学生下机操作了。因为学生下机操作时,需要根据不同用户的类别,来进行相应的结账服务,于是乎就想到了以前学习到的设计模式,那么针对这个问题,可以用到那些模式呢?小编在这里总结一下。(可能有些模式过于勉强,但这都无所谓,学习的真谛就在于此,不断的重复和实验)
-------------------------------------------------------------------------------------------------------------------------------------------------------
先分析下下机需要用到的数据
固定用户每小时费用:代表会员级别每小时花费金额
临时用户每小时费用:代表临时用户每小时花费金额
至少上机时间:学生如果上机时间小于此的话,就按此时间计算
准备时间:此时间不计算在学生上机时间里面
至少金额:上机时间小于至少上机时间的,就按此计算
策略模式以前也写过类似的博客,连接如下
Strategy接口:封装了不同类别用户计算金额的算法
Context类:封装了不同的角色,当外部调用时,无须知道算法,直接实例化该类即可
''' <summary> ''' 策略的接口 ''' </summary> ''' <remarks></remarks> Public Interface Strategy ''' <summary> ''' ''' </summary> ''' <param name="consumeTime">花费的时间</param> ''' <param name="bill">不同类型用户上机每小时花费金额</param> ''' <returns>返回消费的金额</returns> ''' <remarks></remarks> Function ConsumeMoney(ByVal consumeTime As Single, bill As Single) As Single End Interface ''' <summary> ''' 固定用户实现接口 ''' </summary> ''' <remarks></remarks> Public Class regularUser Implements Strategy Public Function ConsumeMoney(consumeTime As Single, bill As Single) As Single Implements Strategy.ConsumeMoney '如果小于准备时间的话,不收费的 If consumeTime < 5 Then Return 0 '如果小于最少上机时间的话,就收费最少金额 ElseIf consumeTime > 5 And consumeTime < 30 Then Return 2 Else Return bill / 60 * consumeTime End If End Function End Class Public Class context '抽象策略 Dim strategy As Strategy = Nothing '构造函数设置具体策略 '注意在vb.net中使用sub new()关键字来使用构造函数 Sub New(ByVal _strategy As Strategy) Me.strategy = _strategy End Sub '封装后的策略方法 Public Sub count(ByVal consumeTime As Single, bill As Single) Me.strategy.ConsumeMoney(consumeTime, bill) End Sub End Class
特别声明:这只是一个学生下机结账的小Demo。
未完待续……
有关机房收费系统学生下机的思考,布布扣,bubuko.com
原文地址:http://blog.csdn.net/zhouchaoqiang/article/details/27661807