[السيد الجوهري]

   

---

كود :

If TXT_F.Text < 0 Then
           Label6.Text = "دائن"

       End If

       If TXT_F.Text > 0 Then
           Label6.Text = "مدين"
       End If
       If TXT_F.Text = 0 Then
           Label6.Text = "-----"
       End If

شكرا جزيلا
تم الحل