سوال: اشکال در setfocus [بایگانی]

parsaazizi

سه شنبه 22 مهر 1399, 11:29 صبح

با سلام من می خواهم بعد اینکه پیغام خطا داد برگرده به همون text0 ولی دستور setfocus اجرا نمی کنه
به عنوان مثال اگر من عددی بزرگتر از 15 وارد کردم بعد از دادن اینکه عدد وارد شده اشتباه است مکان نما برگرده به همون تکس عدد
لطفا کمکم کنید:افسرده:

eb_1345

سه شنبه 22 مهر 1399, 12:10 عصر

با سلام من می خواهم بعد اینکه پیغام خطا داد برگرده به همون text0 ولی دستور setfocus اجرا نمی کنه
به عنوان مثال اگر من عددی بزرگتر از 15 وارد کردم بعد از دادن اینکه عدد وارد شده اشتباه است مکان نما برگرده به همون تکس عدد
لطفا کمکم کنید:افسرده:
سلام
صدور خطا بخاطر استفاده از تابع MsgBoxFa که این تابع در قسمت ماژول ها موجود نیست. بجای MsgBoxFa از MsgBox استفاده کن بببین خطا صادر میشود!

narpco

سه شنبه 22 مهر 1399, 12:49 عصر

فک کنم این لینکش هست که ماژول رو داره
http://www.developercenter.ir/forum/showthread.php?t=11435&

البته برای وی بی نوشته شده

parsaazizi

سه شنبه 22 مهر 1399, 13:10 عصر

سلام
صدور خطا بخاطر استفاده از تابع MsgBoxFa که این تابع در قسمت ماژول ها موجود نیست. بجای MsgBoxFa از MsgBox استفاده کن بببین خطا صادر میشود!

مشکل erorr حل می شود ولی متاسفانه setfocus باز هم عمل نمی کنه به تکس بعدی می رود

parsaazizi

سه شنبه 22 مهر 1399, 13:14 عصر

مشکلم در استفاده از setfocus است كه نمي خواهم بعد از پيغام به تكس بعدي بره روي همون تكس باقي بمونه و جهت اصلاح

eb_1345

سه شنبه 22 مهر 1399, 14:27 عصر

مشکلم در استفاده از setfocus است كه نمي خواهم بعد از پيغام به تكس بعدي بره روي همون تكس باقي بمونه و جهت اصلاح

قبل از فوکوس بر روی تکست باکس فوق باید بر روی تکست باکس دیگر فوکوس شود
مثلاً ا اینجوری :

Text1.SetFocus
Text0.SetFocus

Mehr@ban

سه شنبه 22 مهر 1399, 16:11 عصر

سلام
به نظر بنده رویداد رو اشتباه انتخاب کردین
این رو امتحان کنید

Private Sub Text0_BeforeUpdate(Cancel As Integer)
If Text0 < 14 Then
MsgBox ("Error!")
Cancel = True
End If
End Sub

padide55

چهارشنبه 23 مهر 1399, 08:19 صبح

قبل از فوکوس بر روی تکست باکس فوق باید بر روی تکست باکس دیگر فوکوس شود
مثلاً ا اینجوری :

Text1.SetFocus
Text0.SetFocus

با این روش مشکل حل شد؟

ضمنا من غالبا از msgbox استفاده نمیکنم .فایل نمونه رو ملاحظه بفرمایید.

parsaazizi

چهارشنبه 23 مهر 1399, 09:39 صبح

:تشویق::تشویق:ای ول ممنون کارتون درست ... ممنون از کمکت خیلی لطف کردی . کمک بزرگی بود

parsaazizi

چهارشنبه 23 مهر 1399, 09:40 صبح

با این روش مشکل حل شد؟

ضمنا من غالبا از msgbox استفاده نمیکنم .فایل نمونه رو ملاحظه بفرمایید.
:تشویق::تشویق:ای ول ممنون کارتون درست ... ممنون از کمکت خیلی لطف کردی . کمک بزرگی بود

eb_1345

چهارشنبه 23 مهر 1399, 09:56 صبح

:تشویق::تشویق:ای ول ممنون کارتون درست ... ممنون از کمکت خیلی لطف کردی . کمک بزرگی بود

قبل از فوکوس بر روی تکست باکس فوق باید بر روی تکست باکس دیگر فوکوس شود
مثلاً ا اینجوری :

Text1.SetFocus
Text0.SetFocus

مگر اینجوری به نتیجه نرسیدی ؟

parsaazizi

چهارشنبه 23 مهر 1399, 14:11 عصر

مگر اینجوری به نتیجه نرسیدی ؟
نه نتونستم نتیجه بگیرم

eb_1345

چهارشنبه 23 مهر 1399, 14:33 عصر

با سلام من می خواهم بعد اینکه پیغام خطا داد برگرده به همون text0 ولی دستور setfocus اجرا نمی کنه
به عنوان مثال اگر من عددی بزرگتر از 15 وارد کردم بعد از دادن اینکه عدد وارد شده اشتباه است مکان نما برگرده به همون تکس عدد
لطفا کمکم کنید:افسرده:

سلام
صدور خطا بخاطر استفاده از تابع MsgBoxFa که این تابع در قسمت ماژول ها موجود نیست. بجای MsgBoxFa از MsgBox استفاده کن بببین خطا صادر میشود!

مشکل erorr حل می شود ولی متاسفانه setfocus باز هم عمل نمی کنه به تکس بعدی می رود

مشکلم در استفاده از setfocus است كه نمي خواهم بعد از پيغام به تكس بعدي بره روي همون تكس باقي بمونه و جهت اصلاح

قبل از فوکوس بر روی تکست باکس فوق باید بر روی تکست باکس دیگر فوکوس شود
مثلاً ا اینجوری :

Text1.SetFocus
Text0.SetFocus

مگر اینجوری به نتیجه نرسیدی ؟

نه نتونستم نتیجه بگیرم
پست های قبلی خودتون رو مرور بفرمائید !
شما در پست های قبل به نوعی عنوان کرده ای که در استفاده از MsgBoxFa یا MsgBox مشکل نداری چطوری میفرمائید به نتیجه نرسیدی !

padide55

چهارشنبه 23 مهر 1399, 16:18 عصر

سلام خدمت جناب eb1345

شاید طرح کننده سوال متوجه نبودند که یک‌مقدار هم کد رو اصلاح کنند
text1 نداشتند.
فقط text0 و text2
بود

من هم هنگام اصلاح فایلشون متوجه شدم .
والا روش همون چیزی بود که شما فرمودید