martes, 26 de octubre de 2010

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.

martes, 12 de octubre de 2010

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.



martes, 5 de octubre de 2010

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

martes, 28 de septiembre de 2010

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.

martes, 14 de septiembre de 2010

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)