تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن مساعدة
#1
السلام عليكم و رحمة الله
ممكن مساعدة في السؤال قي المرفقات


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#2
كود :
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       MsgBox("Welcome")
   End Sub

   Private Sub TextBox1_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.GotFocus
       TextBox2.Text = "none"
   End Sub

   Private Sub TextBox2_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
       Me.BackColor = Color.Yellow
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Label1.Visible = False
   End Sub

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       Me.BackColor = Color.Black
       ComboBox1.Items.AddRange(New String() {"Value1", "Value2", "Value3"})
   End Sub
End Class
الرد }}}
تم الشكر بواسطة: Ronald , Ronald , alhaj1982 , alhaj1982



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم