备案控制台
探索云世界
开发者社区 人工智能 文章 正文

【机房重构】——模板方法解决组合查询

2022-11-25 39
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《 阿里云开发者社区用户服务协议》和 《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写 侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介： 【机房重构】——模板方法解决组合查询

引言


在机房重构再次遇到组合查询的时候非常的兴奋，这是因为在学习VB.NET的时候写过名为《vb.net——窗体继承》的博客，当我在谋划组合查询的时候看到完全的四个窗体就立马想到了这个知识，当时还不知道这是个设计模式，当学完了设计模式之后因为没有进行实践，所以第一反应不是设计模式而是自己写过的博客，这样凸显了博客的作用，但是现在知道了这是一种设计模式，就在接下来对这个模式进行小结一下。


理论部分


模板方法：定义一个操作中的算法的骨架，而将一些步骤延迟到子类中，模板方法使得子类可以不改变一个算法结构即可重定义该算法的某些特定的步骤。


类图：


20150107205333427.png

优点：模板方法是通过把不变行为搬移到超类，去除子类中的重复代码类体现它的优势，这样就提供了一个很好的代码复用平台，大大的提高了效率。


实践部分


在上面介绍了一些关于模板方法的基本知识，下面就结合机房收费系统中的组合查询来对模板方法小试一把。


首先在U层创建一个父窗体：



20150107210327515.png


