Para los que pensaban que me había dedicado exclusivamente a java… no es así. Sigo tratando de actualizarme con las diferentes tecnologías, aunque estas no tengan que ver con lo que actualmente estoy trabajando.

Siento que si te dedicas al mundo del desarrollo, hay que estar continuamente actualizado de las diferentes herramientas que te rodean.

Al final, en la vida todo lo aprendido sirve de algo. Ya sea que por ejemplo lanzo una empresa de desarrollo de software y debido a que tengo diferentes conocimientos pueda adecuar cada proyecto a la tecnología correspondiente.

En fin, solo los invito a probar Microsoft Visual Studio 2010 con el framework 4 que al final es lo más importante, así sean programadores de php, cobol, java, c++ o f#.

Pueden descargar Microsoft Visual Studio 2010 Express desde el siguiente link:

http://www.microsoft.com/express/Windows/

Las descargas son las siguientes:

Microsoft^® Visual Web Developer^® 2010 Expres

Microsoft® Visual Basic® 2010 Express

Microsoft^® Visual C#^® 2010 Express

Microsoft^® Visual C++^® 2010 Express

Si alguien va a empezar desarrollando, en alguna de estas versiones… les aconsejo C++ o C# para evitar futuros traumas en su migración a Java u otro lenguaje similar.

Como conectar MySQL a Visual Studio 2008.

1. Descargar el cliente MySQL para .net, que es una DLL.

Lo encontraras aquí: http://dev.mysql.com/downloads/connector/net/

2. Anadir la dll al proyecto en el que lo deseas ocupar la base de datos MySQL.

3. Anadir el string de conexión al web config.

<connectionStrings>
    <add name="Connstring" connectionString="server=localhost; userid=uid;password=pwd;pooling=yes;Database=DB" providerName="MySql.Data.MySqlClient"/>
  </connectionStrings>
  <system.data>
    <DbProviderFactories>
      <add name="MySQL Data Provider" invariant="MySql.Data.MySqlClient" description=".Net Framework Data Provider for MySQL" type="MySql.Data.MySqlClient.MySqlClientFactory, MySql.Data, Version=5.0.2.0, Culture=neutral, PublicKeyToken=c5687fc88969c44d"/>
    </DbProviderFactories>
  </system.data>

algún comentario?

Tengo dos vouchers que sirven para hacer prácticamente cualquier examen de una certificación de Microsoft(a los ganadores les enviare los exámenes que pueden realizar), estos vencen el 30 de Junio por lo que en el blog publicare a los ganadores el día 31 de Mayo para que tengan un tiempo relativamente prudente para hacer la certificación(es de escoger en la que tengan más conocimientos), las bases son simples solo dejen un comentario, no se olviden de poner su mail y su nombre.

Los exámenes se realizan en un Centro Prometric así que verifiquen cual les queda cerca.

En lo que me basare para escoger a los ganadores aun no lo sé , puede ser al azar, por el comentario o les asignare un numero a cada uno.

Gracias por visitar mi blog y suerte a todos.

Vouchers gracias a Oscar Calderon.

Buenas a todos los que leen este blog , he recibido este correo que esta muy interesante para todos los que se quieran iniciar en Visual Basic .Net.

Hola! Buenos dias a todos gracias por recibir mi atencion de trabajo y de estudio para los que no me conocen soy Oscar Ortiz; Microsoft Student Partners para Colombia; mi intension en este caso es acercar a las personas a las tecnologías, en este caso las de Microsoft; para tal fin he creado un espacio tipo webcast para en forma de exposicion – presentacion ver temas basicos de desarrollo de aplicaciones con VB .Net; donde abordaremos temas basicos.

Soy Bogotano; trabajo como desarrollador de software en una empresa intermediaria de seguros; estudio en la Universidad del Tolima; estudiante de 8 semestre de ingenieria de sistemas; interesado en promover la tecnologia y lo mas importante ofrecer mi conocimiento para otros a fin de mejorar este pais; tan necesarios de cambios.

Y el evento también se puede visualizar aquí:

http://www.facebook.com/event.php?eid=48814253750

mi contacto del face http://www.facebook.com/home.php#/profile.php?id=582517171&ref=profile

