ورود

View Full Version : گرفتن حرف در textbox


handvbnet
چهارشنبه 01 خرداد 1387, 21:02 عصر
سلام . می خوام در textbox مثلا حرف پنجم را بگیرم و آن را به صورت Messagebox نشون بدم .

کسی می دونه چه جوریه؟
DoctorJay
چهارشنبه 01 خرداد 1387, 21:33 عصر
یه teXt داریم یه Command , توی Command اینو بنویس :


MsgBox Mid(Text1.Text, 5, 1)
H4i0 ACP
پنج شنبه 02 خرداد 1387, 12:05 عصر
سلام
درست ترین روش همونیه که DoctorJay (http://barnamenevis.org/forum/member.php?u=44525) گفتن .
اینم یه روش دیگه :
یه Command و یه Text رو فرم بذارید و بعد کد زیر رو وارد کنید :


Private Sub Command1_Click()
Text1.SelStart = 4
Text1.SelLength = 1
Text1.SetFocus
MsgBox Text1.SelText
End Sub