مساعد في تحويل متغير من رقمي الى نصي في الكود

[ازهر عبد العزيز]

السلام عليكم ,,,,,,,,

اذا كان الحقل virusid في الكود نصي وليس رقمي  فكيف ستكون كتابة المعادلة

Dim X As Integer
X = DCount("[virusid]", "[TBvirus]", "[virusid]=" & Me.idvirus & " AND [idlaboratory]=Forms![Flaboratory]![idlaboratory]")
If X > 0 Then
MsgBox "error87", 48, "error"
DoCmd.CancelEvent
End If

 

[jjafferr]

وعليكم السلام 🙂

Dim X As Integer
X = DCount("*", "[TBvirus]", "[virusid]='" & Me.idvirus & "' AND [idlaboratory]=Forms![Flaboratory]![idlaboratory]")
If X > 0 Then
MsgBox "error87", 48, "error"
DoCmd.CancelEvent
End If

 

جعفر

[ازهر عبد العزيز]

شكرا جزيلا استاذي المبدع @jjafferr  وهو المطلوب جزاك الله عني كل خير