vb.net 教程 8-3 数据库操作3

2021/9/13 19:08:06

本文主要是介绍vb.net 教程 8-3 数据库操作3,对大家解决编程问题具有一定的参考价值,需要的程序猿们随着小编来一起学习吧!

订阅专栏
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。

本节在上一节的基础上学习在Command中设置sql语句参数:

还是以一个实例说明:

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim odc As New OleDbConnection()
        odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:\save\博客教程\08 数据库\Northwind.mdb"
 
        Dim odcommand As New OleDbCommand()
        odcommand.CommandText = "select * from 产品 where 单价>@price"
        odcommand.Parameters.Add("@price", OleDbType.Currency)
        odcommand.Parameters("@price").Value = 30
        odcommand.Connection = odc
        odc.Open()
 
        Dim odReader As OleDbDataReader
        odReader = odcommand.ExecuteReader(CommandBehavior.SingleResult)    ' Or CommandBehavior.SingleRow)
 
        Dim queryString As String = ""
        If odReader.HasRows Then
            Do While odReader.Read
                For i As Integer = 0 To odReader.FieldCount - 1
                    queryString &= odReader.GetName(i) & ":" & odReader.GetValue(i) & "   "
                Next i
                queryString &= vbCrLf
            Loop
        End If
 
        odc.Close()
        TextBox1.Text = queryString
    End Sub
 

在odCommand.CommandText中使用了 @price,

使用odCommand.Parameters.Add方法增加参数,并且值设置为30

实际等效于执行查询:select * from 产品 where 单价>30

运行结果如下:

由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看vb.net教程 目录

 
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。



这篇关于vb.net 教程 8-3 数据库操作3的文章就介绍到这儿,希望我们推荐的文章对大家有所帮助,也希望大家多多支持为之网!


扫一扫关注最新编程教程