اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

الخبراء الافاضل بعد التحية

اريد المساعدة في قاعدة if  

  تعمل جيد     Me. Jo = 0 then

Mocmd. Openrepor

ولكن اريد كتابة هذة القاعدة ب 00

Me. Jo = 00 then

تلقائيا تصبح صفر واحد

كتبتها

 

Me. Jo = ""00"" then

 Docmd. Openforn

تم قبولها ولكن ينفذ الأول ويفتح التقرير بدل من النموذج 

ماذا أفعل لكم الشكر

قام بنشر

مرحبا Jo 🙂

 

اذا اردت كتابة الكود في مشاركتك:

 

1. اختار هذه الاشارة من القائمة :

00.Code_01.jpg.43afe192779749c92d593eedc13cfd57.jpg

.

2. ضع الكود في هذه النافذة ، هكذا

00.Code_02.jpg.ca94050ca382a92c12b55f39e73f7586.jpg

 

جعفر

قام بنشر

سؤال

هل me.Jo نص او رقم ؟

اذا كان رقم ، فالارقام 0 او 00000000000 ، كلها تساوي صفر (الاكسس ذكي ويعرف هاي 🙂 ) ،

اما اذا كان نص ، فيكفي ان تقول

me.Jo="00"

.

واذا اختلط الامر علينا ، رجاء تشرح لنا اكثر ، مع بعض البيانات لوسمحت 🙂

 

جعفر

قام بنشر

استاذى الفاضل جعفر 

شكرا لاهتمامك 

 Jo مربع نص غير منضم 

ماذا افعل

قام بنشر

هممم

اذن يمكنك استعماله لأي نوع شئت ، ولكن يجب ان تجعله يعرف ما يجب عمله !!

قد تحتاج الى اخبار الكود انك تريد Jo يكون نص ، هكذا :

cstr(me.Jo) ="00"

ولكن محتاجين معلومات اكثر لوسمحت 🙂

قام بنشر (معدل)

استاذى ومعلمى جعفر

كتبت في حدث بعد التحديث لمربع النص الغير منضم  jo

If jo= 0 THEN
OPNEREPORT
ELSEIF CStr( me. Jo) ="00"
Openforms
Endif

لكن الكود لا يعمل غير فى الجزء الاول مع 0 واحد 

ولايعمل مع 00

ارجو تصحيح الكود لو تكرمت علي تلميذك

تم تعديل بواسطه jo_2010
قام بنشر

CStr :

C = Convert ، اي حول الى

Str = String ، اي نص 

 

عليه ، اليك بقية اخوات الامر هذا

Function	Return Type	Range for expression argument
CBool:	Boolean	Any valid string or numeric expression.
CByte:	Byte	0 to 255.
CCur:	Currency	-922,337,203,685,477.5808 to 922,337,203,685,477.5807.
CDate:	Date	Any valid date expression.
CDbl:	Double	-1.79769313486231E308 to -4.94065645841247E-324 for negative values; 4.94065645841247E-324 to 1.79769313486232E308 for positive values.
CDec:	Decimal	+/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. The smallest possible non-zero number is 0.0000000000000000000000000001.
CInt:	Integer	-32,768 to 32,767; fractions are rounded.
CLng:	Long	-2,147,483,648 to 2,147,483,647; fractions are rounded.
CLngLng: LongLong	-9,223,372,036,854,775,808 to 9,223,372,036,854,775,807; fractions are rounded. (Valid on 64-bit platforms only.)
CLngPtr: LongPtr	-2,147,483,648 to 2,147,483,647 on 32-bit systems, -9,223,372,036,854,775,808 to 9,223,372,036,854,775,807 on 64-bit systems; fractions are rounded for 32-bit and 64-bit systems.
CSng:	Single	-3.402823E38 to -1.401298E-45 for negative values; 1.401298E-45 to 3.402823E38 for positive values.
CStr:	String	Returns for CStr depend on the expression argument.
CVar:	Variant	Same range as Double for numerics. Same range as String for non-numerics.

.

فأي نوع من انواع الارقام تريد 🙂

 

جعفر

قام بنشر

معلمى الفاضل جعفر

اين اذهب فى علم حضرتك الغزير  اكيدA.accdb مفهمتش حاجة انا علمى بالاكسيس ليس بالكافى اليك نموذج مصغر للتعديل علية

Untitled.jpg

  • أفضل إجابة
قام بنشر

تفضل

Private Sub JO_AfterUpdate()

    If Me.JO = "0" Then
        Me.nNAME = "ahmed"
        Me.fNAME = "ali"

    ElseIf Me.JO = "00" Then
        Me.nNAME = "khaled"
        Me.fNAME = "hassan"
    
    End If

End Sub

 

جعفر

  • Like 1
قام بنشر

ومادام ال 00 عاملالك مشكلة خليها 11 ولا 22 ولا 33 مش هتفرق معاك 😅

  • Like 1
  • Haha 2
قام بنشر

الخبير الفاضل جعفر

خالص الشكر فى حل مشكلة عويصة بالنسبة لى بسيطة بالنسبة لك دام الله علمك لمساعدة تلاميذك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information