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

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

الصفحات: 1 2

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - mohammed moh - 26-08-13

السلام عليكم و رحمة الله
أولا أنا جديد في المنتدى و في لغة في بي أيضا
عندي برنامج فيجوال ستيديو ألتيما 2012
و أعمل بلغة فيجوال بيسك
طلبي هو كيف يمكنني إنشاء محرر نص أو تاكست بوكس عادي المهم هو أنني أستطيع
أن ألصق فيه روابط نت أو مثلا لنفترض هذا الرباط "www.google.com" كيف
أسطيع دمجه في كلمةأول جملة يعني مثل ما هو موجود في محرر المنتدى
أتمنى أن تكون فكرتي وصلت و أتمنى أن أجد المساعدة
و شكراا مسبقا للجميع

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - sooriaty03 - 26-08-13

mohammed moh كتب :السلام عليكم و رحمة الله
أولا أنا جديد في المنتدى و في لغة في بي أيضا
عندي برنامج فيجوال ستيديو ألتيما 2012
و أعمل بلغة فيجوال بيسك
طلبي هو كيف يمكنني إنشاء محرر نص أو تاكست بوكس عادي المهم هو أنني أستطيع
أن ألصق فيه روابط نت أو مثلا لنفترض هذا الرباط "www.google.com" كيف
أسطيع دمجه في كلمةأول جملة يعني مثل ما هو موجود في محرر المنتدى
أتمنى أن تكون فكرتي وصلت و أتمنى أن أجد المساعدة
و شكراا مسبقا للجميع

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

ممكن توضح أكثر ما هو طلبك ليتسنى لنا مساعدتك


بالتوفيق

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - MSDOS - 26-08-13

sooriaty03 كتب :السلام عليكم ورحمة الله وبركاته

ممكن توضح أكثر ما هو طلبك ليتسنى لنا مساعدتك


بالتوفيق

نفس السؤال....

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - ali.alfoly - 26-08-13

الاخ يريد وضع رابط على النص مثال اضغط هنا
وهذا غير ممكن فى تكست بوكس
يمكنك استخدام RichTextBox فهى تمكنك من ذلك على ما اظن

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - سعود - 26-08-13

ممكن هذا لكن لازم تستخدم html
[h=1]make html editor for desktop[/h]ارجو ان يكون هو المطلوب

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - 3booody - 26-08-13

[COLOR="#0000CD"]السلام عليكم ورحمة الله وبركاته
بعد اذنكم اخواني..

تفضل أول شي ضع اداة RichTextBox واكتب الكود التالي[/COLOR]

كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Link As New LinkLabel
        Link.Text = "اضغط هنا"
        Link.AutoSize = True
        Link.Location = RichTextBox1.GetPositionFromCharIndex(RichTextBox1.TextLength)
        RichTextBox1.Controls.Add(Link)
        RichTextBox1.AppendText(Link.Text & "  ")
        AddHandler Link.LinkClicked, AddressOf link_LinkClicked
    End Sub
    Private Sub Link_LinkClicked(ByVal sender As Object, ByVal e As LinkLabelLinkClickedEventArgs)
        Process.Start("www.vb4arb.com")
    End Sub


كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - MSDOS - 26-08-13

3booody كتب :[COLOR="#0000CD"]السلام عليكم ورحمة الله وبركاته
بعد اذنكم اخواني..

تفضل أول شي ضع اداة RichTextBox واكتب الكود التالي[/COLOR]

كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Link As New LinkLabel
        Link.Text = "اضغط هنا"
        Link.AutoSize = True
        Link.Location = RichTextBox1.GetPositionFromCharIndex(RichTextBox1.TextLength)
        RichTextBox1.Controls.Add(Link)
        RichTextBox1.AppendText(Link.Text & "  ")
        AddHandler Link.LinkClicked, AddressOf link_LinkClicked
    End Sub
    Private Sub Link_LinkClicked(ByVal sender As Object, ByVal e As LinkLabelLinkClickedEventArgs)
        Process.Start("www.vb4arb.com")
    End Sub

محاولة جميلة بس ما هي عملية لأنه لو يبي يحذف الرابط لا يستطيع اثناء الكتابة، ننتظر طريقة أخرى من ابداعتك وابداعات الآخوة.

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - MSDOS - 26-08-13

سعود كتب :ممكن هذا لكن لازم تستخدم html
make html editor for desktop

ارجو ان يكون هو المطلوب

المثال للعضو سعود جميل جداً واعتقد جداً يفي بالغرض.

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - MSDOS - 26-08-13

سعود كتب :ممكن هذا لكن لازم تستخدم html
[h=1]make html editor for desktop[/h]ارجو ان يكون هو المطلوب

بس أخ سعود تقدر تخلي العرض نفسه قابل للتحرير مثل اللي مربع كتابة مشاركة بعد ضغظ زر (تبدل المحرروضع متطور)

كيف أحفظ روابط في تاكست بوكس أو كلمة مدموجة برابط - mohammed moh - 26-08-13

و عليكم السسسلام و رحمة الله و بركاته
ربي يبااارك فيكم جميعاا شباب و مشكوررين جميعا على الرد
و شكر خاص للأخ سعوود و الله أتيت بالمفيد هذا ما كنت أحتاج له بالضبط :
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim txt As String = TextBox1.SelectedText
Dim all As String = TextBox1.Text
If txt.ToString.Trim = "" Then Exit Sub
TextBox1.Text = all.Replace(txt, "<a target=_blank href=" & InputBox("ادخل رابط") & ">" & txt & "</a>")

End Sub
شكراا مرة أخرى للجميع