بسم الله
اريد عمل داله تعود ب boolean
انا عملتها لكن اول ما اضغط انتر يعطلا خطأ
public function mm()as boolean
'some code if expression return true else reutn false end if end function
شكرا
بسم الله
اريد عمل داله تعود ب boolean
انا عملتها لكن اول ما اضغط انتر يعطلا خطأ
public function mm()as boolean
'some code if expression return true else reutn false end if end function
شكرا
![]()
قم برسم كوماند 2 على الفورم وضع هذا الاجراء في التعريف العام أو مديول
public function Xreturn(return As Boolean) Form1.Command1.Enabled = return Form1.Command2.Enabled = Not return end sub
وفي حدث التحميل للفورم .. ضع هذه الشفرة
Private Sub Form_Load() call Xreturn(True) End Sub
وجرب العكس .. ولاحظ التغيير B)
تم تعديل هذه المشاركة بواسطة HnHn في 14 أكتوبر 2006 في 02:23
هذا الموضوع مغلق.