[alfaiz678]

السلام عليكم

هذا استعلام عن اخر قيمة سجلت للعميل في جدول المبيعات

عند تطبيق الاستعلام ولم تكن للعميل الذي بعد جملة where  اية عملية في جدول المبيعات يظهر خطأ في البرنامج

واذا كانت له عملية يطبق الكود تماما

الاستفسار هل هناك دالة او غيرها ترجع بقيمة احددها صفر مثلا اذا لم تكن للعميل الذي بعد جملة wher عملية

الاستعلام

كود :

Dim rbhsnf As New OleDbCommand ' rbhsnf
           rbhsnf.CommandType = CommandType.Text
           rbhsnf.Connection = conne
           rbhsnf.CommandText = "select last (JBeaMndoobN) from [JBea] where JBeaMndoobName like '" & CMndoobName.Text & "'"
           conne.Open()
           '   rbhsnf.ExecuteScalar()
           Dim rbhsnf0 As Double
           If rbhsnf.ExecuteScalar.GetHashCode Then
               rbhsnf0 = rbhsnf.ExecuteScalar
           Else
               rbhsnf0 = 0
           End If
           conne.Close()