vb.net操作SQL数据库比较好用的类

vb.net操作SQL数据库比较好用的类

vb.net操作SQL数据库比较好用的类

Public Class ClassDB
Public cn As System.Data.SqlClient.SqlConnection
Public da As System.Data.SqlClient.SqlDataAdapter
Public ds As New DataSet
Public dt As New DataTable
Public cmd As System.Data.SqlClient.SqlCommand

'****************************************************************************************
'连接数据库
Public Function ConnectionOpen(ByVal server As String, ByVal DBName As String, ByVal uid As String, ByVal pwd As String) As Boolean 'ByVal server As String, ByVal DBName As String, ByVal uid As String, ByVal pwd As String
    Dim cnstr As String = "Persist Security Info=False;" _
                          & "Server=" & server & ";" _
                          & "Database=" & DBName & ";" _
                          & "User ID=" & uid & ";" _
                          & "Password=" & pwd
    cn = New System.Data.SqlClient.SqlConnection(cnstr)
    Try
        cn.Open()
    Catch ex As System.Data.SqlClient.SqlException
        MsgBox(ex.Message.ToString())
    End Try
End Function

'断开数据库的连接
Public Function ConnectionClose() As Boolean
    Try
        cn.Close()
    Catch ex As System.Data.SqlClient.SqlException
        MsgBox(ex.Message.ToString())
    End Try
End Function

'插入记录、删除记录、更新记录到指定的数据库->数据表
Public Function InsertDelUpdateRecord(ByVal cmdText As String) As Boolean
    Try
        cmd = New System.Data.SqlClient.SqlCommand(cmdText, cn) '指定sql命令及该命令用于哪一个数据库连接
        cmd.ExecuteNonQuery()
    Catch ex As Exception
        MsgBox(ex.Message.ToString())

    End Try
End Function

'填充数据集,他会根据cmdtext参数说指定的查询返回数据库里特定的表
Public Function DataSetFill(ByVal cmdText As String, ByVal tabName As String) As Boolean
    Try
        cmd = New System.Data.SqlClient.SqlCommand(cmdtext, cn) '指定sql查询命令及该命令用于哪一个数据库连接
        da = New System.Data.SqlClient.SqlDataAdapter(cmd)
        da.Fill(ds, tabName) '表名可以映射为数据库中实际的表名称,但是他和数据库实际的表名称不是一回事
    Catch ex As Exception
        MsgBox(ex.Message.ToString())
    End Try
End Function

'调用存储过程
Public Function ExecProc(ByVal procName As String, ByVal tabName As String) As Boolean
    Try
        cmd = New System.Data.SqlClient.SqlCommand(procName, cn)
        cmd.CommandType = CommandType.StoredProcedure
        da = New System.Data.SqlClient.SqlDataAdapter(cmd)
        da.Fill(ds, tabName)
    Catch ex As Exception
        MsgBox(ex.Message.ToString())
    End Try
End Function

'这个基本不用,因为可以直接通过ds来调用
Public Function DataTableFill(ByVal index As Integer) As Boolean
    Try
        dt = ds.Tables(index)
    Catch ex As Exception
        MsgBox(ex.Message.ToString())
    End Try
End Function

'这个基本不用,因为可以直接通过ds来调用
Public Function DataTableFill(ByVal name As String) As Boolean
    Try
        dt = ds.Tables(name)
    Catch ex As Exception
        MsgBox(ex.Message.ToString())
    End Try
End Function

'释放资源
Public Function DBDispos() As Boolean
    Try
        cn.Dispose()
        'da.Dispose()
        ds.Dispose()
        dt.Dispose()
    Catch ex As Exception
        MsgBox(ex.Message.ToString())
    End Try

End Function

End Class
Alt

带尺寸的图片: Alt

居中的图片: Alt

居中并且带尺寸的图片: Alt

当然,我们为了让用户更加便捷,我们增加了图片拖拽功能。

如何插入一段漂亮的代码片

博客设置页面,选择一款你喜欢的代码片高亮样式,下面展示同样高亮的 代码片.

// An highlighted block
var foo = 'bar';

生成一个适合你的列表

  • 项目
    • 项目
      • 项目
  1. 项目1
  2. 项目2
  3. 项目3
  • 计划任务
  • 完成任务

创建一个表格

一个简单的表格是这么创建的:

项目Value
电脑$1600
手机$12
导管$1

设定内容居中、居左、居右

使用:---------:居中
使用:----------居左
使用----------:居右

第一列第二列第三列
第一列文本居中第二列文本居右第三列文本居左

SmartyPants

SmartyPants将ASCII标点字符转换为“智能”印刷标点HTML实体。例如:

TYPEASCIIHTML
Single backticks'Isn't this fun?'‘Isn’t this fun?’
Quotes"Isn't this fun?"“Isn’t this fun?”
Dashes-- is en-dash, --- is em-dash– is en-dash, — is em-dash

创建一个自定义列表

Markdown
Text-to- HTML conversion tool
Authors
John
Luke

如何创建一个注脚

一个具有注脚的文本。1

注释也是必不可少的

Markdown将文本转换为 HTML

KaTeX数学公式

您可以使用渲染LaTeX数学表达式 KaTeX:

Gamma公式展示 Γ ( n ) = ( n − 1 ) ! ∀ n ∈ N \Gamma(n) = (n-1)!\quad\forall n\in\mathbb N Γ(n)=(n1)!nN 是通过欧拉积分

Γ ( z ) = ∫ 0 ∞ t z − 1 e − t d t   . \Gamma(z) = \int_0^\infty t^{z-1}e^{-t}dt\,. Γ(z)=0tz1etdt.

你可以找到更多关于的信息 LaTeX 数学表达式here.

新的甘特图功能,丰富你的文章

Mon 06 Mon 13 Mon 20 已完成 进行中 计划一 计划二 现有任务 Adding GANTT diagram functionality to mermaid
  • 关于 甘特图 语法,参考 这儿,

UML 图表

可以使用UML图表进行渲染。 Mermaid. 例如下面产生的一个序列图::

张三 李四 王五 你好!李四, 最近怎么样? 你最近怎么样,王五? 我很好,谢谢! 我很好,谢谢! 李四想了很长时间, 文字太长了 不适合放在一行. 打量着王五... 很好... 王五, 你怎么样? 张三 李四 王五

这将产生一个流程图。:

链接
长方形
圆角长方形
菱形
  • 关于 Mermaid 语法,参考 这儿,

FLowchart流程图

我们依旧会支持flowchart的流程图:

Created with Raphaël 2.2.0 开始 我的操作 确认? 结束 yes no
  • 关于 Flowchart流程图 语法,参考 这儿.

导出与导入

导出

如果你想尝试使用此编辑器, 你可以在此篇文章任意编辑。当你完成了一篇文章的写作, 在上方工具栏找到 文章导出 ,生成一个.md文件或者.html文件进行本地保存。

导入

如果你想加载一篇你写过的.md文件,在上方工具栏可以选择导入功能进行对应扩展名的文件导入,
继续你的创作。


  1. 注脚的解释 ↩︎

  • 0
    点赞
  • 7
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值