مرحبا بكم فى موقعكم التعليمى مفيدا ومستفيدا

انضم إلى المنتدى ، فالأمر سريع وسهل

مرحبا بكم فى موقعكم التعليمى مفيدا ومستفيدا
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

معك كود صمم الوجهة البرمجيه له

اذهب الى الأسفل

معك كود صمم الوجهة البرمجيه له Empty معك كود صمم الوجهة البرمجيه له

مُساهمة من طرف sayed الخميس مارس 07, 2013 8:26 pm

Public Class Form1

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If ComboBox1.Text = "a" Then
Label1.Text = "allah"

End If
If ComboBox1.Text = "b" Then
Label1.Text = "ba"

End If
If ComboBox1.Text = "c" Then
Label1.Text = "ce"

End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.Items.Add("a")
ComboBox1.Items.Add("b")
ComboBox1.Items.Add("c")
End Sub

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
If Label1.Text = "allah" Then
PictureBox1.Visible = True
End If
If Label1.Text = "ba" Then
PictureBox2.Visible = True
End If
If Label1.Text = "ce" Then
PictureBox3.Visible = True
End If
End Sub

Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click


My.Computer.Audio.Play("E:\مجموعات الشغل\sound5\هادئة\ماذا اقول محمود الحسينى.MP3")
End Sub

Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click


My.Computer.Audio.Play("E:\مجموعات الشغل\sound5\هادئة\ماذا اقول محمود الحسينى.MP3")
End Sub

Private Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox2.Click


My.Computer.Audio.Play("E:\مجموعات الشغل\sound5\هادئة\ماذا اقول محمود الحسينى.MP3")
End Sub
End Class
sayed
sayed
Admin

عدد المساهمات : 190
تاريخ التسجيل : 10/10/2011
العمر : 68
الموقع : computer.hooxs.com

https://computer.hooxs.com

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى