| Pregunta: | 1218 - RECUPERAR DATOS DE ARCHIVOS DESDE VB4 |
| Autor: | Miguel I. P. López |
| Tengo Visual Basic 4 y estoy creando una especie de juego educativo que tiene una opción para guardar en un archivo de texto el nombre del formulario en el que se encuentra. El problema llega a la hora de recuperar el nombre lo que hago con un código como este: Dim Cadena As String Open "C:\Mis documentos\Sin título.txt" For Input As #1 Input #1, Cadena Close #1 El programa recupera el nombre, pero como lo he definido como una cadena, no se como hacer que cargue el formulario con ese nombre. Gracias. | |
| Respuesta: | IngPeterMorales |
| Utiliza así el código
Dim Cadena As String Dim ruta ruta ="C:Mis documentosSin título.txt" Open ruta For Input As #1 Input #1, Cadena Close #1 | |
| Respuesta: | Carlos Barrantes Loría |
| Creo que lo podrás resolver de la siguiente manera siempre y cuando todas las formas del proyecto ya estén cargadas pero no visibles, esto lo logras poniendo todos los formularios como invisibles (visible = false) en el load de tu proceso inicial: For i = 0 To Forms.Count - 1 If Forms(i).Name = Cadena Then Forms(i).Visible = True Exit For End If Next i Este código va luego de que has leído el archivo de texto. Para que este código te funcione óptimamente, debes estar seguro que no habrá demasiados formularios cargados o se consumira la memoria de la máquina y además, debes estar seguro de la cantidad de formularios existentes, es decir, que no creas formularios mientras está corriendo la aplicación. Con mucho gusto te ayudare en lo que pueda. | |
| Respuesta: | Carlos Barrantes Loría |
| Mira tambien este codigo que vi en una de las respuestas aca mismo, creo que la pregunta 1093, que me parece que es lo que andas buscando Dim f As Form Set f = Forms.Add("frmOptions") f.Show vbModal Ok | |