Para tal fin vamos a iniciar con un curso basico de Visual Basic .Net.

Agenda de Estudio

Martes 10 de Febrero; Introduccion a Visual Studio 2008 – Sintasix de Visual Basic .net

Miercoles 11 de Febrero: Programacion Orientada a Objetos con Visual Basic .net

Jueves 12 de Febrero: POO; Aplicaciones para Windows;

Viernes 13 de Febrero: Aplicaciones Windows II – Aplicaciones Web.

Lunes 16 de Febrero: Aplicaciones web con VB .Net

Martes 17 de Febrero: Ado .Net y WebServices (interoperabilidad).

Bueno aunque los temas son muy extensos; los temas a ver son bastante someros para lo cual en el transcurso del curso; dare algunos enlaces web; para aquellas personas que deseen ahondar en el estudio de las tecnologias de .Net.

Dependiendo del interes y exito del curso basico; en Enero podriamos pensar en otra actividad mas profunda para el estudio de .Net.

Bueno pero como en todo estudio tambien depende de un compromiso.

Lo unico que deben tener para el curso es disposicion en horas de la noche; del 10 al 17 de Febrero de 2009 en horas de la noche; 7 pm (Hora Colombia, -5 Gtm).

· Un equipo de computo; con acceso a Internet y Audio; opcional tener microfono.

· Tener Visual Studio 2008 Express Edition el cual puede ser descargado de www.microsoft.com/express en la version de idioma que deseen (Espanol; Ingles). Para el curso preferiblemente Visual Basic .net y Webdeveloper.

Para el acceso a la plataforma para las charlas virtuales; es necesario que tengan instalado un cliente. (deben descargarlo de un sitio que genera Microsoft y que sera enviado a su correo electronico).

Software para las charlas virtuales

Debes bajar este cliente: http://download.microsoft.com/download/4/f/7/4f712b94-c6a5-4a66-ad8f-53e04085b939/LMSetup.exe (Si no lo tienes)

Documentos de guia de la plataforma: http://www.microsoft.com/downloads/details.aspx?displaylang=es&FamilyID=2cbfd726-dd67-4fec-8fce-6012ea4c515f

Temas para ir estudiando

www.dce2005.com temas basicos de .Net

Como Inscribirse:

Enviar un correo electrónico a oscardo@student-partners.com con los datos personales.

Para su fácil lectura la líneas de código donde utilizo la sentencia if irán de color verde, este código pueden copiarlo y pegarlo todo en una aplicación de consola en Visual Basic .Net 2003, 2005 o 2008.

Una sugerencia para que puedan entender el código seria copiarlo de aquí a Visual Basic para que tengan los espacios adecuados y así comprenderlo mejor.

El if Sencillo se utiliza así:

Module modPrueba

Sub Main()

Dim Num1 As Integer = 9

Dim num2 As Integer = 0

Dim resultado As String

If Num1 > num2 Then resultado = "Numero 1 es mayor que Num 2"

System.Console.WriteLine("{0}", resultado)

Console.ReadLine()

End Sub

End Module

————————————————————————————————————————-

La siguiente forma de utilizarlo es:

Module modPrueba

Sub Main()

Dim Num1 As Integer = 9

Dim num2 As Integer = 0

Dim resultado As String

If Num1 > num2 Then

resultado = "Numero 1 es mayor que Numero 2"

resultado &= " y la operacion ha salido perfecta"

End If

System.Console.WriteLine("{0}", resultado)

Console.ReadLine()

End Sub

End Module

————————————————————————————————————————-

Aquí utilizamos el Else en la sentencia IF:

Module modPrueba

Sub Main()

Dim Num1 As Integer = 9

Dim num2 As Integer = 0

Dim resultado As String

If Num1 > num2 Then

resultado = "El numero 1 es mayor que el numero 2"

Else

resultado = "El numero no es mayor que el numero 2"

End If

System.Console.WriteLine("{0}", resultado)

Console.ReadLine()

End Sub

End Module

————————————————————————————————————————-

Sentencias If anidadas:

Module modPrueba

Sub Main()

Dim Num1 As Integer = 9

Dim Num2 As Integer = 0

Dim Resultado As String

If Num1 > 0 Then

If Num1 > Num2 Then

Resultado = "Numero 1 es mayor que el Numero 2"

Else

Resultado = "Numero 1 no es mayor que el Numero 2"

End If

End If

End Sub

End Module

————————————————————————————————————————-

La estructura ElseIf es la siguiente:

Module modPrueba

Sub Main()

Dim Num1 As Integer = 9

If Num1 > 0 Then

Console.WriteLine("El numero 1 es mayor que 0")

ElseIf Num1 = 0 Then

Console.WriteLine("El numero 1 es igual a 0")

ElseIf Num1 < 0 Then

Console.WriteLine("El numero 1 es menor que 0")

End If

Console.ReadLine()

End Sub

End Module

      En este post hablare de los flujos de entrada y de salida en Consola, todo el código está escrito para Visual Basic.Net o Visual Basic 2005.

Los flujos de Entrada son los siguientes:

System.Console.Read()

System.Console.Readline()

¿Cuál es la diferencia entre el Read y el Readline?

Que el Readline lee toda una línea de texto mientras para el Read podemos usar conversiones para que leamos por ejemplo son un carácter.

Los flujos de Salida son los siguientes:

System.Console.Writeline()

System.Console.Write()

Estos métodos se ocupan de la siguiente manera:

System.Console.Writeline(“La programación es lo mejor”)

System.Console.Write (“La programación es lo mejor”)

¿Cuál es la diferencia entre el Writeline y el Write?

Bueno la diferencia es que el Write escribe y no pasa a la línea siguiente, mientras que Writeline escribe toda la línea pasando a la línea siguiente un ejemplo es el siguiente:

Dim Nombre as String

System.Console.Writeline(“Digite Su Nombre: “)

Nombre = System.Console.Readline

Entonces esto a nivel de consola quedaría así:

Digite Su nombre:

Jose Benjamin Zepeda Portillo

Mientras que si ocupo el Write seria así:

Dim Nombre as String

System.Console.Write (“Digite Su Nombre: “)

Nombre = System.Console.Readline

Tomando la variable nombre el String = Jose Benjamin Zepeda Portillo

Entonces esto a nivel de consola quedaría así:

Digite Su nombre: Jose Benjamin Zepeda Portillo

Tomando la variable nombre el String = Jose Benjamin Zepeda Portillo

¿Qué son los flujos de salida con formato?

Un flujo con formato no sería más que el siguiente ejemplo:

Dim Nombre as String = “Benjamin”

Dim Edad as Byte = 21

Dim Apellido as String = ”Zepeda”

System.Console.Writeline(“Su nombre completo es: {0} {1} y tiene {2} años “,Nombre, Apellido, Edad)

Entonces esto a nivel de consola quedaría así:

Su nombre completo es: Benjamin Zepeda y tiene 22 años de edad

*Es de recordar que el orden debe ser el mismo, si le hemos aplicado al corchete {0} {1} entonces la primer variable ira en el puesto 0, la segunda variable en el puesto 1 y así sucesivamente.

Entonces:

Posición: Posición 0,1,2 y así sucesivamente.

Ancho (Opcional): Mínimo Numero de posiciones para la salida, pero si el ancho se omite entonces o especificamos un valor máximo entonces el ancho incrementa automáticamente.

Tipo (Opcional): Es uno de los caracteres mostrado en la tabla de abajo.

Decimales (Opcional): Aquí se especifica el número de dígitos a mostrar en el caso de enteros o de decimales en el c

aso de fraccionarios.

Cuando este se especifica se escribe a continuación de tipo, sin espacios en blanco.

Entonces aplicando todo lo anterior podemos obtener el siguiente ejemplo:

———————————————————————————————————————————–

Module modPrueba

Sub Main()

'Declarando Variables

Dim Nombre As String

Dim Apellido As String

Dim Edad As Byte

'Flujo de Salida

System.Console.Write("Digite su Nombre: ")

'Flujo de Entrada

Nombre = System.Console.ReadLine()

System.Console.Write("Digite su Apellido: ")

Apellido = System.Console.ReadLine()

System.Console.Write("Digite su Edad: ")

Edad = System.Console.ReadLine()

'Flujo de Salida con Formato

