Ejercicios de programación .net (nivel inicial)

Recommendations

Info

'CODIGO DE PROVINCIAS If prov = 1 Then TextBox2.Text = " La Provincia es: AZUAY" If prov = 2 Then TextBox2.Text = " La Provincia es: BOLIVAR" If prov = 3 Then TextBox2.Text = " La Provincia es: CAÑAR" If prov = 4 Then TextBox2.Text = " La Provincia es: CARCHI" If prov = 4 Then TextBox2.Text = " La Provincia es: CARCHI" If prov = 5 Then TextBox2.Text = " La Provincia es: COTOPAXI" If prov = 6 Then TextBox2.Text = " La Provincia es: CHIMBORAZO" If prov = 7 Then TextBox2.Text = " La Provincia es: EL ORO" If prov = 8 Then TextBox2.Text = " La Provincia es: ESMERALDAS" If prov = 9 Then TextBox2.Text = " La Provincia es: GUAYAS" If prov = 10 Then TextBox2.Text = " La Provincia es: IMBABURA" If prov = 11 Then TextBox2.Text = " La Provincia es: LOJA" If prov = 12 Then TextBox2.Text = " La Provincia es: LOS RIOS" If prov = 13 Then TextBox2.Text = " La Provincia es: MANABÍ" If prov = 14 Then TextBox2.Text = " La Provincia es: MORONA SANTIAGO" If prov = 15 Then TextBox2.Text = " La Provincia es: NAPO" If prov = 16 Then TextBox2.Text = " La Provincia es: PASTAZA" If prov = 17 Then TextBox2.Text = " La Provincia es: PICHINCHA" If prov = 18 Then TextBox2.Text = " La Provincia es: TUNGURAHUA" If prov = 19 Then TextBox2.Text = " La Provincia es: ZAMORA CHINCHIPE" If prov = 20 Then TextBox2.Text = " La Provincia es: GALAPAGOS" If prov = 21 Then TextBox2.Text = " La Provincia es: SUCUMBIOS" If prov = 22 Then TextBox2.Text = " La Provincia es: ORELLANA" If prov = 23 Then TextBox2.Text = " La Provincia es: Santo Domingo de los Tsachilas" If prov = 24 Then TextBox2.Text = " La Provincia es: SANTA ELENA" Else MsgBox("Cédula no Valida") TextBox1.Text = "" TextBox1.Focus() End If End If End Sub End Class Leonel Navarrete
Número Primo Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim N, primo As Double N = Val(TextBox1.Text) For i = 1 To N Step 1 If N Mod i = 0 Then primo += 1 End If Next If primo = 2 Then MsgBox(N & " es Primo") TextBox1.Text = "" TextBox1.Focus() Else MsgBox(N & " No es Primo") TextBox1.Text = "" TextBox1.Focus() End If End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click End End Sub End Class Leonel Navarrete
Page 1 and 2:
NAVARRETE MONTENEGRO ERIK LEONEL Le
Page 3 and 4:
Manipular caracteres con MID Diseñ
Page 5 and 6:
Manipular caracteres con LEFT Dise
Page 7 and 8:
Manipular caracteres con SPACE Dise
Page 9 and 10:
Enlazar Formularios Programación F
Page 11 and 12: Convertir Caracteres Programación
Page 13 and 14: EDADES Leonel Navarrete
Page 15 and 16: Select Case Con LABEL Leonel Navarr
Page 17 and 18: Usuario y Contraseña Leonel Navarr
Page 19 and 20: Juego de Cartas Leonel Navarrete
Page 21 and 22: Funciones Y Procedimientos Leonel N
Page 23 and 24: Funciones Y Procedimientos Leonel N
Page 25 and 26: Propiedades de los objetos Public C
Page 35 and 36: Utilizando un Módulo Public Class
Page 41 and 42: Public Class Form1 Private Sub Butt
Page 43 and 44: Public Class Form2 Private Sub sala
Page 45 and 46: MouseMove Public Class Form4 Privat
Page 47 and 48: Tiempo del día Public Class Form1
Page 49 and 50: Bucle For Public Class Form1 Privat
Page 57 and 58: Public Class Form7 Dim mensual As D
Page 59 and 60: Serie Fibonacci Public Class Form1
Page 61: Public Class Form1 Private Sub Butt
Page 65 and 66: Public Class Form1 Private Sub Chec
Page 67 and 68: For each Public Class Form1 Private
Page 69 and 70: Vectores sumar pares - impares Publ
Page 71 and 72: Matrices Public Class Form1 Private
Page 73 and 74: Aplicación Leonel Navarrete
Page 75 and 76: Private Sub Button2_Click(ByVal sen
Page 77 and 78: Private Sub Button4_Click(ByVal sen
Page 81 and 82: While - Do - Do While Public Class
Page 83: Private Sub Button2_Click(ByVal sen
show all

Ejercicios de programación .net (nivel inicial)

Create successful ePaper yourself

Delete template?

Save as template?