datagridview не содержит данных в БД только столбец - PullRequest
0 голосов
/ 17 марта 2019

Я хочу, чтобы в моем datagirdview содержались данные двух строк, с этим кодом мой столбец показывал, но я имею в виду, что в строке нет данных .. это мой код

  Dim sqlcon As New SqlConnection("Data Source=ALLAYE\SQLEXPRESS;Initial Catalog=Business;Integrated Security=True")
        Dim sqlcmd As New SqlCommand("SELECT OrderTB.OrderID, OrderTB.CustomerID, OrderTB.OrderDate, OrderTB.TotalOrder, CustomerTB.CustomerID AS CusID, CustomerTB.CompanyName, CustomerTB.CustomerPhone
FROM     OrderTB INNER JOIN
                  CustomerTB ON OrderTB.CustomerID = CustomerTB.CustomerID", sqlcon)
        sqlcon.Open()
        Dim sqladp As New SqlDataAdapter(sqlcmd)
        Dim dt As New DataTable
        sqladp.Fill(dt)
        DataGridView1.DataSource = dt.TableName
        sqlcon.Close()

1 Ответ

0 голосов
/ 18 марта 2019

Попробуй вот так.

Imports System.Data.SqlClient
Public Class Form1
    Dim connetionString As String
    Dim connection As SqlConnection
    Dim adapter As SqlDataAdapter
    Dim cmdBuilder As SqlCommandBuilder
    Dim ds As New DataSet
    Dim changes As DataSet
    Dim sql As String
    Dim i As Int32

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        connetionString = "Data Source=ServerName;Initial Catalog=DatabaseName;User ID=UserName;Password=Password"
        connection = New SqlConnection(connetionString)
        Sql = "select * from Product"
        Try
            connection.Open()
            adapter = New SqlDataAdapter(Sql, connection)
            adapter.Fill(ds)
            connection.Close()
            DataGridView1.Data Source= ds.Tables(0)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub

End Class
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...