System.Console.WriteLine("Su nombre completo es: {0} {1} y tiene {2} años ", Nombre, Apellido, Edad)

System.Console.ReadLine()

End Sub

End Module

*Todo el código fuente utilizado puede ser copiado y pegado sin que de error en Visual Basic.Net y Visual Basic 2005.

El cuadro ha sido obtenido de:  El Lenguaje de Programación Visual Basic.Net    de Ceballos Sierra Francisco Javier

        Aqui estan estos pasos que necesitara para empezar una aplicacion de mantenimiento a bases de Datos MySQL desde Visual Studio, para estos pasos pondre de ejemplo VB Express.

Etapa 1: Descargas

1- Descargar Visual Basic Express AQUI

2- Descargar MySql 5.0 AQUI

3- Descargar el Conector de Mysql para .net AQUI

Etapa 2: Instalaciones

4-Instalar Visual Basic Express

5- Instalar Mysql

6- Instalar Conector de MySQL para .NET

*Opcional: Instalar alguna herramienta para interfaz de MySQL

Etapa 3: Ajustes

7- Abrir Visual Basic

8- En la ficha Data de Visual Basic hacer click derecho y dar click en escoger items

9- Buscar los objetos de Mysql y dar click en aceptar

10- Tratar a Mysql como cualquier base de datos (SQLserver, Access)

Uno: Crear interfarces e implementarlas.

Dos: Las DLL

Tres:Haciendo Referencias a una DLL

Espero que en unos días cuando termine la competencia de Algoritmos de la IC pueda tener mas tiempo.

Los proyectos están aquí:

El proyecto Completo con código en VB 2005.

La DLL generada de las funciones para los que quiera únicamente hacer la referencia.

         Buenas, debido a pequeños proyectos que he tenido que realizar no me ha quedado tiempo de actualizar este humilde blog, asi que hoy lo hare con un proyecto muy interesante y a la vez entretenido, enviar un email desde una aplicacion creada en Visual Studio, y en esta oportunidad debido a intereses propios usare c#.

En este proyecto enviare un email simple, quizas cuando tenga tiempo lo haga mejor, el servidor que utilizare sera el de gmail aunque ustedes pueden modificarlo para enviarlo desde su cuenta de yahoo o hotmail por ejemplo.

Solo necesitaran un formulario.

Una caja de texto para el usuario del email

Una caja de texto para la contraseña del usuario

Una caja de texto para el campo de "to"

Una caja de texto para el campo de "subject"

Una caja de texto para el contenido del email "body"

Lo primero que deberan utilizar es la libreria mail ubicada en:

System.Net.Mail

para usar el namespace en c# deberan agregar el codigo siguiente(es opcional) donde se declaran los namespaces que utilizaremos en el proyecto.

using System.Net.Mail;

Luego agregar un boton para enviar el email, aunque pueden hacerlo desde una clase aparte, como repito debido al tiempo lo hare lo mas simple posible.

//Boton Para Enviar Email 

private void btnEnviar_Click(object sender, EventArgs e) 

{ 

//Declarando Variables 

string From; 

string To; 

string Message; 

string Subject; 

string smtpServer; 

System.Net.Mail.MailMessage Email; 

//Aplicando los campos a cada variable 

From = this.txtDe.Text; 

To = this.txtPara.Text; 

Message = this.txtTextoEmail.Text; 

Subject = this.txtSubject.Text; 

//Establesco El Email 

Email = new System.Net.Mail.MailMessage(From, To, Subject, Message); 

System.Net.Mail.SmtpClient smtpMail = new System.Net.Mail.SmtpClient("smtp.gmail.com"); 

Email.IsBodyHtml = false; 

smtpMail.EnableSsl = true; 

smtpMail.UseDefaultCredentials = false; 

smtpMail.Host = "smtp.gmail.com" 

smtpMail.Port = 25; 

smtpMail.Host = "smtp.gmail.com" 

smtpMail.Credentials = new System.Net.NetworkCredential(this.txtDe.Text, txtContraseña.Text); 

//smtpMail.ClientCertificates. 

smtpMail.Send(Email); 

}

Bueno como podran observar no es la gran cantidad de codigo, pero explicare el codigo por bloques para su comprension.

//Declarando Variables 

string From; 

string To; 

