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
sub form_load()
if command="minimized" then me.visible=false
end sub
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
(http://a3.sphotos.ak.fbcdn.net/hphotos-ak-snc6/206493_1820939414634_1574649969_31767053_6947942_n.jpg)
p.d:
la imagen tiene una figura oculta :-X :-X :-X :-X :-X ;D :xD
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.
sisi mira lo que edite arriba
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
probe poniendo los 2 y sigue saliendo ese error :c
Private Sub Form_Load()
If Command = "HI" Then MsgBox "No hay errores!"
End Sub
(http://i52.tinypic.com/29yio9l.jpg)
A lo mejor tienes mal la configuracion en las propiedades del formulario, prueba creando un nuevo formulario y solo poniendo el codigo de prueba.
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
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........
Claro, tenia q ver si con lo q decia hoy solo q al revez xD, sacale el "Form1.Show" que esta al pedo si desp del msgbox "PEGASTE" se va a mostrar.
Esque el msgbox es modal ( viste q si no lo aceptas o cancelas no te deja hacer otra cosa? bueno es eso) y entonces vs estas haciendo q inicie el form1 cuando esta el msgbox y eso te da error.
Edit: Ahora q me doy cuenta tenes q sacar todo el timmer entero si total esta de mas ahora xD
.
Oja la te sirva de algo, no traigo el vb6 instalado.
Private Sub Form_Load()
select case command$
case "\hide","\main.hide"
hide
case "\show","\main.show"
show
end select
End Sub
Dulces Lunas!¡.
-
Para usar varias opciones puedes jugar con InStr por ej. Ahora estoy desde el movil. Sino te pondria un codigo
Ya ya ya, ya vinieron los masters a molestar xD jaja. Eso no pide nuKje y ya lo soluciono creo, dejen ganar una! jaja
Cita de: XXX-ZERO-XXX en 20 Abril 2011, 20:02 PM
Claro, tenia q ver si con lo q decia hoy solo q al revez xD, sacale el "Form1.Show" que esta al pedo si desp del msgbox "PEGASTE" se va a mostrar.
Esque el msgbox es modal ( viste q si no lo aceptas o cancelas no te deja hacer otra cosa? bueno es eso) y entonces vs estas haciendo q inicie el form1 cuando esta el msgbox y eso te da error.
Edit: Ahora q me doy cuenta tenes q sacar todo el timmer entero si total esta de mas ahora xD
Nop, en el exe inicia el form 'tuto' , y el timer abre el form1
p.d: solucionado:
Private Sub Form_Load()
Me.Show
If Command = "dato" Then
MsgBox "PEGASTE"
Else
End If
Form1.Show
End Sub
Ah bueno, esos datos tenes q decirlos siempre, pero si te sigue saliendo es por lo q dije un post antes a este.
Si te explicaras mejor q hace tu proyecto, o si dejaras el proyecto, te lo solucionarian mas rapido
Pero si deje el codigo, no entiendo porque decis eso ._.
Lo unico que hacia el proyecto era abrir el formulario 'tuto' (Al inicio), y que 'tuto' abra el form1.
gracias por la ayuda ;D !
/closed
Pero no me queda claro a q le decis "tuto" es el nombre de un form? Bueno eso es lo q tenias q haber dicho, yo por ejemplo pensaba q habrias el mismo form1..