tümü

visual basic 6 bilen piçler hele bi gelin

  1. 1.
    0
    butonla yaparsan

    Private sub command1_clicl()
    timer3.enabled = true
    end sub

    private sub timer3_timer()
    if tur2 = 15 then
    timer3.enabled = false
    timer4.enabled = true
    else
    tur2 = tur2 + 1
    veri = veri * 2
    If (veri = 16) Then
    veri = 1
    End If
    end if
    end sub

    private sub timer4_timer()
    if tur3=15 then
    timer4.enabled=false
    else
    tur3=tur3+1
    veri = veri / 2
    If (veri = 0) Then
    veri = 8
    End If
    end if
    end sub

    programım yok deneyemedim
    ···
    #27860019 şikayet
   tümünü göster