string Message; 

string Subject; 

string smtpServer; 

System.Net.Mail.MailMessage Email; 

Aqui lo que se hace es declarar las variables que utilizare para enviar un email.

-------------------------------------------------------------------------------------------------------------------------

//Aplicando los campos a cada variable

From = this.txtDe.Text; 

To = this.txtPara.Text; 

Message = this.txtTextoEmail.Text; 

Subject = this.txtSubject.Text; 

Aqui lo que se hace es pasarle los campos que ha introducido al usuario al email.

Deben de cambiar el nombre de los cuadros de texto por el que ustedes le han puesto.

//Establesco El Email, y le paso las variables que introdujo el usuario

Email = new System.Net.Mail.MailMessage(From, To, Subject, Message); 

//creo el objeto smtp e introdusco el host que en este caso he utilizado el de gmail

System.Net.Mail.SmtpClient smtpMail = new System.Net.Mail.SmtpClient("smtp.gmail.com"); 

//Establesco que no es html el cuerpo del email

Email.IsBodyHtml = false; 

//Establesco que usare seguridad

//ssl = Secure Sockets Layer

smtpMail.EnableSsl = true; 

smtpMail.UseDefaultCredentials = false; 

//Establesco el puerto del email en este caso el 25

smtpMail.Port = 25; 

//Coloco las credenciales, coloco el usuario y contraseña que introdujo el usuario 

smtpMail.Credentials = new System.Net.NetworkCredential(this.txtDe.Text, txtContraseña.Text); 

p>

//Envio el email

smtpMail.Send(Email); 

DESCARGAR CODIGO FUENTE

Algunos links interesantes acerca de las librerias y palabras vistas en este proyecto, les dejo a sus conocimientos el que mejoren este codigo con un archivo adjunto y una mejor experencia para el usuario.

Las librerias que uso aqui son las mismas para visual basic, asi que no tendran ningun problema en aplicarlo para Visual Basic.

*He utilizado VS 2005 no se si faltara alguna de estas librerias en VS 2003

http://es.wikipedia.org/wiki/Transport_Layer_Security

http://msdn2.microsoft.com/en-us/library/system.net.mail.aspx

  Buenas, en este post hare un pequeño ejemplo de la comunicacion sin conexion usando el protocoloo UDP por el cual puedo enviar datagramas en la red sin necesidad de haber establecido una conexion al contrario de el otro protocolo TCP.

¿Que puertos utilizamos?

Desde Wikipedia podemos obtener esto:

Puertos

UDP utiliza puertos para permitir la comunicación entre aplicaciones. El campo de puerto tiene una longitud de 16 bits, por lo que el rango de valores válidos va de 0 a 65.535. El puerto 0 está reservado, pero es un valor permitido como puerto origen si el proceso emisor no espera recibir mensajes como respuesta.

Los puertos 1 a 1023 se llaman puertos "bien conocidos" y en sistemas operativos tipo Unix enlazar con uno de estos puertos requiere acceso como superusuario.

Los puertos 1024 a 49.151 son puertos registrados.

Los puertos 49.152 a 65.535 son puertos efímeros y son utilizados como puertos temporales, sobre todo por los clientes al comunicarse con los servidores.

¿Como hacer la conexion por medio del protocolo UDP?

Bueno suponiendo que han leido ya sobre UDP y datagramas y sockets en general empezare con el codigo, debido a intereses personales volvere a usar c# en este ejemplo, aunque como la mayoria saben no hay un cambio significativo de comprension para que lo pasen a Visual Basic.

Lo primero que haremos es crear una nueva solucion con el nombre que crean conveniente, luego agregar un proyecto de libreria de clases donde ira el siguiente codigo:

using System;

using System.Collections.Generic;

using System.Text;

using System.Net.NetworkInformation; //Necesaria para usar el NetworkInterface

using System.Net.Sockets; //Necesaria para usar el UDPClient, AddressFamily

using System.Net; //Necesaria para usar el IPEndPoint,IPAddress

namespace libDatagramas

