جعل زر امر غير نشط

أخي الكريم

بفرض اسم الزر هو Button1

ضع في حدث عند الفتح للنموذج هذا الكود :

Button1.enable = me.Recordset.recordcount > 0

شكرا للاخ مهند على الرد و جعله الله في ميزان حسناتك

وإيضاً هاك طريقة أخرى باستخدام الحدث If

IF Me.Recordset.recordcount > 0 Then

Me.Button1.Enabled = True

End IF

Me.Button1 = False

End Sub

هذا إذا كنت ترغب به أن يكون ظاهراً أما إذا رغبت به مخفي فكل ما عليك أن تضع بدل Enabled Visible

IF Me.Recordset.recordcount > 0 Then
Me.Button1.Enabled = True
End IF
Me.Button1 = False
End Sub

هناك غلط في الكود السابق , يتعدل إلى :

IF Me.Recordset.recordcount > 0 Then
Me.Button1.Enabled = True
ElseIF
Me.Button1 = False
End Sub

وهي ان السطر الثالث يكون ElseIf وليس End If