13-04-21, 12:04 AM (آخر تعديل لهذه المشاركة : 13-04-21, 12:05 AM {2} بواسطة 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
(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 (آخر تعديل لهذه المشاركة : 13-04-21, 06:47 PM {2} بواسطة messry.)
كود :
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 Sub