هل ممكن جعل الفورم الاساسي ثابته ماتختفي نهائياً تكون ظاهره باستمرار على سطح المكتب مهما فتحت من صفحات او برامج الغرض منه هو انه اريد اكتب حاجه في الفورم واكون متذكر لها باستمرار وماتحتفي نهائياً ظاهره على طول مهما فتحت صفحات اوبرامج كيف يمكن عمل ذلك ماهو الكود المناسب .
شكراً للجميع
اللهمّ بعلمك الغيب وقدرتك على الخلق، أحييني ما علمت الحياة خيراً لي، وتوفّني ما علمت الوفاة خيراً لي.
Public Class Form1
Dim originalText As String
Dim spaceCounter As Integer = 1
Dim reverseMoving As Boolean
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
originalText = Me.Text
Timer1.Interval = 50
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Me.Text = StrDup(spaceCounter, " ") & originalText
If Not reverseMoving Then
spaceCounter += 1
If spaceCounter = 35 Then
reverseMoving = True
End If
Else
spaceCounter -= 1
If spaceCounter = 0 Then
reverseMoving = False
End If
End If
End Sub
End Class