如何在vb.net中检索mysql数据? [英] how to retrieve mysql data in vb.net?

问题描述

im尝试检索具有特定列的mysql数据并显示到vb.net中的文本框.找回我该怎么办?

im trying to retrieve mysql data with specific column and show to textbox in vb.net. what should i do in retrieving it?

Dim connect As New MySqlConnection("server=localhost; user id=root; password= ; database=ticketing_system;")
    connect.Open()

    Dim sqladapter As New MySqlDataAdapter
    Dim sqlcmd As New MySqlCommand
    Dim dr As MySqlDataReader
    Dim dt As New DataTable

    sqlcmd = New MySqlCommand("SELECT * complaint WHERE tran_no='" & lbltranno.Text & "'")
    **THEN? WHAT SHOULD I DO TO DISPLAY DATA? PLEASE HELP**

    connect.Close()

推荐答案

Imports System.Data.SqlClient
Public Class Form1
Dim c As New SqlConnection("Data Source=SONY;Initial Catalog=msdb;Integrated Security=True")
Dim cmd As New SqlCommand
Dim da As New SqlDataAdapter
Dim dr As SqlDataReader
Dim ds, ds1 As New DataSet
Private Sub btnsub_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles      btnsub.Click
    Try
        ds.Clear()
        c.Open()
        cmd = New SqlCommand("select Sub_Name from Subject_Detail WHERE Course='" + txtcourse.Text + "'", c)
        da = New SqlDataAdapter(cmd)
        da.Fill(ds, "Subject_Detail")
        Label1.Text = ds.Tables(0).Rows(0).Item(0)
        Label2.Text = ds.Tables(0).Rows(1).Item(0)
        Label3.Text = ds.Tables(0).Rows(2).Item(0)
        Label4.Text = ds.Tables(0).Rows(3).Item(0)
        Label5.Text = ds.Tables(0).Rows(4).Item(0)
        Label6.Text = ds.Tables(0).Rows(5).Item(0)
    Catch ex As Exception
        MsgBox(ex.Message)
    Finally
        c.Close()
    End Try
End Sub
End Class

'此代码将表格中的所有主题名称显示在标签中.这可能会有帮助.

'This code display all subject name from the table into labels.This might be helped.

这篇关于如何在vb.net中检索mysql数据?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！