tooba1380
سه شنبه 22 فروردین 1385, 08:58 صبح
سلام
من کد زیر را نوشته ام که وقتی یک فیلد خالی باشد پیام نوشته شده اجراء در غیر اینصورت مراحل بعدی اجرا شود. بعد از نوشتن چند بار کار کرد ولی الان دستوران شرط خالی بودن فیلد را نمی شناسد بعبارت دیگر دستور if text0.value="" m را نمی شناسد m را همینطوری نوشته ام. لطفن کمک کنید.
If Text0 = "" Or Text2 = "" Then
MsgBox "وعده غذایی را انتخاب نمایید", vbInformation, "اخطار"
Else
DoCmd.OpenForm "food1", , , , , acHidden
DoCmd.OpenForm "T_food1", , , stLinkCriteria
End If
End Sub
من کد زیر را نوشته ام که وقتی یک فیلد خالی باشد پیام نوشته شده اجراء در غیر اینصورت مراحل بعدی اجرا شود. بعد از نوشتن چند بار کار کرد ولی الان دستوران شرط خالی بودن فیلد را نمی شناسد بعبارت دیگر دستور if text0.value="" m را نمی شناسد m را همینطوری نوشته ام. لطفن کمک کنید.
If Text0 = "" Or Text2 = "" Then
MsgBox "وعده غذایی را انتخاب نمایید", vbInformation, "اخطار"
Else
DoCmd.OpenForm "food1", , , , , acHidden
DoCmd.OpenForm "T_food1", , , stLinkCriteria
End If
End Sub