منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] سؤال في كود بسيط - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=30388)

سؤال في كود بسيط - bakriano30@yahoo.com - 19-07-19

محتاج اخلي الكلمه اللي هتكون في تكست بوكس تحتوي علي كلمه معينه جربت الكود دا مانفعش 


Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = ".com" Then
            Label1.Visible = True
        Else
            MsgBox("Please Insert email")
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Visible = False
    End Sub
End Class

RE: سؤال في كود بسيط - ابراهيم ايبو - 19-07-19

السلام عليكم اخي الكريم 
ماذا تريد ان يظهر في التكست بوكس عند التشعيل وماهي الكلمة التي تريد ان تظهر
وضح طلبك اكثر يارعاك الله


RE: سؤال في كود بسيط - bakriano30@yahoo.com - 19-07-19

(19-07-19, 01:58 AM)ابراهيم ايبو كتب :
السلام عليكم اخي الكريم 
ماذا تريد ان يظهر في التكست بوكس عند التشعيل وماهي الكلمة التي تريد ان تظهر
وضح طلبك اكثر يارعاك الله

محتاج الشخص اللي هيكتب في التكست بوكس اي كلمه لازم يكتب في النهايه .com 
حتي يتم تنفيذ الامر لليبول

RE: سؤال في كود بسيط - سعود - 19-07-19

If TextBox1.Text .Endswith( ".com") Then

RE: سؤال في كود بسيط - bakriano30@yahoo.com - 19-07-19

(19-07-19, 02:15 AM)سعود كتب : If TextBox1.Text .Endswith( ".com")  Then

شكرا اخي سعوود كتر خيرك نجح الامر