 Autor
|
Tema: Inicio... (Leído 5,675 veces)
|
CAR3S?
 Desconectado
Mensajes: 343
Level xXx
|
Hola!
bueno hice un programa que no sirve para nada, la cosa es...
yo quiero que inicie con windows, pero el main.visible = false (y cuando se inicia manualmente, visible)
como es eso de los comandos de inicio?
s2
hablo de eso que por ejemplo en el registro aparece
c:\windows.exe /minimized
(Obviamente ese archivo no existe)
creo que se llama parametro xd
|
|
|
|
« Última modificación: 19 Abril 2011, 09:15 am por nuKje »
|
En línea
|
|
|
|
ignorantev1.1
Desconectado
Mensajes: 617
/\ Así acabo cuando quiero programar...
|
sub form_load() if command="minimized" then me.visible=false end sub
|
|
|
|
|
En línea
|
|
|
|
CAR3S?
Desconectado
Mensajes: 343
Level xXx
|
pongo este codigo sub form_load() if command="boot" then me.visible=false end sub
y en el acceso directo ".....a.exe" /boot pero no hace el formulario invisible :S EDIT: ahora puse Private Sub Form_Load() If Command() = "dato" Then MsgBox "PEGASTE" Else End If End Sub
".....a.exe" dato
parece q funciona pero da un error  p.d: la imagen tiene una figura oculta    |
|
|
|
« Última modificación: 19 Abril 2011, 22:30 pm por nuKje »
|
En línea
|
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
Te lo puso mas o menos al vuelo, fijate a escribirlo letra por letra mirandolo, sin copie y pegue ya q creo q command es vbcommand, vs escribi todo en minuscula y si el vb6 te lo pasa a mayuscula es porq funciona.
|
|
|
|
|
En línea
|
|
|
|
CAR3S?
Desconectado
Mensajes: 343
Level xXx
|
sisi mira lo que edite arriba
|
|
|
|
|
En línea
|
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
Proba poniendo al principio del form load Show
o me.Show no me acuerdo bien. Aunque talvez no quieres hacer lo q saldra, es por eso de q el msgbox es modal entonces no puede salir otro no modal, eso dice el error, pero si pones show entonces saldra primero el form y enseguida el msgbox |
|
|
|
|
En línea
|
|
|
|
CAR3S?
Desconectado
Mensajes: 343
Level xXx
|
probe poniendo los 2 y sigue saliendo ese error :c
|
|
|
|
|
En línea
|
|
|
|
ignorantev1.1
Desconectado
Mensajes: 617
/\ Así acabo cuando quiero programar...
|
Private Sub Form_Load() If Command = "HI" Then MsgBox "No hay errores!" End Sub
 A lo mejor tienes mal la configuracion en las propiedades del formulario, prueba creando un nuevo formulario y solo poniendo el codigo de prueba.
|
|
|
|
|
En línea
|
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
Pero eso es porq tendras otra cosa, otro codigo, pasa mas codigo y vemos. A mi esto me anda clarito: Option Explicit Private Sub Form_Load() If Command() = "dato" Then MsgBox "PEGASTE" End If End Sub
Y lo puedo usar asi tamb: Option Explicit Private Sub Form_Load() Text1.Text = Command() End Sub
Lo del show te dije q lo pongas porq me parecio q podia ser eso pero no, como dije pasa mas codigo |
|
|
|
|
En línea
|
|
|
|
CAR3S?
Desconectado
Mensajes: 343
Level xXx
|
si, es verdad, anda pero en el mio no xd el codigo del form es Private Sub Form_Load() Me.Show Timer1.Interval = 1 If Command = "dato" Then MsgBox "PEGASTE" Else End If End Sub Private Sub Timer1_Timer() Form1.Show Timer1.Enabled = False End Sub
edito: el error esta en el codigo del timer, ya que si lo saco, anda bien........ |
|
|
|
« Última modificación: 20 Abril 2011, 08:00 am por nuKje »
|
En línea
|
|
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
inicio en c#
.NET (C#, VB.NET, ASP)
|
SRVAM
|
5
|
4,419
|
22 Agosto 2009, 12:55 pm
por SRVAM
|
|
|
|
Inicio
Hardware
|
CAR_jim
|
3
|
2,861
|
27 Agosto 2010, 14:07 pm
por Ariath
|
|
|
|
Inicio win 7
Windows
|
zoreda
|
4
|
2,970
|
6 Abril 2011, 16:22 pm
por dantemc
|
|
|
|
INICIO
« 1 2 »
Windows
|
Zorronde
|
18
|
11,023
|
2 Diciembre 2021, 07:47 am
por Randomize
|
 |
