VB 查询SQL数据库

发布网友 发布时间：2022-12-17 00:51

我来回答

共3个回答

热心网友 时间：2023-10-04 14:40

这个例子中既有连接数据库和显示数据库数据的内容，参考一下。有问题再追问吧，望采纳。
Imports System.Data.SqlClient Public Class Form1 Dim LeafSqlConnection As SqlConnection '声明这些SQL的类 Dim LeafSqlCommand As SqlCommand Dim LeafSqlDataAdapter As SqlDataAdapter Dim LeafData As DataTable '定义一个leafdata对象（是存放数据库表信息的），这个是表格的类,用来装你读取的信息的表 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click LeafSqlConnection = New SqlConnection("Data Source=.;Initial Catalog=你的数据库名称 ;Integrated Security=True;Pooling=False") '如果采用windows身份登录就用这个,数据库名称我直接写成'你的数据库名称'了,没有用户名密码 'LeafSqlConnection = New SqlConnection("Initial Catalog=你的数据库名称 ;User ID=sa;PWD=leafsoftpassword") '如果采用SQL用户密码登录用这个,注意的是前面这些数据库名称我直接写成'你的数据库名称'了,你如果要读别的数据库自己改,还有用户密码自己改 LeafSqlCommand = New SqlCommand("Select * from 表1 Where 姓名='小强';", LeafSqlConnection) '这里记得名字的两边要加符号 ' LeafSqlDataAdapter = New SqlDataAdapter LeafSqlCommand.CommandType = CommandType.Text LeafSqlDataAdapter.SelectCommand = LeafSqlCommand LeafData = New DataTable LeafSqlDataAdapter.Fill(LeafData) DataGridView1.DataSource = LeafData End Sub End Class
希望能解决您的问题。

热心网友 时间：2023-10-04 14:41

as 与 from 中间 加一个临时字段名，比如：AAA
sql1 = "select ji_zhong,sum(input_num) as AAA from al_date where flow_bl='入料清洗' and lailiao='1' group by ji_zhong"
访问 这个字段AAA可以获得sum(input_num)的结果

热心网友 时间：2023-10-04 14:41

看看对应的字段名称和表中的字段是否一致