دستور MID در بسکام

[newdesign]

Dim S As String * 15 , Z As String * 15
S = "ABCDEFG"
Z = Mid(s , 2 , 3)
Print Z 'BCD
Z = "12345"
Mid(s , 2 , 2) = Z
Print S 'A12DEFG
End
این مثال خود بسکام برای دستور mid است که چنذ روزه ما رو سر کار گذاشته
نتیجش این شکلی که اصلا جور در نمیاد لطفا راهنمایی کنید
BCDEFG
A12DEFG
تو خط اول باید bcd چاپ بشه که نمیشه

[ha_60]

شما با چی اینو امتحان کردی؟
proteus ؟
کمپایلری که استفاده می کنی مشکلی نداره؟

[newdesign]

سلام با خود بسکام ای وی ار 1.11.8.3

[ha_60]

من زیاد بسکام کار نمی کنم ولی به نظر درست می یاد
شاید مشکل از نسخه کرک شده بسکام باشه شما با یه بسکام دیگه (یه ورژن دیگه) رو یه سیستم دیگه امتحان کن

[newdesign]

یکی از دوستان لطف کنه و این کد رو با یسکام خودش امتحان کنه و نتیجه رو بگه

[newdesign]

سلام
مشکل با آپ دیت بسکام که دوست عزیزمون eng_hamedani راهنمایی کردن حل شد حالا ایا میشه تو بسکام به صورت ارایه ای به رشته ها نگاه کرد مثلا
c=s[20]