VB.NET 接口的作用----本人现阶段的理解

前端之家收集整理的这篇文章主要介绍了VB.NET 接口的作用----本人现阶段的理解前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

在用"三层架构"思想做机房收费系统的时候,感觉最经典的三层架构图就是下面这个图了。

你有没有发现按照上面这副图做的话,BLL层跟DAL层联系太紧密了,这样实现的系统,就相当于把数据库写死了,想更换别的数据库可不是件简单的事,于是我们就想到了要在DAL层加上接口+"抽象工厂设计模式"。于是就出现了下面这副图



在这里谈谈我理解的接口所具有的作用,说的不对的地方,还请高手指点!

接口是面向对象方法最重要的特性之一。现阶段我理解的接口具有的作用有两点:一是契约、二是解耦。

一.契约,即约定

在IDAL层的各个接口层,规定好每个接口里实现什么方法,在DAL层的类继承某一接口时就必须实现对应接口里的所有方法,少一个都不行。一个接口可以被多个类继承,一个类也可以同时继承多个接口。

例如,IDAL层有一个访问基本数据表的接口,代码如下:

  1. ''' <summary>
  2. ''' 这是接口层,用于访问“基本数据表”的一个接口
  3. ''' </summary>
  4. ''' <remarks></remarks>
  5. Public Interface IBaseData
  6. ''' <summary>
  7. ''' 取出"基本数据表"中数据,放到一个DataTable表中
  8. ''' </summary>
  9. ''' <returns>数据表(DataTable)</returns>
  10. ''' <remarks></remarks>
  11. Function GetBaseDataInfo() As System.Data.DataTable
  12.  
  13. ''' <summary>
  14. ''' 更新基本数据表中的信息
  15. ''' </summary>
  16. ''' <param name="BaseData">参数为"基本数据"实体</param>
  17. ''' <returns>是否更新成功</returns>
  18. ''' <remarks></remarks>
  19. Function UpdateBaseData(ByVal BaseData As Entity.BaseDataSet) As Boolean
  20. End Interface
DAL层的类继承上面这个接口时,就必须实现里面的两个方法,少一个都不行,这样起到一个约束。实现代码如下

  1. ''' <summary>
  2. ''' 这是数据访问层"基本数据信息"
  3. ''' </summary>
  4. ''' <remarks></remarks>
  5. Public Class sqlBaseDataDao
  6. Implements IDAL.IBaseData
  7. ''' <summary>
  8. ''' 取出"基本数据表"中数据,放到一个DataTable表中
  9. ''' </summary>
  10. ''' <returns>数据表(DataTable)</returns>
  11. ''' <remarks></remarks>
  12. Public Function GetBaseDataInfo() As System.Data.DataTable Implements IDAL.IBaseData.GetBaseDataInfo
  13. '设置sql语句
  14. Dim strsql As String = "select * form BaseDataSet"
  15. '实例化一个sqlHelper
  16. Dim ExecsqlHelper As New sqlServerHelper.sqlHelper
  17.  
  18. '执行无参查询函数,返回"基本数据"数据表
  19. Return ExecsqlHelper.ExeQueryNoParameters(strsql,CommandType.Text)
  20. End Function
  21.  
  22. ''' <summary>
  23. ''' 更新基本数据表中的信息
  24. ''' </summary>
  25. ''' <param name="BaseData">参数为"基本数据"实体</param>
  26. ''' <returns>是否更新成功</returns>
  27. ''' <remarks></remarks>
  28. Public Function UpdateBaseData(ByVal BaseData As Entity.BaseDataSet) As Boolean Implements IDAL.IBaseData.UpdateBaseData
  29. '设置sql语句
  30. Dim strsql As String = "update BaseDataSet set Rate=@Rate,TmpRate=@TmpRate," _
  31. & "UniTime=@UniTime,LeastTime=@LeastTime," _
  32. & "PrePareTime=@PrePareTime,LimitCash=@LimitCash,Operatorr=@Operatorr)"
  33.  
  34. '实例化一个sqlHelper
  35. Dim ExecsqlHelper As New sqlServerHelper.sqlHelper
  36.  
  37. '创建命令参数数组
  38. Dim sqlParam(6) As sqlParameter
  39.  
  40. '给命令参数数组赋值
  41. sqlParam(0) = ExecsqlHelper.AddsqlParameter("Rate",sqlDbType.Float,CStr(BaseData.Rate))
  42. sqlParam(1) = ExecsqlHelper.AddsqlParameter("TmpRate",CStr(BaseData.TmpRate))
  43. sqlParam(2) = ExecsqlHelper.AddsqlParameter("UniTime",sqlDbType.Date,CStr(BaseData.UniTime))
  44. sqlParam(3) = ExecsqlHelper.AddsqlParameter("LeastTime",CStr(BaseData.LeastTime))
  45. sqlParam(4) = ExecsqlHelper.AddsqlParameter("PrePareTime",CStr(BaseData.PrePareTime))
  46. sqlParam(5) = ExecsqlHelper.AddsqlParameter("LimitCash",CStr(BaseData.LimitCash))
  47. sqlParam(6) = ExecsqlHelper.AddsqlParameter("Operatorr",sqlDbType.VarChar,CStr(BaseData.Operatorr))
  48.  
  49. '执行修改基本数据命令,返回是否成功
  50. Return ExecsqlHelper.ExeNotQueryWithParameters(strsql,CommandType.Text,sqlParam)
  51. End Function
  52. End Class

二.解耦作用
使用第一幅图的设计,我们开发"机房收费系统"用sql Server数据库,如果需要一个Access的数据库orMysqL数据库,这时需要把涉及数据操作的逻辑代码(BLL层、DAL层)全部改写,对不?

使用第二幅图,我们在DAL层加了IDAL接口,IDAL接口就作为一层。首先,定义逻辑操作接口,涉及数据操作的类(DAL层的类)继承该接口实现,在BLL逻辑层调用的时候,面对的是接口编程,BLL层直接声明接口,将操作对象直接转换为接口类型。 这时候,如果换用不同的数据库,只要改动DAL层的方法就可以了,BLL层就不用改了。面对接口编程也就去除了BLL层与DAL层的耦合。

猜你在找的VB相关文章