[waelalmsry75]

(06-08-17, 07:27 AM)أبو نوره كتب : مرحبا اخى

تفضل

PHP كود :

Dim a As Integer = TextBox1.SelectionStart 'مكان المؤشر'
Dim b As String = TextBox1.Text.Substring(a) 'النص بعد المؤشر'
Dim c As String = TextBox1.Text.Substring(0, a) 'النص قبل المؤشر'

If b.Trim.StartsWith("بسم") Then
    TextBox1.SelectedText = " " & "نصا معينا" & " "
End If

If c.Trim.EndsWith("الرحيم") Then
    TextBox1.SelectedText = " " & "نصا آخر" & " "
End If

If Not (b.Trim.StartsWith("بسم") Or c.Trim.EndsWith("الرحيم")) Then
    TextBox1.SelectedText = " " & "نصا ثالثا" & " "
End If 


بارك الله فيك أخي أبو نوره
سلمت يداك

حاولت عمل متغير لأول النص وآخره، لكن لم يضبط معي
فلو تكرمت بعمل متغير لأول النص بدلا من كلمة "بسم"
ولآخر النص بدلا من كلمة "الرحيم"
وتغيير ما يلزم في الكود

وجزاك الله خيرا