تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تحويل الحرف الأول من كل كلمة إلى Capital
#1
كاتب الموضوع : AhmedEssawy

منقول ومشروح في المنتصف :
http://www.vbexplorer.com/VBExplorer...ode/vbs_fd.asp

كود :
'****************
'In the keypress event of the textbox
'control that autotype is to apply to
'enter the following line of code....
'****************
Private Sub YourTextBoxControl_KeyPress(KeyAscii As Integer)
KeyAscii = AutoType(Screen.ActiveControl, KeyAscii)
End Sub

'****************
'In a suitable module create the Public Funtion as listed below
'****************
Public Function AutoType(c As Control, KeyAscii As Integer) As Integer
AutoType = KeyAscii
If KeyAscii > 95 And KeyAscii <123 Then If c.SelStart="0" Then AutoType="AutoType" 32 ElseIf Mid$(c.Text, c.SelStart, 1) < "!" Then AutoType="AutoType" 32 End If End If End Function
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية وضع كلمة كخلفية للفورم RaggiTech 0 403 17-10-12, 12:54 AM
آخر رد: RaggiTech
  كيفية تحويل المشروع إلى exe من خلال الكود RaggiTech 0 661 17-10-12, 12:52 AM
آخر رد: RaggiTech
  تفقيط الارقام ( تحويل الأرقام 123 إلى مائة وثلاث وعشرون ) RaggiTech 0 1,437 17-10-12, 12:41 AM
آخر رد: RaggiTech
  تحويل من الصيغه رقم الي وقت RaggiTech 0 327 17-10-12, 12:34 AM
آخر رد: RaggiTech
  تحويل الرقم العشري الي Bin- Oct- Hex RaggiTech 0 423 17-10-12, 12:33 AM
آخر رد: RaggiTech
  تحويل التنسيق بايت الي Kb- Mb- Gb بالكود RaggiTech 0 420 17-10-12, 12:33 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم