PDA

View Full Version : سوال: سوالی در مورد تغییر سایز فونت در Richtextbox



vb_1364
پنج شنبه 08 اسفند 1387, 12:35 عصر
با سلام
در یک کمبوبوکس تعدادی عدد برایه تغییر سایز فونت در Richtextbox هست میخوام وقتی در Richtextbox که تایپ میکنم با توجه به عدد درون کمبو بوکس سایز فونت در Richtextbox هم تغییر کنه

xxxxx_xxxxx
پنج شنبه 08 اسفند 1387, 13:08 عصر
سلام


Private Sub Combo1_Change()
On Error Resume Next
RichTextBox1.Font.Size = Val(Combo1.Text)
End Sub

Private Sub Combo1_Click()
On Error Resume Next
RichTextBox1.Font.Size = Val(Combo1.Text)
End Sub