+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [كود] كود SPACE تتكرر (/showthread.php?tid=17416)
كود SPACE تتكرر - MC-MeDo - 23-09-16
السلام عليكم ورحمه الله وبركاته
شباب احتاج كود ادا ضغطت على space من كيبورد تتكرر اكثر من 5 مرات !
يعني مثلا ضغطت سبيس وباقي ضاغط يعني تتكرر بسرعه !وشكرا من ساعدني في الموضوع الاول وهدا
RE: كود SPACE تتكرر - silverlight - 23-09-16
متهيألي من الممكن تنفيذ الفكرة هذه من خلال استخدام Timer
RE: كود SPACE تتكرر - أبو عمر - 23-09-16
هنا يكرر
Tab
PHP كود :
Private Sub TextBox1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
If e.KeyCode = Keys.Space Then
For i = 0 To 4
TextBox1.Text = TextBox1.Text & vbTab
Next
End If
TextBox1.SelectionStart = TextBox1.TextLength
End Sub
والثاني مسافة
PHP كود :
Private Sub TextBox1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
If e.KeyCode = Keys.Space Then
For i = 0 To 4
TextBox1.Text = TextBox1.Text & " "
Next
End If
TextBox1.SelectionStart = TextBox1.TextLength
End Sub