تقييم الموضوع :
  • 2 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف يمكن تحريك الكتابة
#1
السلام عليكم ورحمة الله


كيف يمكننى تحريك الكتابة لأعلى واسفل داخل أداة RichTextBox1 عن طريق الماوس

بمعنى أخر عندى RichTextBox1 بداخلة نص ويظهر ال Scroll يمين الأداة فكيف اقوم بتحريك الكتابة داخل ال RichTextBox1 بدلا من التوجة إلى Scroll وتحريكة حيث أننى بعمل على تطبيق يعمل على شاشة باللمس
(مثل أجهزة الهاتف الذكية)

أرجو مساعدتى
الرد
تم الشكر بواسطة:
#2
السلام عليكم تفضل جرب هذا الكود واعطيني رأيك

كود :
Dim WithEvents lbl As New Label
    Dim b As Boolean = False
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        lbl.Text = "3booody"
        Me.RichTextBox1.Controls.Add(lbl)
        AddHandler lbl.DoubleClick, AddressOf lbl_DoubleClick
    End Sub
    Private Sub lbl_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs)
        If b Then
            b = False
            lbl.ForeColor = Color.Black
        Else
            b = True
            lbl.ForeColor = Color.Red
        End If
    End Sub
    Private Sub RichTextBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseMove
        If b Then
            lbl.Location = New Point(e.X, e.Y)
            lbl.Refresh()
        End If    
    End Sub
الرد
تم الشكر بواسطة: abulayth , سعود , mohammed moh


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] استفسار بخصوص تحريك الماوس والضغط dubai.eig 0 60 08-02-19, 06:42 PM
آخر رد: dubai.eig
  [كود] سؤال لأهل الخبرة كيف يمكن استدعاء شااشة لبرنامج تم برمجتة بالجافا dametucorazon 1 85 06-02-19, 10:35 AM
آخر رد: dametucorazon
  [Acces2007] كيف يمكن استخدام اداة WebBrowser4 داخل الاكسز بدون حفظ الروابط المستخدمة على الجهاز come2playati 0 41 05-02-19, 09:04 PM
آخر رد: come2playati
  هل يمكن اقتناص رابط الفيديو bidaya 12 420 23-01-19, 03:21 PM
آخر رد: elgokr
  [سؤال] الكتابة باللغة العربية أبوسعود 5 232 09-01-19, 10:01 PM
آخر رد: salah mansour
  ماهي لغة الكتابة الحالية؟ عبدالله الصافي 2 107 30-12-18, 05:47 AM
آخر رد: عبدالله الصافي
  سؤال بخصوص الكتابة داخل داتا جريد احمد خطاب 3 179 05-12-18, 11:35 AM
آخر رد: احمد خطاب
  [VB.NET] كيف يمكن تحديد كلمة بلون داخل listview XBOOBX 1 158 30-11-18, 06:28 PM
آخر رد: XBOOBX
  ضبط وضع الكتابة داخل الليست بوكس ابو روضة 4 286 13-11-18, 02:23 AM
آخر رد: ابو روضة
  [VB.NET] كيف يمكن سحب xsrftoken من خلال cookie XBOOBX 0 117 07-11-18, 10:20 PM
آخر رد: XBOOBX

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


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