*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->


Join the forum, it's quick and easy


*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->

Would you like to react to this message? Create an account in a few clicks or log in to continue.

● En Güncel Paylaşım Platformu ●

---Misafir--- Hos Geldiniz Daha iyi Bir Hizmet İçin Üye olunuz.ÜyeLer Link GörebiLir

    Vb Kod Yazı Animasyon

    MnyTirith
    MnyTirith
    ● Admin ●
    ● Admin ●


    <b>Doğum tarihi</b> Doğum tarihi : 20/06/90

    Vb Kod Yazı Animasyon Empty Vb Kod Yazı Animasyon

    Mesaj tarafından MnyTirith Cuma Mart 12, 2010 9:48 pm

    Private Sub Command1_Click()
    End
    End Sub

    Private Sub Form_Load()
    Show
    Dim i, k, x, y, x1, y1

    x = 100 'yazı kontrolu
    y = 100
    k = "Haqan & AdeLHard"
    FontName = "Comic Sans MS"
    FontSize = 40
    For i = 1 To 15
    x1 = x + 10 * i
    y1 = y + 10 * i
    ForeColor = QBColor(i)
    CurrentX = x1
    CurrentY = y1
    Print k
    Next
    End Sub


      Forum Saati Salı Mayıs 07, 2024 7:06 pm