¡Buf! Muchísimas gracias amigo, en serio, así el programa está muchísimo mejor que abriendo ventanas de comando externas.
Me reitero de nuevo, muchísimas gracias. ^_^
Me reitero de nuevo, muchísimas gracias. ^_^
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Button6.Text = "Mostrando información en Shell..."
Button6.Enabled = True
Shell("cmd.exe /c @echo off")
Shell("cmd.exe /c ndstool.exe -l game.nds", AppWinStyle.NormalFocus)
Shell("cmd.exe /c pause")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If My.Computer.FileSystem.FileExists("ejecutable.exe") Then
MsgBox("¡Perfecto! El programa ha encontrado el archivo «ejecutable.exe». Pulse aceptar para continuar", MsgBoxStyle.Information)
Formdeacciones.Show()
Else
MsgBox("No se ha encontrado el archivo principal. Asegúrese de que están dentro de la misma carpeta que el ejecutable principal.")
End If
End Sub