vb.net計數不同行中的SQL，並將其存儲在變量INT

我需要計數SQL數據庫和之後的不同行，其結果將被存儲在int變量vb.net計數不同行中的SQL，並將其存儲在變量INT

例如計數不同行（SalesID）在tblSales（表）中，並將其存儲在NUM（int變量）中。

TIA :)

Public Function ExecuteQuery(ByVal query As String) As DataTable 
     Try 
      Dim cn As New SqlConnection(con) 
      Dim da As New SqlDataAdapter(query, cn) 
      Dim cb As New SqlCommandBuilder(da) 
      Dim dt As New DataTable 
      da.Fill(dt) 

      Return dt 
     Catch ex As Exception 
      MessageBox.Show(ex.Message) 
      Return Nothing 
     End Try 
    End Function 

    Private Sub btnFinish_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFinish.Click 
     dim count as string = "select distinct count(SalesID) from tblSales" 
     ExecuteQuery(count) 
     dim Num as Integer = Int32.Parse(Val(count)) 
    End Sub

來源

2013-10-30 Paolo Herrera Babas

你嘗試過什麼？請提供你已經嘗試過的。 – th1rdey3

我試圖「從tblSales選擇重複計數（SalesID）」的executeQuery這一個私人小組btnFinish_Click（BYVAL發件人爲System.Object的，BYVALË作爲System.EventArgs）把手btnFinish.Click 暗淡計數爲字符串=（計數）昏暗貨號爲整數= Int32.Parse（纈氨酸（計數））結束子 –

公共功能的executeQuery（BYVAL查詢作爲字符串）作爲數據表嘗試昏暗CN作爲新的SqlConnection（CON）昏暗噠作爲新的SqlDataAdapter（查詢，cn） Dim cb As New SqlCommandBuilder（da） Dim dt As New DataTable da.Fill（dt）返回DT 抓住EX作爲例外 MessageBox.Show（ex.Message）返回任何結果結束Try 端功能 –

你可以嘗試這樣的事情

Dim num As Integer 
Dim sql As String 
sql = "select count(distinct SalesID) from tblSales" 
Using con As New SqlConnection(connStr) 
    Using com As New SqlCommand(sql, con) 
     con.Open() 
     num = Convert.ToInt32(com.ExecuteScalar()) 
    End Using 
End Using

來源

2013-10-30 07:01:30 th1rdey3

好的，謝謝你，先生，我會嘗試 –

謝謝你再次，先生...其工作:) –

@PaoloHerreraBabas。它的正確然後勾選它。因爲它用於未來的參考 – Sathish

vb.net計數不同行中的SQL，並將其存儲在變量INT

回答

相關問題