Download Presentación de PowerPoint

Unidad III
Generación de Código
Orientado a Objetos
Algoritmo, Estructuras y Programación III
Ing. Marglorie Colina
Funciones de Cadena
Funciones ASC y CHR
Permiten obtener el código ASCII de un determinado carácter y viceversa.
Asc
Permite obtener el código ASCII de un determinado
carácter. Lleva un solo parámetro de tipo string del
cual se quiere obtener dicho número.
Chr
Actúa a la inversa de la función Asc, es decir, a partir
de un determinado número devuelve el carácter
asociado.
Asc(“a”)
Chr(97)
Funciones de Cadena
Ejemplo: Diseñe un formulario que permita utilizar las funciones Chr y Asc.
Dim caracter As String
caracter = Asc(Textbox1.Text)
Textbox2.Text = caracter
Dim Ascii As String
Ascii = Chr(Textbox1.Text)
Textbox2.Text = Ascii
Funciones de Cadena
Funciones InStr
Se utiliza para buscar una cadena o parte de una cadena dentro de otra cadena. Si la
función encuentra la cadena a buscar devuelve un número que representa la posición
donde se encontró la cadena, sino devuelve un cero.
InStr(comienzo, cadena donde buscar, cadena a buscar)
Ejemplo:
Dim ubicación As Integer
ubicación = InStr(TextBox1.Text, TextBox2.Text)
MsgBox(“El Texto esta ubicado en “ &ubicación)
Funciones de Cadena
Funciones Str y Val
Se utilizan para convertir una cadena en número o un número en cadena.
Val
Convierte una cadena en un número.
Cadena = “12345”
Val(cadena)
Str
Convierte un número en una cadena.
Numero = 12345
Str(Numero)
Funciones de Cadena
Función Mid
Permite extraer una parte de una frase.
Mid(frase, posición, n)
Ejemplo:
Dim mifrase As String
mifrase = InputBox(“Ingrese la Frase")
Label1.Text = Mid(mifrase, 2, 6)
Funciones Trigonométricas
Proporciona constantes y métodos estáticos para operaciones trigonométricas,
logarítmicas y otras funciones matemáticas comunes. (Imports System.Math)
Sin
Sinh
Tan
Tanh
Cos
Devuelve un valor Double que especifica el seno de un ángulo.
Devuelve el seno hiperbólico del ángulo especificado.
Devuelve un valor Double que contiene la tangente de un ángulo.
Devuelve la tangente hiperbólica del ángulo especificado
Devuelve un valor Double que contiene el coseno del ángulo especificado.
Cosh
Devuelve el coseno hiperbólico del ángulo especificado.
Acos
Devuelve el ángulo cuyo coseno es el número especificado.
Asin
Devuelve el ángulo cuyo seno es el número especificado.
Arreglos
Es una secuencia de datos del mismo tipo y bajo el mismo nombre.
pueden ser
Arreglo de Notas
10
0
14
1
16
2
05
3
20
Vectores
4
se declaran
Dim Notas(4) As Integer
Dim Notas (0 To 4) As Integer
Limite Inferior
Limite Superior
Arreglos
¿Cómo Agregar la información al Arreglo?
Mediante el Índice
Mediante el Textbox
Dim Nombre(3) As String
Dim Edades(3) As String
Nombre(0)= “Carla”
Nombre(1)= “Marcos”
Nombre(2)= “María”
Nombre(3)= “Pedro”
Nombre(0)= Textbox1.Text
Nombre(1)= Textbox2.Text
Nombre(2)= Textbox3.Text
Nombre(3)= Textbox4.Text
Arreglos
Acceder al Arreglo
Se puede acceder a los valores del arreglo mediante una estructura de control.
Ejemplo: Si se quiere conocer el promedio de Edades
Utilización del for con arreglo
Asignación del arreglo
Dim Edades(4) As String
Nombre(0)= TxtEdad0.Text
Nombre(1)= TxtEdad1.Text
Nombre(2)= TxtEdad2.Text
Nombre(3)= TxtEdad3.Text
Dim i As Integer
Dim promedio As Decimal
Promedio=0
For i=0 To 3
promedio = promedio + Edades(i)
Next i
Promedio = promedio/4
Arreglos
Ejemplo 2:
¿ ¿Preguntas? ?
Práctica
en Visual
Studio