菜鸟求助：如何知道SELECT 的数据行数

求好心人给指点下，最好写清楚写，本人是小菜菜：先看看前面写的对不对，不对请详细写明，还有想知道STRSQL取出的数据多少行，怎么弄？请代码写清楚些，本人非常感谢
       Dim objConn As New Data.SqlClient.SqlConnection
        objConn.ConnectionString = "Data Source=HA\sqlexpress;Initial Catalog=数据库;Integrated Security=True"
        objConn.Open()

        Dim objCmd As New Data.SqlClient.SqlCommand
        Dim strsql As String

        strsql = "select * from 设备总表 where 行名称='" + Session("depart") + "'"

--------------------编程问答-------------------- ExecuteScale() --------------------编程问答-------------------- DataSet.Tables(0).Rows.Count

或者是
SQLStr="Select Count(*) From ..."

SQLCommand.ExecuteScalar'此处返回的就是SQL里的Count(*)值。 --------------------编程问答-------------------- ....同上 --------------------编程问答--------------------   Dim str As String = "select count(*) from autos"
        Dim m As Integer
        Dim cmd As New SqlClient.SqlCommand(str, ConnSta)
        Try
            m = cmd.ExecuteScalar()
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try

        Me.Button2.Text = m --------------------编程问答--------------------



  Dim objConn As New Data.SqlClient.SqlConnection

  objConn.ConnectionString = "Data Source=HA\sqlexpress;Initial Catalog=数据库;Integrated Security=True"

  objConn.Open()    

  Dim strsql As String

  strsql = "select * from 设备总表 where 行名称='" + Session("depart") + "'"

  Dim objDa As Data.SqlClient.SqlDataAdapter

  objDa=new Data.SqlClient.SqlDataAdapter(strsql,objConn)

  dim Dt as new  Dataset

  objDa.Fill(Dt)

  objConn.Close

  Dt.Tables(0).Rows.Count  '即為Select結果的行數

--------------------编程问答-------------------- 同意全楼上 --------------------编程问答-------------------- 支持~~ --------------------编程问答-------------------- 就用dataset.table.rows.count --------------------编程问答-------------------- 这个最好用 Dt.Tables(0).Rows.Count
一直在用这个。 --------------------编程问答-------------------- 321 --------------------编程问答-------------------- 其实 DataAdapter.Fill（）就可以返回成功的行数，借用一下5楼的代码，



Dim objConn As New Data.SqlClient.SqlConnection

objConn.ConnectionString = "Data Source=HA\sqlexpress;Initial Catalog=数据库;Integrated Security=True"    

objConn.Open()        

Dim strsql As String

Dim n As integer    

strsql = "select * from 设备总表 where 行名称='" + Session("depart") + "'"    

Dim objDa As Data.SqlClient.SqlDataAdapter    

objDa=new Data.SqlClient.SqlDataAdapter(strsql,objConn)    

dim Dt as new  Dataset    

n=objDa.Fill(Dt,"Table0")   '执行sql语句获取数据填充至数据集DataSet Dt中的Table0表中，并返回成功的行数。 

objConn.Close

--------------------编程问答--------------------

引用 2 楼 robake 的回复:

DataSet.Tables(0).Rows.Count

或者是
SQLStr="Select Count(*) From ..."

SQLCommand.ExecuteScalar'此处返回的就是SQL里的Count(*)值。

同意

补充：.NET技术 ,  VB.NET