下面来看一下我们父窗体中的基本代码


  '定义一个保护类型 的变量，子窗体也可以访问
    Protected groupcheck As Entity.EN_GoupCheck = New Entity.EN_GoupCheck()
    Private Sub frmGoupCheck_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        '操作符部分，因为操作符不变，所以在父窗体中加载
        cobOperator1.Items.Add(">")
        cobOperator1.Items.Add("<")
        cobOperator1.Items.Add("=")
        cobOperator1.Items.Add("<>")
        cobOperator2.Items.Add(">")
        cobOperator2.Items.Add("<")
        cobOperator2.Items.Add("=")
        cobOperator2.Items.Add("<>")
        cobOperator3.Items.Add(">")
        cobOperator3.Items.Add("<")
        cobOperator3.Items.Add("=")
        cobOperator3.Items.Add("<>")
        '关系
        cobRelations1.Items.Add("与")
        cobRelations1.Items.Add("或")
        'cobRelations1.Items.Add("")
        cobRelations2.Items.Add("与")
        cobRelations2.Items.Add("或")
        'cobRelations2.Items.Add("")
        '在加载的时候，只有第一行控件可用，后两行控件不可用
        cobFieldName2.Enabled = False
        cobFieldName3.Enabled = False
        cobOperator2.Enabled = False
        cobOperator3.Enabled = False
        cobRelations2.Enabled = False
        txtContent2.Enabled = False
        txtContent3.Enabled = False
        '当我们选中dgvRecordz控件就选中行 
        dgvRecord.SelectionMode = DataGridViewSelectionMode.FullRowSelect
        Dim i As Integer
        For i = 0 To dgvRecord.Columns.Count - 1
            dgvRecord.Columns(i).Width = DataGridViewAutoSizeColumnsMode.AllCells
        Next
    End Sub
    ''' <summary>
    ''' 清空查询条件和结果
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub btClear_Click(sender As Object, e As EventArgs) Handles btClear.Click
        cobFieldName1.Text = ""
        cobFieldName2.Text = ""
        cobFieldName3.Text = ""
        cobOperator1.Text = ""
        cobOperator2.Text = ""
        cobOperator3.Text = ""
        txtContent1.Text = ""
        txtContent2.Text = ""
        txtContent3.Text = ""
        cobRelations1.Text = ""
        cobRelations2.Text = ""
        dgvRecord.ClearSelection()
    End Sub
    ''' <summary>
    ''' 退出
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub btQuit_Click(sender As Object, e As EventArgs) Handles btQuit.Click
        Me.Dispose()
    End Sub
    ''' <summary>
    ''' 查询按钮
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub btCheck_Click(sender As Object, e As EventArgs) Handles btCheck.Click
        '判断组合框不为空  
        If cobRelations1.Text = "" Then
            If cobFieldName1.Text = "" Or cobOperator1.Text = "" Or txtContent1.Text = "" Then
                MsgBox("第一行查询条件不能为空")
                Exit Sub
            End If
        End If
        If cobRelations1.Text <> "" Then
            If cobFieldName2.Text = "" Or cobOperator2.Text = "" Or txtContent2.Text = "" Then
                MsgBox("第二行查询条件不能为空")
                Exit Sub
            End If
        Else
            If cobRelations2.Text <> "" Then
                If cobFieldName1.Text = "" Or cobOperator1.Text = "" Or txtContent1.Text = "" Or
                cobFieldName2.Text = "" Or cobOperator1.Text = "" Or txtContent2.Text = "" Or
                cobFieldName3.Text = "" Or cobOperator1.Text = "" Or txtContent3.Text = "" Then
                    MsgBox("第三行查询条件不能为空")
                    Exit Sub
                End If
            End If
        End If
        '给实体赋值
        groupcheck.GetdbName = GetdbName()
        groupcheck.CobFieldName1 = ToEnglish(cobFieldName1.Text)
        groupcheck.CobFieldName2 = ToEnglish(cobFieldName2.Text)
        groupcheck.CobFieldName3 = ToEnglish(cobFieldName3.Text)
        groupcheck.cobOperator1 = cobOperator1.Text.Trim
        groupcheck.cobOperator2 = cobOperator2.Text.Trim
        groupcheck.cobOperator3 = cobOperator3.Text.Trim
        groupcheck.txtContent1 = txtContent1.Text.Trim
        groupcheck.txtContent2 = txtContent2.Text.Trim
        groupcheck.txtContent3 = txtContent3.Text.Trim
        ''前者还是后者  
        groupcheck.cobRelations1 = ToEnglish(cobRelations1.Text)
        groupcheck.cobRelations2 = ToEnglish(cobRelations1.Text)
        Dim dt As New DataTable
        Dim Ugropcheck As New Facade.FacadeGroupCheck
        dt = Ugropcheck.FGroupCheck(groupcheck)
        If (dt.Rows.Count = 0) Then
            MsgBox("没有符合条件的记录")
            Exit Sub
        Else
            Call Todgv()
        End If
    End Sub
    ''' <summary>  
    ''' 因为每个窗体需要转换的字段的内容不同，所以定义虚函数ToEnglish，查询字段转化为数据库字段  
    ''' </summary>  
    ''' <param name="cboName"></param>  
    ''' <returns></returns>  
    ''' <remarks></remarks>  
    Public Overridable Function ToEnglish(cboName As String) As String
        Return ""
    End Function
    ''' <summary>  
    ''' 获得数据库表名，在不同的窗体和不同的表交互
    ''' </summary>  
    ''' <returns></returns>  
    ''' <remarks></remarks>  
    Public Overridable Function GetdbName() As String
        Return ""
    End Function
    ''' <summary>  
    ''' 把表显示到datagridview中  
    ''' </summary>  
    ''' <remarks></remarks>  
    Protected Overridable Sub Todgv()
        'dgvRecord.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells
    End Sub
    ''' <summary>
    ''' 第一关系是否为空，判断第二三行是否可用
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub cobRelations1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cobRelations1.SelectedIndexChanged
        If cobRelations1.Text = "" Then
            cobFieldName2.Enabled = False
            cobFieldName3.Enabled = False
            cobOperator2.Enabled = False
            cobOperator3.Enabled = False
            cobRelations2.Enabled = False
            txtContent2.Enabled = False
            txtContent3.Enabled = False
        Else
            cobFieldName2.Enabled = True
            cobOperator2.Enabled = True
            cobRelations2.Enabled = True
            txtContent2.Enabled = True
        End If
    End Sub
    ''' <summary>
    ''' 根据第二个关系，判断第三行的内容是否可用
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Protected Sub cobRelations2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cobRelations2.SelectedIndexChanged
        If cobRelations2.Text = "" Then
            cobFieldName3.Enabled = False
            cobOperator3.Enabled = False
            txtContent3.Enabled = False
        Else
            cobFieldName3.Enabled = True
            cobOperator3.Enabled = True
            txtContent3.Enabled = True
        End If
    End Sub
End Class


当我们完成父窗体以后，下面来看子窗体（以操作员工作记录为例），首先添加子窗体（具体过程见文章开头链接博客）：


以上就是我们U层的代码，可以看出在子窗体中最后多出了一个功能——导出Excel表格，这就是说子窗体继承父窗体以后，不能修改父窗体中的原有的控件，但是可以在原有的基础上添加新的功能。


下面来看一下我D层的代码：

Public Function IGroupCheck(groupcheck As Entity.EN_GoupCheck) As DataTable Implements IGroupCheck.IGroupCheck
        Dim sql As String
        sql = "PROC_GroupCheck" '调用存储过程
        Dim cmdType As CommandType = CommandType.StoredProcedure '类型为存储过程
        '设置参数
        Dim paras As SqlParameter() = {New SqlParameter("@cobFieldName1", groupcheck.CobFieldName1),
                                       New SqlParameter("@cobFieldName2", groupcheck.CobFieldName2),
                                       New SqlParameter("@cobFieldName3", groupcheck.CobFieldName3),
                                       New SqlParameter("@cobOperator1", groupcheck.cobOperator1),
                                       New SqlParameter("@cobOperator2", groupcheck.cobOperator2),
                                       New SqlParameter("@cobOperator3", groupcheck.cobOperator3),
                                       New SqlParameter("@txtContent1", groupcheck.txtContent1),
                                       New SqlParameter("@txtContent2", groupcheck.txtContent2),
                                       New SqlParameter("@txtContent3", groupcheck.txtContent3),
                                       New SqlParameter("@cobRelations1", groupcheck.cobRelations1),
                                       New SqlParameter("@cobRelations2", groupcheck.cobRelations2),
                                       New SqlParameter("@tableName", groupcheck.GetdbName)}
        Return SqlHelper.SqlHelper.ExecSelect(sql, cmdType, paras)
    End Function

因为我们需要和不同的数据库交互，开始的时候我想下U层写好字符串拼接的代码然后封装到实体中，然后通过实体传到D层和数据库交互，但是在实现了以后发现很不友好（自我感觉），所以就想换一种思路来实现这个功能，在我经过一天的学习后最后采用存储过程来实现代码见（存储过程和触发器）。


为什么会有这种想法呢？因为每一个功能需要和不同的数据库表打交道，所以我想只用一个变量来控制我们和那张表交互，在网上查询这方面的知识的时候，提示用存储过程来试一试，这才有了存储过程的学习。


小结


用这种方法实现组合查询相比第一遍机房傻兮兮的重复画一样的窗体，复制一样的代码心里爽多了，当然在第一遍的时候实现了字符串的拼接也是很爽的，所以，我们在不同阶段应该尝试一些新的方法来实现我们的功能，虽然我们不一定能实现，单至少我们有了这样的想法，虽然我们用的并不一定完美，至少我们学到了新思路，学习就是在这样不断的思考，不断的尝试中提高的，希望在以后的学习中能不断的产生新的想法

文章标签：
算法
数据库
存储
设计模式
go-Jack
目录
相关文章
宁在春
|
5月前
|
算法
犯错总结--工厂模式和策略模式傻傻没分清
犯错总结--工厂模式和策略模式傻傻没分清
宁在春
32 0
犯错总结--工厂模式和策略模式傻傻没分清
Lpy2569
|
8月前
细谈抽象类
抽象类 1.抽象类是被abstract修饰的类 2.抽象类中的抽象方法 3.抽象类中可以有和普通类一样的成员变量和成员方法 4.抽象类不能被实例化 5.那么抽象类不能被实例化要它有何用？？？
Lpy2569
27 0
Hayaizo
|
9月前
|
存储 编译器 C语言
类与对象（随心记录一）
类与对象（随心记录一）
Hayaizo
84 1
武梓龙_Wzill
|
10月前
机房收费系统—组合查询逻辑分析
机房收费系统—组合查询逻辑分析
武梓龙_Wzill
33 0
武梓龙_Wzill
|
10月前
|
数据安全/隐私保护
机房收费系统—经典代码
机房收费系统—经典代码
武梓龙_Wzill
68 1
熊猫队长-
|
10月前
机房重构之，职责链模式上机
机房重构之，职责链模式上机
熊猫队长-
48 0
技术小结
|
11月前
|
存储 SQL 数据库
【机房重构】组合查询—存储过程
【机房重构】组合查询—存储过程
技术小结
28 0
holdtao
|
12月前
|
C++
第十三章 类继承
第十三章 类继承
holdtao
65 0
go-Jack
|
SQL
【机房收费系统——组合查询】
【机房收费系统——组合查询】
go-Jack
45 0
【机房收费系统——组合查询】
go-Jack
|
设计模式 算法 测试技术
【机房重构】——策略模式+简单工厂计算消费
【机房重构】——策略模式+简单工厂计算消费
go-Jack
69 0
【机房重构】——策略模式+简单工厂计算消费

热门文章

最新文章

  • 1
    哪种词向量模型更胜一筹？Word2Vec，WordRank or FastText?
  • 2
    解析Java中的MyBatis Plus注解 @FieldFill：优雅处理字段填充
  • 3
    Win8Metro(C#)数字图像处理--2.27图像加法运算
  • 4
    A N EAR -D UPLICATE D ETECTION A LGORITHM T O F ACILITATE D OCUMENT C LUSTERING——有时间看看里面的相关研究
  • 5
    面向服务体系架构的业务规划和建模方法系列之二－－基础概念辨析
  • 6
    Windows 8部署系列PART2：部署先决条件准备
  • 7
    string类的写时拷贝
  • 8
    新瓶旧酒ASP.NET AJAX(4) - 客户端脚本编程（JavaScript基本类型扩展）
  • 9
    Gartner：今年全球企业物联网使用率将达43%
  • 10
    C++第9周项目4参考——本月有几天？
  • 1
    【AI 初识】什么是卷积神经网络 （CNN）？
    27
  • 2
    【AI 初识】递归神经网络 （RNN） 概念
    20
  • 3
    【AI 初识】什么是迁移学习，它在人工智能中有什么用？
    21
  • 4
    【AI 初识】神经网络有哪些不同类型？
    16
  • 5
    【AI 初识】AI 的挑战和局限性
    18
  • 6
    【AI 初识】描述遗传算法概念
    16
  • 7
    【AI 初识】人工智能中使用了哪些不同的搜索算法？
    9
  • 8
    结构化伪类选择器
    11
  • 9
    【AI 初识】机器学习中维度的诅咒是什么？
    10
  • 10
    【AI 初识】监督学习、无监督学习和强化学习定义
    12

    • 相关电子书

    更多
  • 低代码开发师（初级）实战教程
  • 冬季实战营第三期：MySQL数据库进阶实战
  • 阿里巴巴DevOps 最佳实践手册
    • 下一篇
    2024年阿里云免费云服务器及学生云服务器申请教程参考