{

public class clsPaquetes

{

//Declarando Variables

private string _MensajeTexto;

byte[] Mensaje = new byte[1024]; 

private NetworkInterface[] ni = NetworkInterface.GetAllNetworkInterfaces(); 

System.Net.Sockets.UdpClient Cliente = new System.Net.Sockets.UdpClient(11000,AddressFamily.InterNetwork); 

//Propiedad para obtener el mensaje que envia 

public string MensajeTexto

{

get { return _MensajeTexto; }

set { _MensajeTexto = value; }

} 

//Este void sirve para enviar paquetes por medio de datagramas 

public void MensajeParaEnviar()

{ 

//Obtengo los bytes debido a que el envio de paquetes por medio de datagrama es en bytes

Mensaje = Encoding.ASCII.GetBytes(_MensajeTexto); 

//Establesco los puertos

System.Net.IPEndPoint ipEndPoint = new System.Net.IPEndPoint(ni[0].GetIPProperties().UnicastAddresses[0].Address, 11000); 

//Envio el paquete por medio de datagramas

Cliente.Send(Mensaje, Mensaje.Length, ipEndPoint); 

} 

//Por medio de este void obtengo el paquete que he enviado anteriormente por medio de datagramas

public string ObtenerMensaje()

{ 

IPEndPoint sender = new IPEndPoint(IPAddress.Any, 11000);

Mensaje = Cliente.Receive(ref sender); 

//Obtengo el string debido a que el envio de paquetes por medio de datagrama es en bytes

string MensajeFinal = Encoding.ASCII.GetString(Mensaje); 

//Retorno el mensaje obtenido

return MensajeFinal.ToString();

}

}

}

Bueno en el ultimo corchete termina la clase necesaria, ustedes pueden compilarla y utilizar el binario como una referencia para aplicarla en cualquier programa.

Bueno la interfaz es lo ultimo, y lo inico que se necesita seria 1 listbox donde aparece el mensaje recibido y un cuadro de texto donde se escribe el mensaje a enviar ademas de un boton para enviar el mensaje y uno para recibir.

El proposito de este ejemplo es aprender es por eso que todo esta en una sola pantalla, hay varias formas de recibir los mensajes sin necesidad de presionar el boton.

Lo que haremos es a la solucion anterior agregar un nuevo proyecto, y en este caso utilizaremos un proyecto de aplicacion windows.

1- Hacer la referencia a la libreria de clases creada anteriormente o si ya la compilaron a una DLL.

2- Escribir el codigo siguiente(con su nombre de proyecto, libreria etc…)

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Text;

using System.Windows.Forms; 

namespace WinAppliDatagramas

{

public partial class frmDatagramas : Form

{

public frmDatagramas()

{

InitializeComponent();

}

//Instancia de la la clase paquetes

libDatagramas.clsPaquetes DataGramas = new libDatagramas.clsPaquetes(); 

//Boton para comprobar si hay algun mensaje 

private void btnRecibirMensajes_Click(object

sender, EventArgs e)

{

string MensajeObtenido;

MensajeObtenido = DataGramas.ObtenerMensaje(); 

this.lstMensajesObtenidos.Items.Add(MensajeObtenido);

} 

//Boton para enviar mensajes

private void btnEnviarMensaje_Click(object sender, EventArgs e)

{

//Envio el mensaje que hay en el textbox

DataGramas.MensajeTexto = this.txtMensajeParaEnviar.Text; 

DataGramas.MensajeParaEnviar(); 

txtMensajeParaEnviar.Text = "" 

}

}

}

Bueno eso es todo, si quieren descargar el proyecto que esta escrito en c# lo pueden hacer desde el area de descargas.

              Este dia daré un breve ejemplo de cómo hacer un archivo de configuración para alguna aplicación que creemos en el entorno Visual Studio, y si… dígito entorno debido que para hacer usar este excelente recurso se necesitan unas tres líneas de código y todo lo demás en el entorno de Visual Studio.

Muchos han escuchado hablar de la serializacion XML, es entretenida hacerla por código… pero hay muchos que por cuestión de tiempo no la han utilizado, pues para todos los que la quieren aprender de una forma fácil y que es 100% funcional en cualquier aplicación en este post pondré la forma sencilla de realizarla.

¿Para qué sirve un archivo de configuración?

