Datagridview不起作用! [英] Datagridview doesn't work!
本文介绍了Datagridview不起作用!的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我编写了以下代码以在datagridview中显示记录.但它不起作用&它什么也没显示!
您能检查一下我的代码吗?告诉我我在哪里犯错了?请加上示例,因为我只是一个初学者.
Hi,
I have written following codes to show records in a datagridview. But it doesnt work & it shows nothing!
Would you please check my code & tell me where did I make mistake? Please add example with your answer because I am just a beginner.
Imports System.Data.SqlClient
Public Class Form34
Private Const ConnectionString As String = "Server=.\SQLEXPRESS;" & _
"Database=SUIMT;Trusted_Connection=True"
Public Function GetData() As DataTable
Dim SelectQry = "Select row_num, stu_id, tot_amou, paid, du, aoins, due, dt From monthly_instal where stu_id = '" & cmbdmiidn.Text & "' AND dt = '" & cmbdmidt.Text & "'"
Dim connection As New SqlConnection(ConnectionString)
Dim returnData As New DataTable("monthly_instal")
Try
connection.Open()
Dim command As New SqlCommand(SelectQry, connection)
Dim adapter = New SqlDataAdapter(command)
adapter.Fill(returnData)
con.Close()
Catch ex As Exception
returnData = Nothing
If connection.State = ConnectionState.Open Then
connection.Close()
End If
End Try
Return returnData
End Function
Private Sub cmbdmidt_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbdmidt.Leave
dg1.DataSource = Nothing
dg1.DataSource = GetData()
End Sub
推荐答案
也将此添加到您的代码中
Add this too to your code
dg1.DataBind()
Private Sub cmbdmidt_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbdmidt.Leave
dg1.DataSource = Nothing
dg1.DataSource = GetData()
dg1.DataBind()
End Sub
或使用
or use
Private Sub cmbdmidt_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmbdmidt.Leave
dg1.DataSource = Nothing
dg1.DataSource = GetData()
dg1.DataMember="tablename"
End Sub
Hoping this will help you :)
dg1.DataSource = Nothing
dg1.DataSource = GetData()
dg1.dataBind()
这篇关于Datagridview不起作用!的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文