12-04-21, 11:13 PM
السلام عليكم إخواني، عندي RichTextBox ، أريد كود : اذا وجد الجملة التالية: Activation was successful ينفذ أمر ما، يعني نفس عمل Cmd و شكرا
[attachment=26622]
[attachment=26622]
12-04-21, 11:13 PM
13-04-21, 12:04 AM
(12-04-21, 11:13 PM)Necro PC كتب : [ -> ]السلام عليكم إخواني، عندي RichTextBox ، أريد كود : اذا وجد الجملة التالية: Activation was successful ينفذ أمر ما، يعني نفس عمل Cmd و شكرا
كود :
Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBox1.TextChanged
if RichTextBox1.text = "Activation was successful" then
افعل ما تريد هنا
end if
End Sub13-04-21, 05:31 PM
(13-04-21, 12:04 AM)messry كتب : [ -> ]أخي الفاضل، الكود لا يعمل !!!!!!!(12-04-21, 11:13 PM)Necro PC كتب : [ -> ]السلام عليكم إخواني، عندي RichTextBox ، أريد كود : اذا وجد الجملة التالية: Activation was successful ينفذ أمر ما، يعني نفس عمل Cmd و شكرا
كود :
Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBox1.TextChanged
if RichTextBox1.text = "Activation was successful" then
افعل ما تريد هنا
end if
End Sub
13-04-21, 06:02 PM
كود :
Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBox1.TextChanged
If RichTextBox1.Text = "Activation was successful" Then
MsgBox("Teeeeeeeeeeeeeeeeet")
End If
End Sub15-04-21, 04:45 PM
تفضل أخي الكريم المثال، و صيام مبارك :
15-04-21, 07:40 PM
(15-04-21, 04:45 PM)Necro PC كتب : [ -> ]تفضل أخي الكريم المثال، و صيام مبارك :
علينا وعليكم ان شاء الله
تقبل الله طاعاتكم
تفضل أخي
16-04-21, 04:33 PM
شكرا و بارك الله فيك
16-04-21, 05:18 PM
الشكر لله
سبحان الله وبحمده ، سبحان الله العظيم
سبحان الله وبحمده ، سبحان الله العظيم