Using Combo

استفاده کردن از ComboBox به جاي TextBox در VB

همانطور که خودتون هم ممکنه متوجه شده باشین، وقتی از TextBox استفاده مي کنيد و فوکوس از روی اون خارج میشه، دفعه ی بعدی که فوکوس می گیره متن اون به طور کامل Select نمیشه. برای رفع این مشکل شما یا می تونید از یک ComboBox با خاصیت Style = Simple استفاده کنید. یا این که در رویداد GotFocus شیء TextBox، این کد را بنویسید:

Private Sub Text1_GotFocus()

Text1.SelStart = 0

Text1.SelLength = Len(Text1.Text)

End Sub

البته استفاده از ComboBox راحتتره. چون وقتی شما تعداد زیادی TextBox تو برنامه تون داشته باشین، نوشتن این کد برای رویداد GotFocus تمامی این اشیاء کاری خسته کننده می باشد.

 

  
نویسنده : محمد ; ساعت ۱۱:۱٦ ‎ب.ظ روز یکشنبه ٢٥ آبان ،۱۳۸٢