ورود

View Full Version : سوال: نمایش اطلاعات textbox بصورت عمودی در active report


mehdi3559
سه شنبه 23 خرداد 1391, 11:50 صبح
سلام دوستان من در مورد label با تغییر angle تونستم متن رو عمودی کنم ولی text box رو نمی تونم لطفا راهنمایی کنید. ممنون
mehdi3559
سه شنبه 23 خرداد 1391, 12:12 عصر
اساتید محترم جواب بدین گیرم
محسن واژدی
سه شنبه 23 خرداد 1391, 16:40 عصر
سلام
کد زیر را بررسی کنید:

Private Sub Command1_Click()
Dim txt
Text1.Alignment = vbCenter
For i = 1 To Len(Text1)
txt = txt & Mid$(Text1, i, 1) & vbCrLf
Next i
Text1.Text = txt
End Sub البته قبلش text-box را multiline کنید

موفق باشید