نوشتن عبارت "وجود ندارد" در كليه ركوردهاي خالي

[ehsansharif]

با سلام
فرم برنامه من شامل يك دكمه است كه مي خواهم با كليك بر روي آن كليه ي فيلدهاي خالي ركوردهاي موجود در جدول مربوطه با عبارت " موجود نيست " پر شوند .
با تشكر

[smderfan]

سلام شما بايستي نام هر تكس باكس رو مساوي عبارت " موجود نيست " قرار بديد.

Textn=" موجود نيست "

[alirezabahrami]

با سلام
فرم برنامه من شامل يك دكمه است كه مي خواهم با كليك بر روي آن كليه ي فيلدهاي خالي ركوردهاي موجود در جدول مربوطه با عبارت " موجود نيست " پر شوند .
با تشكر
سلام
با فرض اينكه در فرم شما دو فيلد (تكست باكس) با نام هاي text1 و text2 وجود دارد در رخداد كليك كمند باتن كد زير را وارد كن !



If IsNull(text1) Then
"موجود نيست"=text1
End If
If IsNull(Text2) Then
"موجود نيست"=text2
End If

موفق باشيد

[Ali_Fallah]

یه راه دیگه هم وجود داره که به نظر من جالبه و ...

Private Sub Form_Load()
Me.Text1.Format = _
"@[Black]; " & _
"خالی است[Blue]"

End Sub

در اینصورت موقعی که فرم لود شد تمامی فیلدهایی که خالی باشند در داخل آنها جمله خالی است به رنگ آبی نمایش داده میشه
برای همه تکست ها باید این کد نوشته بشه...