vb.net count distinct row in sql and store it in INT variable

Question

i need to count the distinct row in sql database and after that the result will be stored in Int variable

for example count the distinct row(SalesID) in tblSales(table) and store it in NUM(int variable) .

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

Have you tried anything? Please provide what you have tried. — th1rdey3
– th1rdey3, Commented Oct 30, 2013 at 6:38
i tried this one 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 — Paolo Herrera Babas
– Paolo Herrera Babas, Commented Oct 30, 2013 at 6:47
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 — Paolo Herrera Babas
– Paolo Herrera Babas, Commented Oct 30, 2013 at 6:47

th1rdey3 · Accepted Answer · 2013-10-30 07:01:30Z

3

you could try something like this

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

answered Oct 30, 2013 at 7:01

th1rdey3

4,4588 gold badges37 silver badges69 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Sathish Over a year ago

@PaoloHerreraBabas. Its Correct then tick it. Because it use for future reference

Collectives™ on Stack Overflow

vb.net count distinct row in sql and store it in INT variable

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related