Jump to content

Recommended Posts

Posted

Se for como o VB6, vais ao codigo do splash screen e onde tem Unload Me metes em baixo NomeDoForm.show


Private Sub Form_KeyPress(KeyAscii As Integer)
    Unload Me
    Form1.Show
End Sub

Private Sub Frame1_Click()
    Unload Me
    Form1.Show
End Sub

Se quiseres que ele passe ao fim de X tempo crias um Timer

Posted

Nah, timer's é memória deperdiçada.

Mete isto no Evento Load da formSplashScreen:

Sleep 2000
Unload(me)
Form1.Show

Something like this...

EDIT: Btw, secção errada, para a próxima lê as regras ou verás o topic bloqueado. 👍

Posted
Nah, timer's é memória deperdiçada.

Porque é que dizes issu, eu normalmente utiliso Timers. E se for Timers atravez de API's, tb é desperdiçar memória??

Para utilizares o comando Sleep em VB6 tens de declarar a API

Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

cumps

Posted
        System.Threading.Thread.Sleep(2000)

"The Dark Side Clouds Everthing. Impossible To See The Future Is."My rig: Intel Core 2 Quad Q9450 | abit IP35P | 4G Kingston 800 Mhz | XFX GeForce 9800 GX2 1G ddr3 | 2X WD5000AAJS 500Gb Sata 2 | PSU 600W || Caixa El-Diablo | Creative XMod

Posted
Nah, timer's é memória deperdiçada.

Porque é que dizes issu, eu normalmente utiliso Timers. E se for Timers atravez de API's, tb é desperdiçar memória??

Para utilizares o comando Sleep em VB6 tens de declarar a API

Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Mas ele está em vb.net 2005 onde não terá de fazer isso

Posted

Acho que o unload não é para o VB.NET mas sim para o VB6 porque no 6 não me dá problemas.

Usa o Me.Finalize ()

Realmente o Sleep não foi o que eu tenho usado nos meus projectos... mas sim um timer.... 👍😉 ;) 🙂 !

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.