منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

هل ممكن جعل الفورم الاساسي ثابته ماتختفي نهائياً تكون ظاهره باستمرار على سطح المكتب مهما فتحت من صفحات او برامج الغرض منه هو انه اريد اكتب حاجه في الفورم واكون متذكر لها باستمرار وماتحتفي نهائياً ظاهره على طول مهما فتحت صفحات اوبرامج كيف يمكن عمل ذلك ماهو الكود المناسب .

شكراً للجميع

السلام عليكم...
تفضل:

شكراً اخي

عندي حاجه ثانيه اذا بالامكان كيف اجعل النص الموجود في شريط العنوان متحرك .

شكراً مقدماً لكل الاعضاء المتميزين في هذا المنتدى الاكثر من رائع

تفضل:

كود :

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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

محمد مسافر

اسامه الهرماوي

محمد مسافر

اسامه الهرماوي