اطلاعاتی در مورد midو مثال آن:
[quote]کلمه "alireza" را در نظر بگیرید
اگر بخواهیم مثلا کلمه "ali" را از رشته در آورده و نمایش بدهیم ازتابع mid استفاده می کنیم:
msgbox(mid("alireza", 1, 3))
شکل کلی تابع mid :
mid(target,start,length)
target رشته اصلی است
start محل شروع رشته حاصل جواب
length طول رشته حاصل جواب
مثال:
برنامه زیر یک رشته را گرفته و معکوس آن را محاسبه می کند
Dim s As String = InputBox("insert", "get") '1
Dim srev As String = "" '2
For i As Integer = s.Length To 1 Step -1 '3
srev += Mid(s, i, 1) '4
Next '5
MsgBox(srev) '6
نمی دونم کجاش مبهمه
شایدم مثالش رو نفهمیدی:
1: توسط Inputbox یک رشته از کاربر می گیرد و در متغیر S ذخیره می کند
2:یک متغیر از نوع متنی می سازیم تا متن معکوس شده خود را درون این متغیر ذخیره کنیم
3:حلقه تکراری رو شروع می کنیم که شروعش تعداد کاراکتر متن وارد شده توسط کاربر است
و پایانش 1
حالا فرض کن کاربر کلمه "Ali" رو وارد کرده
طول متن "ali" سه کاراکتره در نتیجه I از 3 شروع میشه و به 1 ختم میشه(Step -1 بدین معنی است که بعد از رسیدن به Next از I یکی کم شود)
حالا وارد حلقه شدیم و مقادیر زیر را داریم: