19-10-15, 11:41 PM
(آخر تعديل لهذه المشاركة : 19-10-15, 11:44 PM {2} بواسطة Ahmed_Mansoor.)
أهلا بك أخي الكريم ، إستخدم هذه الطريقة :
كود :
RS.Open "Select SUM(Salary) As Total From TBsalary Where SalDat >=#" & Text1.Text & "# And SalDate <=#" & Text2.Text & "#"
IF RS.RecordCount > 0 Then
Text3.Text = RS![Total]
Else
Text3.Text = "0"
End IF