Un archivo de configuración se puede realizar para muchas cosas que realmente le dan una funcionalidad muy poderosa a un programa, por ejemplo guardar el tipo de fuente establecido, el tipo de color establecido, un campo de texto en específico.

Los archivos de configuración comunes en el entorno de Microsoft Office, es opciones, que es donde se elije el tipo de letra predeterminada, tipo de página, tipo de bordes entre otros.

Para realizar este ejemplo utilizare:

Un formulario Windows

Cinco Botones

2 Cajas De Texto

5 Label

1 Color Dialog

1 Font Dialog

*El ejemplo esta realizado en Visual Basic 2005

Pasos:

1-Ir al menú:

Project->Propiedades Del Proyecto

Luego busquen Settings:

—Explicando Los campos:

Name: Aquí ira el nombre de la opción.

type: Aquí ira el tipo de variable a guardar.

Scope: El alcance de la serializacion

Value: El valor de la variable

2- Creamos 4 nuevos settings:

1-

Name = ColorDeFondo

Type = System.Drawing.Color

Scope = User

Value = El que deseen

2-

Name = ColorDeTexto

Type = System.Drawing.Color

Scope = User

Value = El que deseen

3-

*Name = Firma

Type = String

Scope = User

Value = Lo que deseen

4-

Name = TipoDeLetra

Type = System.Drawing.Font

Scope = User

Value = La que deseen

3- Dibujamos el formulario

4- Pegamos el Siguiente Código

Public Class frmMiniNotepad 

Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click, Label1.Click 

End Sub 

Private Sub btnColorFondo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnColorFondo.Click 

'Se selecciona el color que el usuario escogio 

Me.ColorDialog1.ShowDialog() 

Me.btnColorFondo.BackColor = ColorDialog1.Color 

End Sub 

Private Sub btnColorTexto_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnColorTexto.Click 

'Se selecciona el color que el usuario escogio 

Me.ColorDialog1.ShowDialog() 

Me.btnColorTexto.BackColor = ColorDialog1.Color 

End Sub 

Private Sub btnTipoDeLetra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTipoDeLetra.Click 

'Se selecciona el tipo de letra que el usuario escogio 

Me.FontDialog1.ShowDialog() 

Me.txtTipoDeLetra.Font = FontDialog1.Font 

End Sub 

Private Sub btnNuevoDocumento_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnNuevoDocumento.Click 

'Se limpia el textbox 

Me.txtNotePad.Text = String.Empty 

'Se crea el textbox con los datos del archivo de configuracio 

Me.txtNotePad.BackColor = My.MySettings.Default.ColorDeFondo 

Me.txtNotePad.Font = My.MySettings.Default.TipoDeLetra 

Me.txtNotePad.ForeColor = My.MySettings.Default.ColorDeLetra 

Me.txtNotePad.Text = " " & My.MySettings.Default.Firma 

End Sub 

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

'Se cargan los datos del archivo de configuracion XML 

Me.btnColorTexto.BackColor = My.MySettings.Default.ColorDeLetra 

Me.btnColorFondo.BackColor = My.MySettings.Default.ColorDeFondo 

Me.txtTipoDeLetra.Font = My.MySettings.Default.TipoDeLetra 

Me.txtFirma.Text = My.MySettings.Default.Firma 

End Sub 

Private Sub btnGuardarDatos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGuardarDatos.Click 

'Se pasan los datos al archivo de configuracion 

My.MySettings.Default.ColorDeLetra = Me.btnColorTexto.BackColor 

My.MySettings.Default.ColorDeFondo = Me.btnColorFondo.BackColor 

My.MySettings.Default.TipoDeLetra = Me.txtTipoDeLetra.Font 

My.MySettings.Default.Firma = Me.txtFirma.Text 

'En este punto del codigo se guarda la configuracion 

My.MySettings.Default.Save() 

End Sub 

End Class 

Al final El funcionamiento sera el siguiente:

Para ver el verdadero poder, creen la firma, color, tipo de letra y guardenlo, luego cierren la aplicacion, apaguen la computadora, y cuando vuelva a correr la aplicacion veran que los valores aun siguen ahi.

*Modificar los nombres de los botones y cajas de texto por que han utilizado ustedes.

El Codigo pueden Descargarlo desde AQUI y esta desarrollado en VIsual Basic 2005.