Please Send The Between Query of .net

Submitted by nagappan on
Private Sub monyviewbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles monyviewbtn.Click Dim con As OleDb.OleDbConnection = connection() Dim a, b, c, d a = pitntb.Text b = nitntb.Text c = petntb.Text d = netntb.Text comm = "SELECT sum(Irs) from Income WHERE Itranno '" & a & "' BETWEEN '" & b & "'" comm1 = "SELECT sum(Ers) from Expense WHERE Etranno '" & c & "' BETWEEN '" & d & "'" com = New OleDbCommand(comm, con) com1 = New OleDbCommand(comm1, con) con.Open() titb.Text = com.ExecuteNonQuery() tetb.Text = com1.ExecuteNonQuery() ptb.Text = titb.Text - tetb.Text End Sub End Class i did this but i have no output because we put more and more solution but i have no get correct answer please send the solution to my e-mail :[email protected]