PDA

View Full Version : سوال: سوال مبتدی textbox در vb6



divani
یک شنبه 19 اردیبهشت 1389, 15:41 عصر
با سلام

میخوام در تکست باکس به طور مداوم یک حرف نوشته شود
مثلا دکمه حرف T رو در تکست باکس میگیریم و یکسره نوشته میشود من میخواهم همانطور باشد دوستان لطفا با کد راهنمایی کنید.
ممنون

md_bluelily
یک شنبه 19 اردیبهشت 1389, 16:13 عصر
اینکار رو با یک حقله به راحتی میتونید انجام بدید.
یک حلقه بی پایان بنویسید و مدام Property با نام Text کنترل TextBox رو به مقدار قبلی خودش و حرف T اضافه کنید.

موفق باشید.

divani
یک شنبه 19 اردیبهشت 1389, 16:27 عصر
اینکار رو با یک حقله به راحتی میتونید انجام بدید.
یک حلقه بی پایان بنویسید و مدام Property با نام Text کنترل TextBox رو به مقدار قبلی خودش و حرف T اضافه کنید.

موفق باشید.
دوست عزیز من مبتدی هستم اگه میشه با یک کد راهنمایی کن .ممنون

kooroush
یک شنبه 19 اردیبهشت 1389, 19:14 عصر
سوالتون یکم بیشتر توضیح بدین !

rezaricky
یک شنبه 19 اردیبهشت 1389, 23:29 عصر
با سلام

میخوام در تکست باکس به طور مداوم یک حرف نوشته شود
مثلا دکمه حرف T رو در تکست باکس میگیریم و یکسره نوشته میشود من میخواهم همانطور باشد دوستان لطفا با کد راهنمایی کنید.
ممنون

اول یه تایمر ویه تکست به فرم اضافه کن بعد کد زیر رو بنویس:

Private Sub Form_Load()
Text1.Text = ""
Timer1.Interval = 12
End Sub

Private Sub Timer1_Timer()

For i = 1 To 10
Text1.Text = Text1.Text + "t"
i = i + 1
Next i
End Sub

AMP PAVEH
دوشنبه 20 اردیبهشت 1389, 09:52 صبح
سلام دوست عزیز از این روش هم می تونی استفاده کنی


Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 116
Text1.Text = "Ñæå ÈÑäÇãå äæíÓÇä"
End Select
End Sub
موفق باشی