ShaW
Principiante
 Mensajes : 11
 Fecha de inscripción : 15/07/2011
 |  Tema: Quitar Presentaciones!  Vie Jul 15, 2011 3:32 pm | |
| CLIENTE:Buscamos: - Código:
-
Unload frmCargando
Dim PresPath As String
PresPath = DirGraficos & "Presentacion" & RandomNumber(1, 4) & ".jpg"
frmPres.Picture = LoadPicture(PresPath)
frmPres.Show vbModal 'Es modal, así que se detiene la ejecución de Main hasta que se desaparece Cuando lo Encontremos lo Borramos. Buscamos: - Código:
-
ElseIf ticks = 2 Then
PresPath = DirGraficos & "Presentacion" & RandomNumber(5, 8) & ".jpg"
Me.Picture = LoadPicture(PresPath) Y lo Borramos! Listo compilamos y Sale sin Presentaciones.! Asi de Facil! |
|
NazduM
Administrador
Mensajes : 239
Fecha de inscripción : 04/05/2011
 Edad : 27
 Localización : COMPU:)
 Sexo : 
| | Tema: Re: Quitar Presentaciones! Vie Jul 15, 2011 3:33 pm | |
| Buen aporte!!
Felicitaciones por tu primer aporte  |
|
