Dim dt As New DataTable
With dt
.Columns.Add("Itemname")
.Columns.Add("Quantity")
.Columns.Add("Price")
.Columns.Add("Total")
End With
For Each dr As DataGridViewRow In Me.DataGridView1.Rows
dt.Rows.Add(dr.Cells("Itemname").Value, dr.Cells("Quantity").Value, dr.Cells("Price").Value, dr.Cells("Total").Value)
Next
Dim rptdoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
rptdoc = New ordersprint
rptdoc.SetDataSource(dt)
有人可以帮我这个吗?这是我在datagridview中打印数据的代码吗?
答案 0 :(得分:0)
当您的VB.net无法连接到数据库本身时,无法加载数据库。查询执行稍后会执行。检查连接字符串是否正确,MySQL db是否能够侦听来自localhost外部的连接请求。