LECCION 16
Visual Basic 2015 Lección 16: Entender los procedimientos Sub
Un procedimiento es un código de programa que se pueden llevar a cabo determinadas tareas o devolver un valor. Se puede llamar desde otros procedimientos. En Visual Basic 2015, hay dos tipos de procedimientos; procedimientos Sub y funciones. Un procedimiento sub (también llamada de subrutina) es un procedimiento que realiza una tarea específica y no devuelve un valor, mientras que una función es un procedimiento que devuelve un valor. Vamos a aprender acerca de la función en la siguiente lección. Un procedimiento sub generalmente se utiliza para aceptar la entrada del usuario, visualizar la información, la información de impresión, manipular las propiedades o realizar otras tareas. Es un código de programa por sí mismo y no es un procedimiento de evento, ya que no está asociado con un procedimiento de tiempo de ejecución. Es llamado por otro código cada vez que sea necesario para realizar una tarea determinada.
procedimientos Sub ayudan a hacer los programas más pequeños y más fáciles de manejar. Un procedimiento sub comienza con una palabra clave Sub y termina con una palabra clave End Sub. La estructura del programa de un procedimiento de sub es la siguiente:
Sub ProcedureName (parámetro)
declaraciones
End Sub
El parámetro es cierto los datos que se pasa en el procedimiento sub para realizar una tarea específica.
ejemplo 16.1
En este ejemplo, se crea un procedimiento sub para resumir dos valores que se especifican como los parámetros. El programa principal puede hacer referencia a un procedimiento mediante el uso de su nombre junto con los parámetros de los paréntesis.
Private Sub Form1_Load (remitente como objeto, e como EventArgs) Maneja MyBase.Load
sum (5, 6)
End Sub Sub suma (a medida individual, b As Single)
MsgBox ( "suma =" & a + b)
End Sub
Al ejecutar el programa produce un mensaje de boxvb2013_figure11.1
Figura 16.1
Ejemplo 16.2: Password Cracker
Esta es Visual programa Basic 2015 que muestra cómo descifrar contraseñas. Puede generar contraseñas posibles y comparar cada una de ellas con la contraseña real; y si la contraseña generada resultó ser igual a la contraseña real, entrada tendrá éxito.
En este programa, un temporizador se inserta en la forma y se utiliza para hacer un trabajo repetitivo de la generación de la passwords.We crear un procedimiento de generación de contraseñas generar () y es llamado por el correo Timer1_Tick () evento para que el procedimiento es repite después de cada intervalo. El intervalo del temporizador puede ajustarse en su ventana de propiedades. Un valor de 1 es 1 milisegundo y un valor de 1000 es de 1 segundo. Vamos a establecer el intervalo del temporizador en 100 que es equivalente a 0,1 segundos. La propiedad Timer1.Enabled se establece en false para que el programa sólo empezará a generar las contraseñas después el usuario hace clic en el botón Generar. Rnd es una función de Visual Basic 2015 que genera un número aleatorio entre 0 y 1. Multiplicando por 100 rnd producirá un número entre 0 y 100. Int es una función de Visual Basic 2015 que devuelve un entero haciendo caso omiso de la parte decimal de ese número.
Por lo tanto, el INT (RND * 100) producirá un número entre 0 y 99, y el valor de Int (Rnd * 100) 100 producirá un número entre 100 y 199.Finally, el programa utiliza If ... Then ... Else para comprobar si la contraseña generada es igual la contraseña real o no. Si son iguales, las contraseñas proceso de generación se terminarán definiendo la propiedad Timer1.Enabled a falso.
El código
Public Class Form1
contraseña Dim As Integer Dim crackpass como número entero
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick (remitente como objeto, e como EventArgs) Maneja Timer1.Tick
generar()
Si crackpass = contraseña A continuación,
Timer1.Enabled = False
Label1.Text = crackpass
MsgBox ( "contraseña Cracked! Inicio de sesión correcto!")
Otra cosa Label1.Text = crackpass
Label2.Text = "Por favor, espere ..."
Terminara si
End Sub
Sub generan ()
crackpass = Int (Rnd () * 100) + 100
End Sub
Private Sub Form1_Load (remitente como objeto, e como EventArgs) Maneja MyBase.Load
password = 123
End Sub
End Class
La salida
vb2013_figure16.2
Figura 16.2: Contraseña Generación de Fase
vb2013_figure16.3
Figura 16.3: Mensaje Mostrando Inicio de sesión correcto
Un procedimiento es un código de programa que se pueden llevar a cabo determinadas tareas o devolver un valor. Se puede llamar desde otros procedimientos. En Visual Basic 2015, hay dos tipos de procedimientos; procedimientos Sub y funciones. Un procedimiento sub (también llamada de subrutina) es un procedimiento que realiza una tarea específica y no devuelve un valor, mientras que una función es un procedimiento que devuelve un valor. Vamos a aprender acerca de la función en la siguiente lección. Un procedimiento sub generalmente se utiliza para aceptar la entrada del usuario, visualizar la información, la información de impresión, manipular las propiedades o realizar otras tareas. Es un código de programa por sí mismo y no es un procedimiento de evento, ya que no está asociado con un procedimiento de tiempo de ejecución. Es llamado por otro código cada vez que sea necesario para realizar una tarea determinada.
procedimientos Sub ayudan a hacer los programas más pequeños y más fáciles de manejar. Un procedimiento sub comienza con una palabra clave Sub y termina con una palabra clave End Sub. La estructura del programa de un procedimiento de sub es la siguiente:
Sub ProcedureName (parámetro)
declaraciones
End Sub
El parámetro es cierto los datos que se pasa en el procedimiento sub para realizar una tarea específica.
ejemplo 16.1
En este ejemplo, se crea un procedimiento sub para resumir dos valores que se especifican como los parámetros. El programa principal puede hacer referencia a un procedimiento mediante el uso de su nombre junto con los parámetros de los paréntesis.
Private Sub Form1_Load (remitente como objeto, e como EventArgs) Maneja MyBase.Load
sum (5, 6)
End Sub Sub suma (a medida individual, b As Single)
MsgBox ( "suma =" & a + b)
End Sub
Al ejecutar el programa produce un mensaje de boxvb2013_figure11.1
Figura 16.1
Ejemplo 16.2: Password Cracker
Esta es Visual programa Basic 2015 que muestra cómo descifrar contraseñas. Puede generar contraseñas posibles y comparar cada una de ellas con la contraseña real; y si la contraseña generada resultó ser igual a la contraseña real, entrada tendrá éxito.
En este programa, un temporizador se inserta en la forma y se utiliza para hacer un trabajo repetitivo de la generación de la passwords.We crear un procedimiento de generación de contraseñas generar () y es llamado por el correo Timer1_Tick () evento para que el procedimiento es repite después de cada intervalo. El intervalo del temporizador puede ajustarse en su ventana de propiedades. Un valor de 1 es 1 milisegundo y un valor de 1000 es de 1 segundo. Vamos a establecer el intervalo del temporizador en 100 que es equivalente a 0,1 segundos. La propiedad Timer1.Enabled se establece en false para que el programa sólo empezará a generar las contraseñas después el usuario hace clic en el botón Generar. Rnd es una función de Visual Basic 2015 que genera un número aleatorio entre 0 y 1. Multiplicando por 100 rnd producirá un número entre 0 y 100. Int es una función de Visual Basic 2015 que devuelve un entero haciendo caso omiso de la parte decimal de ese número.
Por lo tanto, el INT (RND * 100) producirá un número entre 0 y 99, y el valor de Int (Rnd * 100) 100 producirá un número entre 100 y 199.Finally, el programa utiliza If ... Then ... Else para comprobar si la contraseña generada es igual la contraseña real o no. Si son iguales, las contraseñas proceso de generación se terminarán definiendo la propiedad Timer1.Enabled a falso.
El código
Public Class Form1
contraseña Dim As Integer Dim crackpass como número entero
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick (remitente como objeto, e como EventArgs) Maneja Timer1.Tick
generar()
Si crackpass = contraseña A continuación,
Timer1.Enabled = False
Label1.Text = crackpass
MsgBox ( "contraseña Cracked! Inicio de sesión correcto!")
Otra cosa Label1.Text = crackpass
Label2.Text = "Por favor, espere ..."
Terminara si
End Sub
Sub generan ()
crackpass = Int (Rnd () * 100) + 100
End Sub
Private Sub Form1_Load (remitente como objeto, e como EventArgs) Maneja MyBase.Load
password = 123
End Sub
End Class
La salida
vb2013_figure16.2
Figura 16.2: Contraseña Generación de Fase
vb2013_figure16.3
Figura 16.3: Mensaje Mostrando Inicio de sesión correcto
Comentarios
Publicar un comentario