URGENTE - Llamar a un .txt y FUNCIONES
Publicado por Emanuel (25 intervenciones) el 19/12/2016 00:34:05
Hola!
Tengo un archivo .txt llamado "usuarios", donde aparece:
Me piden que haga ésto:
Nombres de los Formularios: frmMenu, frmLogin ... - Nombre del módulo: funciones
En el momento en que crea conveniente debe crear/modificar el módulo "funciones", que contendrá tres funciones públicas: (PONGO SÓLO UNA)
1. Función "leerUsuario": en el archivo "C:\examenVBAavanzado\usuarios.txt" se encuentran los usuarios y contraseñas válidos para utilizar el sistema
Esta función recibirá como parámetro el usuario y password del "frmLogin", leerá el archivo "usuarios.txt" y devolverá verdadero en caso de que los haya encontrado o falso en el caso contrario.
donde esa es la Primera Parte de un examen que estoy resolviendo: la Segunda Parte dice:
Trabajando con "frmLogin" (aparece una imagen donde hay 2 TextBox, uno Nombre y otro Contraseña, y un Button Aceptar)
El botón ACEPTAR llama a la función "leerUsuario" del módulo "funciones". Si esta función devuelve falso muestra la siguiente leyenda "Usuario o contraseña no válido. Vuelva a intentarlo". Si la función devuelve verdadero, etc.......
¿Cómo resuelvo lo que me piden?
¿¿Cómo "busco" (me suena a la función Find)??
¿¿¿¿Cómo utilizo una porción de un .txt para evaluar si se ingresó correctamente????
MI CÓDIGO HASTA AHORA ES:
GRACIAS!! ES URGENTE!
PD: por favor explicar cada paso de la resolución. Gracias!!
Tengo un archivo .txt llamado "usuarios", donde aparece:
1
2
3
4
pedro,1silvia,2facu,3luly,4Me piden que haga ésto:
Nombres de los Formularios: frmMenu, frmLogin ... - Nombre del módulo: funciones
En el momento en que crea conveniente debe crear/modificar el módulo "funciones", que contendrá tres funciones públicas: (PONGO SÓLO UNA)
1. Función "leerUsuario": en el archivo "C:\examenVBAavanzado\usuarios.txt" se encuentran los usuarios y contraseñas válidos para utilizar el sistema
Esta función recibirá como parámetro el usuario y password del "frmLogin", leerá el archivo "usuarios.txt" y devolverá verdadero en caso de que los haya encontrado o falso en el caso contrario.
donde esa es la Primera Parte de un examen que estoy resolviendo: la Segunda Parte dice:
Trabajando con "frmLogin" (aparece una imagen donde hay 2 TextBox, uno Nombre y otro Contraseña, y un Button Aceptar)
El botón ACEPTAR llama a la función "leerUsuario" del módulo "funciones". Si esta función devuelve falso muestra la siguiente leyenda "Usuario o contraseña no válido. Vuelva a intentarlo". Si la función devuelve verdadero, etc.......
¿Cómo resuelvo lo que me piden?
¿¿Cómo "busco" (me suena a la función Find)??
¿¿¿¿Cómo utilizo una porción de un .txt para evaluar si se ingresó correctamente????
MI CÓDIGO HASTA AHORA ES:
1
2
3
4
5
6
7
Module funciones
Public Function leerUsuario() As String
Dim texto As String
texto = My.Computer.FileSystem.ReadAllText("H:\UTN Visual 2016\UTN-FRBA Examen Visual Basic Avanzado 0601\examenVBAavanzado\usuarios.txt")
MsgBox(texto) ' Me muestra los 4 registros uno debajo del otro (como corresponde), pero ¿cómo sigo?
End Function
End Module
GRACIAS!! ES URGENTE!
PD: por favor explicar cada paso de la resolución. Gracias!!
Valora esta pregunta
0
