الجواب هذا على آخر مشاركة قبل مشاركتي هذه لاني لم استطع النقر على زر رد لانه يحولني الى صفحة
يتعذّر على هذه الصفحة العمل
بعد ان نضيف قيم افتراضية لخاصية Tag لمربع النص و كذلك لخاصية الـ Text هذا الكود لدي كامل مع كلاس الفورم:
و المثال مرفق .
يتعذّر على هذه الصفحة العمل
بعد ان نضيف قيم افتراضية لخاصية Tag لمربع النص و كذلك لخاصية الـ Text هذا الكود لدي كامل مع كلاس الفورم:
PHP كود :
Public Class Form1
Private Sub TextBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles TextBox2.MouseDown, TextBox1.MouseDown
If e.Button = MouseButtons.Left Then
Dim c As TextBox = DirectCast(sender, TextBox)
If c.Text = c.Tag Then
c.Clear()
End If
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Hide()
Close()
End Sub
Private Sub Form1_Closed(sender As Object, e As EventArgs) Handles Me.Closed
End
End Sub
Private Sub TextBox1_MouseLeave(sender As Object, e As EventArgs) Handles TextBox2.MouseLeave, TextBox1.MouseLeave
Dim c As TextBox = DirectCast(sender, TextBox)
If c.Text.Trim = "" Then
c.Text = c.Tag
End If
End Sub
End Class
و المثال مرفق .