PDA

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



Evil Boy
26-02-2007, 21:12
من یک Combo Box دارم که سه تا گزینه داره (مثلا 1 و 2 و 3 ) و یک تکست باکس که مبلغ رو وارد می کنم حالا می خوام وقتی از کامبو باکس 2 انتخاب شد و مبلغ رو وارد کردم مثلا (2000) این مبلغ منفی ثبت بشه یعنی از کل حساب کم بشه
من خودم این کد رو نوشتم
لطفا مشکلش رو بگید


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

_H2_
27-02-2007, 11:51
سلام
عزیز جان اول باید نوع String را به Integer یا Long تبدیل کنی.
برنامه نویسان C چون این کار را C به صورت خودکار انجام نمیدهد همیشه حواسشون هست ولی برنامه نویسان VB به علت اینکه VB بیشتر اوقات لطف میکنه و این تبدیلات رو انجام میده در مواقع حساس که VB لطف نمیکنه ! دچار مشکل میشن.

برای تبدیل به Long از دستور CLng و برای تبدیل به Integer از CInt استفاده بکن.
مثلاَ


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

البته عادت کردن به تبدیل صریح توسط خودتون (مثل خط اول این کد که اگر هم تبدیل صریح نمی کردیم خود VB لطف میکرد و انجام میداد) بسیار عادت خوبیه و بد نیست بدانید که در VB8 میشه با فوق دستور Option Strict On اجبار در تبدیلات را فعال کرد و لطفهای VB را قطع کرد.!

Evil Boy
27-02-2007, 13:11
دوست عزیز من اصلا متوجه صحبتهای شما نشدم و فکر می کنم شما هم متوجه سوال من نشدید
من می خوام ببینم کد بالا مشکلش چیه
ممنون

_H2_
27-02-2007, 13:41
سلام مجدد


منظورم این بود:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

البته باید اعتراف کنم اشتباه میکردم.
چون حالا رفتم و امتحان کردن و دیدم که بازم VB6 بدون CLng هم خودش تبدیل ضمنی را درست انجام میدهد و منفی هم میکند. در نتیجه شما احتمالاَ در عبارت DataEnvironment1.rsCommand5!mablagh دچار مشکل هستید (رکوردست تان بازنیست یا نام فیلد را اشتباه تایپ کرده اید و...) مثلاَ این کد زیر را امتحان بکن ببین خطا میدهد یا نه؟
اگر خطا داد پس ایراد همین آخریست که گفتم.


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

Evil Boy
27-02-2007, 17:49
دوست عزیز من به عنوان مثال گفتم 1 و 2 و 3 . داخل Combo من اینا رو داره بدهکار - بستانکار و پرداخت شده . درحالت معمول با انتخاب بستانکار و زدن روی کلید ذخیره مبلغ وارد شده مثبت ثبت می شه . من می خوام با انتخاب بدهکار و زدن روی همون دکمه ذخیره مبلغ وارد شده منفی ثبت بشه
ممنون

_H2_
28-02-2007, 10:23
سلام مجدد
آقا من دیگه رسماَ کم اوردم! :biggrin:
بنظر می آید درست منظورتان را نگرفتم!
سه حالت داره:

1 - منظورتان اینکه کدی نوشته اید را اجرا میکنید ولی Vb خطا میدهد و برنامه تان را متوقف میکند
در این صورت کد قبلی را که دادم اجرا کنید و ببینید آیا همچنان خطا میدهد؟

2 - منظورتان این است که کدی که نوشته اید درست اجرا میشود ولی کاری را که انتظار دارید انجام نمیدهد.
در این صورت شاید (من از ساختار بانک اطلاعاتی شما مطلع نیستم) کد درست و مورد نظر شما کد زیر باشد که مبلغ جدید را از مجموع قبلی ها کم میکند


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

3 - هیچ کدام از دو منظور فوق را ندارید، که باید بگویم میبخشید مزاحم شدم، امید وارم کس دیگری کمکتان کند. :sad:

موفق باشید. :)

Evil Boy
28-02-2007, 12:26
دوست عزیز ممنون
منظورم دقیقا دومیه کد خودم کار می کنه ولی من می خوام از مجموع حساب کم بشه که نمی شه. کد شما رو هم تست کردم بازم کم نمیشه :sad:

a_mohammadi_m
06-03-2007, 13:00
با سلام
يك سوال آيا DE خودش تغييرات رو Update مي كنه يا شما بايد انجام بدي؟
فكر كنم شما بايد انجام بدي تا نتيجه محاسبه ثبت بشه

Evil Boy
06-03-2007, 17:28
مرسی عزیز مشکل همون update بود
ممنون

Saeed-a-s
06-03-2007, 20:31
سلام
یه سوال دارم دمتون گرم اگه بلدیدخیلی زود جواب بدید کارم لنگه
سوالم اینه که چطور میتوانم یه برنامه بنویسم که تعداد زیادی برف روی فرم بباره وهر برف وقتی به ته فرم میرسه بروی فرم بنشینه دقت کنید هرچیزیه که در مسیر برف باشه برف روی آن بنشید وتعداد برفها تا وقتی که فرم بسته نشده بباره

Oracle_Eldorado
07-03-2007, 14:04
منم متوجه سوال نشدم !
یکمی واضح تر بگی ممنونت میشم

LOVEMT
16-03-2007, 01:38
من هم با این دوستمون موافقم
کمی توظیح بده