VISUAL BASIC BASICO – ACTIVIDAD INICIAL

VISUAL BASIC BASICO – ACTIVIDAD INICIAL

Grupo 201416_13

XIOMARA MONTENEGRO FORERO

COD. 1015993545

Presentado a:

JAIME RUBIANO LLORENTE

UNIVERSIDAD NACIONAL ABIERTA Y A DISTANCIA –UNAD

ESCUELA DE CIENCIAS BÁSICAS, TECNOLOGÍA E INGENIERÍA - ECBTI

PROGRAMA DE INGENIERÍA DE SISTEMAS

BOGOTÁ D.C .17 DE OCTUBRE  DE 2015

INTRODUCCION

Visual Basic está diseñado para la creación de aplicaciones de manera productiva con seguridad de tipos y orientado a objetos. Visual Basic permite a los desarrolladores centrar el diseño en Windows, la web y dispositivos móviles. Como ocurre con todos los lenguajes destinados a Microsoft .NET Framework, los programas escritos en Visual Basic se benefician de la seguridad y la interoperabilidad de los lenguajes.

Visual Basic es un lenguaje de programación que se ha convertido en uno de los más importantes y solicitados en las empresas de hoy en día, por esto es tan importante su conocimiento, ya que nos dará más herramientas para ser competitivos en el medio laboral, y también entender que cualquier proyecto de sistemas por pequeño que sea es mucho mejor trabajarlo en equipo, ya que las ideas fluyen mejor, y se integran las diferentes formas de ver un mismo problema.

Trabajar en equipo nos permite compartir y complementarnos como profesionales y realizar mejor cualquier labor u oficio que deba ser realizado, y esta filosofía está plasmada en el trabajo que se presenta a continuación.

OBJETIVOS

•Reconocer e identificar las diferentes unidades y estructura del curso académico Visual Basic Básico.

• Conocer los conceptos básicos de Visual Basic.

• Aplicar las herramientas y conceptos adquiridos en el transcurso del curso para loa solución de problemas y nuevos proyectos.

DESARROLLO DE PROBLEMAS U EJERCICIOS

Menú de Ejercicios

[pic 1]

Public Class FrmMenu

    Private Sub Ejercicio1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ejercicio1ToolStripMenuItem.Click

        FrmValorPositivooNegativo.Show()

    End Sub

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

    End Sub

    Private Sub Ejercicio2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ejercicio2ToolStripMenuItem.Click

        FrmNuemromayorymenor.Show()

    End Sub

    Private Sub Ejercicio3ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ejercicio3ToolStripMenuItem.Click

        FrmVectores.Show()

    End Sub

    Private Sub Ejercicio4ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ejercicio4ToolStripMenuItem.Click

        FrmEstructuraWhile.Show()

    End Sub

End Class

Ejercicio 1.

Valor Positivo o Negativo

[pic 2]

Public Class FrmValorPositivooNegativo

    Dim Valor As Double

    Dim Resultado As String

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

    End Sub

    Private Sub BtnIdentificar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnIdentificar.Click

        Valor = TxtValor.Text

        If Valor > 0 Then

            Resultado = " El valor es Positivo"

        Else

            If Valor = 0 Then

                Resultado = "El valor es Cero"

            Else

                Resultado = "El valor es Negativo"

            End If

        End If

        TxtResultado.Text = Resultado

    End Sub

    Private Sub BtnSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSalir.Click

...