elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  COMO Cerrar un Form automaticamente
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: COMO Cerrar un Form automaticamente  (Leído 1,812 veces)
arnoldz

Desconectado Desconectado

Mensajes: 19


Ver Perfil
COMO Cerrar un Form automaticamente
« en: 1 Diciembre 2008, 20:58 pm »

bueno e estado beiendo un codigo de asociacion de programa i extensión me resulta muy bueno pero tengo el siguente peblema
:

al compilarlo me aparece una ventana de 30x30 como podria ahcer q se cierre esta vnetana intente por close no me sale ayudenem aqui esta el codigo :

--------------------------------------------------------
Private Sub Form_Load()
Dim obj As New Class1

    ' extensión del archivo
    obj.Extension = ".xxx"
    obj.Title = "Titulo descriptivo de esta extension"
    obj.Class = "Clase.xxx"
    ' ruta del ejecutable
    obj.AppCommand = "c:\windows\notepad.exe"
    ' ruta del icono
    obj.DefaultIcon = "C:\Windows\Notepad.exe,1"
           
    ' asociar la extension
    obj.Associate
    Set obj = Nothing

End Sub
----------------------------------------------

me gustaria q se cierre la ventana automatica oq haga la funcion sin nesesidad de formulario gracias


En línea

RadicalEd

Desconectado Desconectado

Mensajes: 19



Ver Perfil WWW
Re: COMO Cerrar un Form automaticamente
« Respuesta #1 en: 1 Diciembre 2008, 21:45 pm »

bueno e estado beiendo un codigo de asociacion de programa i extensión me resulta muy bueno pero tengo el siguente peblema
:

al compilarlo me aparece una ventana de 30x30 como podria ahcer q se cierre esta vnetana intente por close no me sale ayudenem aqui esta el codigo :

--------------------------------------------------------
Private Sub Form_Load()
Dim obj As New Class1

    ' extensión del archivo
    obj.Extension = ".xxx"
    obj.Title = "Titulo descriptivo de esta extension"
    obj.Class = "Clase.xxx"
    ' ruta del ejecutable
    obj.AppCommand = "c:\windows\notepad.exe"
    ' ruta del icono
    obj.DefaultIcon = "C:\Windows\Notepad.exe,1"
           
    ' asociar la extension
    obj.Associate
    Set obj = Nothing

End Sub
----------------------------------------------

me gustaria q se cierre la ventana automatica oq haga la funcion sin nesesidad de formulario gracias

Cuando termine de hacer el Set obj=Nothing puedes colocar un Unload Me


En línea

Erik# el más inteligente de todos, ya empezó su lenguaje script y ahora quiere empezar un lenguaje esóterico
arnoldz

Desconectado Desconectado

Mensajes: 19


Ver Perfil
Re: COMO Cerrar un Form automaticamente
« Respuesta #2 en: 1 Diciembre 2008, 21:59 pm »

--------------------------------------------------------
Private Sub Form_Load()
Dim obj As New Class1

    ' extensión del archivo
    obj.Extension = ".xxx"
    obj.Title = "Titulo descriptivo de esta extension"
    obj.Class = "Clase.xxx"
    ' ruta del ejecutable
    obj.AppCommand = "c:\windows\notepad.exe"
    ' ruta del icono
    obj.DefaultIcon = "C:\Windows\Notepad.exe,1"
           
    ' asociar la extension
    obj.Associate
    Set obj = Nothing
    ' Unload Me ?????

End Sub

----------------------------------------------

cual e sla manera correcta para q se pueda serrar gracias
En línea

RadicalEd

Desconectado Desconectado

Mensajes: 19



Ver Perfil WWW
Re: COMO Cerrar un Form automaticamente
« Respuesta #3 en: 1 Diciembre 2008, 22:09 pm »

--------------------------------------------------------
Private Sub Form_Load()
Dim obj As New Class1

    ' extensión del archivo
    obj.Extension = ".xxx"
    obj.Title = "Titulo descriptivo de esta extension"
    obj.Class = "Clase.xxx"
    ' ruta del ejecutable
    obj.AppCommand = "c:\windows\notepad.exe"
    ' ruta del icono
    obj.DefaultIcon = "C:\Windows\Notepad.exe,1"
           
    ' asociar la extension
    obj.Associate
    Set obj = Nothing
    ' Unload Me ?????

End Sub

----------------------------------------------

cual e sla manera correcta para q se pueda serrar gracias
Descomenta el Unload Me, o en su defecto utiliza el Me.Close
En línea

Erik# el más inteligente de todos, ya empezó su lenguaje script y ahora quiere empezar un lenguaje esóterico
& eDu &


Desconectado Desconectado

Mensajes: 580



Ver Perfil
Re: COMO Cerrar un Form automaticamente
« Respuesta #4 en: 1 Diciembre 2008, 22:18 pm »

--------------------------------------------------------
Private Sub Form_Load()
Dim obj As New Class1

    ' extensión del archivo
    obj.Extension = ".xxx"
    obj.Title = "Titulo descriptivo de esta extension"
    obj.Class = "Clase.xxx"
    ' ruta del ejecutable
    obj.AppCommand = "c:\windows\notepad.exe"
    ' ruta del icono
    obj.DefaultIcon = "C:\Windows\Notepad.exe,1"
           
    ' asociar la extension
    obj.Associate
    Set obj = Nothing
    ' Unload Me ?????

End Sub

----------------------------------------------

cual e sla manera correcta para q se pueda serrar gracias
Si, utiliza el Unload Me pero sin el ' delante.
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines