Conexion a MySql

Lo primero tenemos que hacer es descargar el siguiente archivo conector de mysql con vb.net; una ves descargado lo descomprimimos y lo guardamos en una carpeta

Después lo que tenemos que hacer es dar clic derecho en el proyecto y clic en agregar referencia

Después le damos clic en examinar y nos vamos donde guardamos la carpeta nos vamos a la carpeta bin y seleccionamos el archivo MySql.Data.dll

Bueno ahora comenzamos a programar vamos a copiar los siguientes codigos

en ves de "localhost" pueden poner la ip del servidor donde se encuentra la base de datos en ves de "user" el nombre de usuario y en ves de "pwd" la contraseña del usuario bueno por lo demas uds ya saben que codigos usar ya que van a ser iguales a los que usan para SQL server con la unica diferencia que van a cambiar el sql por el mysql.

Conexion a SQL Server 2005

Conexión a Base de Datos

Para conectarnos a una base de datos de Microsoft SQL Server 2005 lo primero que debemos saber es el nombre del servidor donde esta alojada nuestra base de datos, el nombre de la base de datos y por ultimo el nombre y usuario del servidor.

Vamos a crear un proyecto y yo le pondré conexión a base de datos.

Ahora vamos a crear una cadena de conexión para eso vamos a proyecto, clic en propiedades de conexión a base de datos después clic en cofiguración, en donde dice tipo buscamos cadena de conexión, y en donde dice valor le damos clic en los puntos suspensivos y nos aparecera esta ventana:

Colocamos el nombre del servidor y despues el nombre de la base de datos.

y después le damos clic en probar conexión y nos debe salir la prueba de conexión de prueba se realizo correctamente.

después le damos clic en aceptar y aceptar en la ventana principal nos debe dar la cadena de conexión la cual vamos a copiar.

Bucles

Bucles

En otras circunstancias a la hora de escribir nuestras aplicaciones, nos podemos ver interesados o incluso obligados a utilizar bucles en nuestro código, con el fin y objetivo de evaluar expresiones y sentencias.

Esto es justamente lo que veremos a continuación.

1.- Bucles de repetición o bucles For

Es uno de los bucles más extendidos para recorrer una determinada porción de código un número de veces limitado. Si ese número de veces se convierte en ilimitado, se denomina bucle infinito y la ejecución del proceso se volvería eterna, por lo que es un tipo de bucle a controlar en nuestras aplicaciones.

La nomenclatura de uso de este tipo de bucle es de la siguiente manera:

For <variable> = <valor inicial> To <valor final> Step <salto> … Next

Un ejemplo nos ayudará a comprender esto de forma sencilla y práctica:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load Dim intValor As Integer = 5 Dim I As Integer, strCadena As String = "" For I = 1 To intValor strCadena += Chr(I + 64) Next MessageBox.Show(strCadena) End Sub

Este ejemplo en ejecución es el que puede observarse en la figura 3.15.

ejecución de un ejemplo de demostración del uso de un bucle For.

Como vemos en el ejemplo anterior, no hemos utilizado la palabra reservada Step ya que no es necesario utilizarla. A continuación veremos un ejemplo del uso de esta palabra reservada.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load Dim intValor As Integer = 5 Dim I As Integer, strCadena As String = "" For I = 1 To intValor Step 2 strCadena += Chr(I + 64) Next MessageBox.Show(strCadena) End Sub

Pero también podemos utilizar otro bucle, el bucle Do Until...Loop que nos permite ejecutar una o más sentencias de código, hasta que se cumpla una determinada condición. En este caso, la estructura del bucle sería de la forma:

Do

…

Loop  

Un ejemplo práctico del uso de este tipo de bucles sería el que se detalla a continuación:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load Dim intValor As Byte = 5 Dim intResultado As Byte Do Until intValor < 1 intResultado += intValor intValor -= 1 Loop MessageBox.Show(intResultado) End Sub

Control de Flujos

1.1.Operadores Logicos

Uno de los aspectos a tener en cuenta a la hora de hacer comparaciones, utilizar o seleccionar un camino o flujo u otro, es el uso de operadores lógicos y operadores relacionales.

En la tabla 3.3, podemos observar los operadores relacionales con su correspondiente descripción:

Operador relacional	Descripción
=	Da como resultado verdadero si las expresiones comparadas sin iguales
<	Da como resultado verdadero si la expresión de la izquierda es menor que la expresión de la derecha
>	Da como resultado verdadero si la expresión de la izquierda es mayor que la expresión de la derecha
<>	Da como resultado verdadero si la expresión de la izquierda es distinta que la expresión de la derecha
<=	Da como resultado verdadero si la expresión de la izquierda es menor o igual que la expresión de la derecha
>=	Da como resultado verdadero si la expresión de la izquierda es mayor o igual que la expresión de la derecha es verdadera
AndAlso	Da como resultado verdadero si las dos expresiones comparadas son verdaderas, con la particularidad de que evalúa la segunda parte de la expresión si la primera la cumple
OrElse	Da como resultado verdadero si una de las dos expresiones comparadas es verdadera con la particularidad de que si cumple la primera expresión, no continúa con la siguiente dando por verdadera la comparación lógica

1.2.If – Else – then

La construcción If…Then…Else, nos permite ejecutar una o más condiciones que podemos comparar utilizando operadores relacionales y operadores lógicos.

En este tipo de comparaciones, podemos comparar las condiciones de forma anidada o tan compleja como lo deseemos. Lo mejor es ver esto con un ejemplo práctico: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load Dim intValor As Integer = 5 If intValor > 5 Then MessageBox.Show("Valor mayor que 5") Else MessageBox.Show("Valor menor que 6") End If End Sub

1.1.Select – Case

La sentencia Select - Case se utiliza por lo general, para evaluar varios grupos de sentencias e instrucciones dependiendo del valor de la expresión a evaluar. Hay diferentes formas de utilizar esta sentencia, las cuales veremos a continuación:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles MyBase.Load

Dim intValor As Integer = 5

Select Case intValor

Case Is > 5

MessageBox.Show("Valor mayor que 5")

Case Is = 5

MessageBox.Show("Valor igual a 5")

Case Is < 5

MessageBox.Show("Valor menor que 5")

End Select

End Sub

En este ejemplo se van a seleccionar los números que son menores, iguales y mayores según sea el caso.

Tipos de Datos

Tipo de Visual Basic	Estructura de tipo Common  Language Runtime	Asignación de almacenamiento nominal	Intervalo de valores
Boolean	Boolean	En función de la plataforma de implementación	True o False
Byte	Byte	1 byte	0 a 255 (sin signo)
Char (carácter individual)	Char	2 bytes	0 a 65535 (sin signo)
Date	DateTime	8 bytes	0:00:00 (medianoche) del 1 de enero de 0001 a 11:59:59 p.m. del 31 de diciembre de 9999.
Decimal	Decimal	16 bytes	0 a +/-79228162514264337593543950335; el número distinto de cero más pequeño es +/- 0,0000000000000000000000000001
Double (punto flotante de precisión doble)	Double	8 bytes	-1,79769313486231570 a 4,94065645841246544
Integer	Int32	4 bytes	-2.147.483.648  a 2.147.483.647 (con signo)
Long (entero largo)	Int64	8 bytes	+/- 9 223 372 036 854 775 808
Object	Object (clase)	4 bytes en plataforma de 32 bits 8 bytes en plataforma de 64 bits	Cualquier tipo puede almacenarse en una variable de tipo Object
SByte	SByte	1 byte	-128 a 127 (con signo)
Short (entero corto)	Int16	2 bytes	-32.768 a 32.767 (con signo)
Single (punto flotante de precisión simple)	Single	4 bytes	+/- 3,4028235 a +/- 1,401298E
String (longitud variable)	String (clase)	En función de la plataforma de implementación	0 a 2.000 millones de caracteres Unicode aprox.
UInteger	UInt32	4 bytes	0 a 4.294.967.295 (sin signo)
ULong	UInt64	8 bytes	0 a 18.446.744.073.709.551.615 (1,8...E+19 †) (sin signo)
User-Defined (estructura)	(hereda de ValueType)	En función de la plataforma de implementación	Cada miembro de la estructura tiene un intervalo de valores determinado por su tipo de datos y es independiente de los intervalos de valores correspondientes a los demás miembros.
UShort	UInt16	2 bytes	0 a 65.535 (sin signo)