منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ما الحدث الذي يطلقه الزر Tab - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (https://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (https://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (https://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ما الحدث الذي يطلقه الزر Tab (/showthread.php?tid=2520)

الصفحات: 1 2

RE: ما الحدث الذي يطلقه الزر Tab - vbnet - 05-05-14

-
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    TextBox1.AcceptsTab = True ' يمكن الاستغناء عن هذا السطر بالتعديل في الخصائص مباشرة
    TextBox1.Multiline = True ' يمكن الاستغناء عن هذا السطر بالتعديل في الخصائص مباشرة
End Sub
[صورة مرفقة: 2227_04_05_14_3_10_42.png]

كود :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    If e.KeyChar = Chr(Keys.Enter) Then
        e.Handled = True
    ElseIf e.KeyChar = Chr(Keys.Tab) Then
        e.Handled = True ' حذف هذا السطر ينتج عنه إدراج مسافة تاب المعروفة داخل النص
        MsgBox("Tab key")
    End If
End Sub


RE: ما الحدث الذي يطلقه الزر Tab - djelloul - 12-06-14

السلام عليكم ورحمة الله تعالى وبركلته
بعد حمد الله ترابك وتعالى والصلاة على رسوله صلى الله عليه وسلم

مشكور أخي
أنا جلول من الجزائر مبتدآ في تعلم البرمجة
لو أردت استبدال حدث الضغط على زر Tab في التنقل بين التيكست بوكس جاخل الفورم الواحد بالضغط على أنتر كيف يتم ذلك
وشكرا لك

RE: ما الحدث الذي يطلقه الزر Tab - vbnet - 12-06-14

(12-06-14, 03:15 PM)djelloul كتب : ...
لو أردت استبدال حدث الضغط على زر Tab في التنقل بين التيكست بوكس جاخل الفورم الواحد بالضغط على أنتر كيف يتم ذلك
...

.....

أولا إذهب إلى خصائص الفورم الخاصية KeyPreview وغير قيمتها إلى True ثم ضع هذا الكود
كود :
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyUp
    If e.KeyCode = Keys.Enter Then Me.SelectNextControl(Me.ActiveControl, True, True, True, True)
End Sub

.....