PROGRAMACI“N VISUAL BASIC

  • View
    221

  • Download
    1

Embed Size (px)

DESCRIPTION

Aquí encontraras pistas y claves que te ayudaran a programar en el futuro conoce comandos fáciles y sencillos para que la programación se vuelva una herramienta eficaz en tu trabajo tus reuniones hasta en tu casa descubrirás que la programación no es tan difícil

Text of PROGRAMACI“N VISUAL BASIC

  • PROGRAMACIN

    VISUAL BASIC PROGRAMAS BSICOS PARA APRENDER A PROGRAMAR

    Aqu encontraras pistas y claves que te ayudaran a programar en el futuro conoce

    comandos fciles y sencillos para que la programacin se vuelva una herramienta

    eficaz en tu trabajo tus reuniones hasta en tu casa descubrirs que la programacin

    no es tan difcil

  • ndice

    1. Introduccin

    2. Herramientas

    2.1 Herramientas a usar

    2.1.1 TextBox

    2.1.2 Lavel

    2.1.3 Button

    3. Programas

    3.1 4 operaciones

    3.2 calculadora

    3.3 horas minutos y segundos

    3.4 das horas minutos y segundos

    3.5 dlares a euros

    3.6 convertidor de monedas

    3.7 rea del triangulo

    3.8 rea y permetro del triangulo

    3.9 rea y permetro del cuadrado

    3.10 rea y permetro del rombo

    3.11 rea y permetro del rectngulo

    3.12 rea y permetro del circulo

    3.13 escala de notas

    3.14 positivo negativo

    3.15 par impar

    3.16 tablas de multiplicar

    3.17 figuras geomtricas

    3.18 factura

    4. Zona de Juegos

  • 1. Introduccin

    Microsoft Visual Studio

    Microsoft Visual Studio es un entorno

    de desarrollo integrado (IDE, por sus

    siglas en ingls) para sistemas

    operativos Windows. Soporta varios

    lenguajes de programacin tales como

    Visual C++, Visual C#, Visual J#, y

    Visual Basic .NET, al igual que entornos

    de desarrollo web como ASP.NET.

    aunque actualmente se han desarrollado

    las extensiones necesarias para muchos

    otros.

    Visual Studio permite a los

    desarrolladores crear aplicaciones,

    sitios y aplicaciones web, as como

    servicios web en cualquier entorno que

    soporte la plataforma .NET (a partir de

    la versin .NET 2002). As se pueden

    crear aplicaciones que se

    intercomuniquen entre estaciones de

    trabajo, pginas web y dispositivos

    mviles.

    2. Herramientas

    La barra de herramientas estndar de

    Visual Basic es otro componente de

    Visual Basic es donde tienen agrupaos

    los botones utilizados con frecuencia

    La barra de herramientas no estndar

    dentro de visual Basic es donde se

    agrupan la gran mayora de objetos

    y controles que se incluirn en nuestro

    proyecto.

  • 2.1 Herramientas a usar

    2.1.1 TextBox

    El control TextBox o Caja de texto se

    utiliza para Ingresar y/o visualizar

    Texto (es un control de entrada de

    datos)

    La propiedad principal de este control

    se llama Text. Mediante ella podemos

    asignarle un texto ya sea en tiempo de

    diseo o tiempo de ejecucin al control.

    2.1.2 Label

    Este componente se utiliza para

    desplegar textos o mensajes estticos

    dentro de las formas, textos tales

    como encabezados, solicitud al usuario

    del programa para que proporcione

    algn dato o informacin(edad, dame

    sueldo, etc.), en cierta forma hace las

    funciones de printf, cout, writeln,

    print, display, etc., pero solo cuando se

    consideran en su parte de mensajes.

    2.1.3 Button

    Este control " Botn de comando ", nos

    permite ejecutar alguna rutina, funcin

    o procedimiento, generalmente en el

    evento click del mismo, para realizar de

    esta manera alguna tarea dentro del

    programa

    Como se dijo, se utiliza generalmente

    en el evento Click par ejecutar alguna

    accin cuando se produce dicho evento,

    y es precisamente el evento Click, el

    que por defecto aade Visual Basic al

    control

  • 3. Programas

    Los programas que vamos a realizar son muy fciles y sencillos solo

    utilizaremos las 3 herramientas anterior mente comentadas

    Lo primero que siempre aremos es darle la forma al programa comenzaremos

    diseando la forma de nuestro programa a conveniencia

    3.1 Programa las 4

    operaciones bsicas

    Lo primero ser crear el formato

    En este he usado las 3 herramientas

    De las que hemos estado hablando

    Ahora vamos al cdigo

    Lo que tenemos que hacer es

    Configurar los Buttons

    Y declarar variadles dependiendo del

    Programa

    Se ara eso usando el siguiente cdigo

    Damos doble clik en el button suma

    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)

    El button resta

    TextBox3.Text = Val(TextBox2.Text) - Val(TextBox1.Text)

    El button multiplication

    TextBox3.Text = Val(TextBox2.Text) Val(TextBox1.Text)

    El button divicion

    Lavel

    Button

  • TextBox3.Text = Val(TextBox2.Text) / Val(TextBox1.Text)

    Y el codigo final queda

    Public Class Form1

    Dim Text3 As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    Handles Button1.Click

    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)

    End Sub

    Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs)

    Handles Button2.Click

    TextBox3.Text = Val(TextBox2.Text) - Val(TextBox1.Text)

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    Handles Button3.Click

    TextBox3.Text = Val(TextBox2.Text) * Val(TextBox1.Text)

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    Handles Button4.Click

    TextBox3.Text = Val(TextBox2.Text) / Val(TextBox1.Text)

    End Sub

    End Class

    3.2 Calculadora

    Disearemos el programa

    Despus de a ver diseado la

    calculadora vamos a programar

    Comenzaremos con los nmeros

    Damos doble clik en el button 0

    Y escribiremos lo siguiente

    TextBox1.Text = TextBox1.Text & "0"

    Aremos eso con todos lo numero

    Ahora vamos a los buttons de suma,

    resta, multiplicacin y divisin

    En el button suma escribimos

  • OPE = 1 DATO = Val(TextBox1.Text) TextBox1.Clear() BT2.Enabled = True

    En el button resta

    OPE = 2 DATO = Val(TextBox1.Text) TextBox1.Clear() BT2.Enabled = True

    En el button multiplication

    OPE = 3 DATO = Val(TextBox1.Text) TextBox1.Clear() BT2.Enabled = True

    En el button division

    OPE = 4 DATO = Val(TextBox1.Text) TextBox1.Clear() BT2.Enabled = True

    Despus el button del igual

    DATO2 = Val(TextBox1.Text) If OPE = 1 Then RESUL = DATO + DATO2 TextBox1.Text = RESUL BT2.Enabled = True Else If OPE = 2 Then RESUL = DATO - DATO2 TextBox1.Text = RESUL BT2.Enabled = True Else If OPE = 3 Then RESUL = DATO * DATO2 TextBox1.Text = RESUL BT2.Enabled = True Else If OPE = 4 Then RESUL = DATO / DATO2 TextBox1.Text = RESUL BT2.Enabled = True End If End If End If End If

    Despus el button de borrar

  • TextBox1.clear ()

    Al inicio del programa declararemos las siguientes variables

    Dim DATO As Double Dim DATO2 As Double Dim RESUL As Double Dim OPE As Double Dim PUN As Double

    3.3 Horas a minutos y segundos

    Los siguientes programas son variaciones de los cdigos que ya hemos visto

    El cdigo

    Private Sub cal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cal.Click COMBER = Val(TextBox1.Text) TextBox2.Text = COMBER * 60 TextBox3.Text = COMBER * 3600 End Sub Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub Private Sub l1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles l1.Click TextBox1.Clear() TextBox2.Clear() TextBox3.Clear() End Sub

  • Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged COMBER = Val(TextBox1.Text) End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click End Sub End Class

    3.4 Das horas minutos y segundos

    Cdigo

    Public Class Form1 Dim COMBER As Double Private Sub cal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cal.Click COMBER = Val(TextBox4.Text) TextBox1.Text = COMBER * 24 TextBox2.Text = COMBER * 1440 TextBox3.Text = COMBER * 86400 End Sub Private Sub l1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles l1.Click TextBox1.Clear() TextBox2.Clear() TextBox3.Clear()

  • TextBox4.Clear() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label4.Click End Sub End Class

    3.5 Dlares a Euros

    Cdigo

    Publ