ايران ويج

نسخه‌ي كامل: يك سئوال در مورد ويژوال بيسيك 6
شما هم اكنون متن قالب بندي نشده را مي‌بينيد.مشاهده‌ي نسخه‌ي اصلي
مي خواهم برنامه اي بنويسم كه اعداد غير صفر يك عدد را نمايش دهد. هر موقع كه اين برنامه را نوشته ام در يك حلقه بي نهايت مي افتد!/؟
بیشتر توضیح بده !
اگر منظورت تابعیه که مثلا با ورودی 85001201 خروجی 85121 رو بده می تونی از کد زیر استفاده کنی:

msgbox Replace(Str(85001201),"0",Empty)   <Code


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