怎样在TextBox显示sqlStr = "select 工作状态,count(*) as 数目 from 安排信息表 的统计信息

来源:百度知道 编辑:UC知道 时间:2024/09/24 22:58:32
工作状态有:新建、更新、废除、已完成、未完成
现在要求分别统计出来,然后分别在几个TextBox.text显示出来。但下面运行出现这样的错误:[b]在位置0处没有行[/b]

解决了问题再追加100分,谢谢
Dim sqlStr As String

conn.Open()
sqlStr = "select 工作状态,count(*) as 数目 from 安排信息表"

sqlStr += " where 起始日期>='" & dtpStart.Value & "' and 结束日期<='" & dtpEnd.Value & "'" & " group by 工作状态"

Dim DtAdpt As New SqlDataAdapter(sqlStr, conn)

Dim Ds As New DataSet
DtAdpt.Fill(Ds)

txtNew.Text = Ds.Tables(0).Rows(0).Item(0)
txtUpdate.Text= Ds.Tables(0).Rows(0).Item(1)
............
............
............

conn.Close()

工作状态有:新建、更新、废除、已完成、未完成
现在要求分别统计出来,然后分别在几个TextBox.text显示出来。但下面运行出现这样的错误:[b]在位置0处没有行[/b]

解决了问题再追加100分,谢谢
Dim sqlStr As String

conn.Open()
sqlStr = "select 工作状态,count(*) as 数目 from 安排信息表"

sqlStr += " where 起始日期>='" & dtpStart.Value & "' and 结束日期<='" & dtpEnd.Value & "'" & " group by 工作状态"

Dim DtAdpt As New SqlDataAdapter(sqlStr, conn)

Dim Ds As New DataSet
DtAdpt.Fill(Ds)

txtNew.Text = Ds.Tables(0).Rows(0).Item(0)
txtUpdate.Text= Ds.Tables(0).Rows(0).Item(1)