1
Aprender a programar desde cero / Re:Semana 8 - Ejercicio 8
« en: 09 de Febrero 2013, 11:41 »
Gracias.
Karlos
Karlos
Noticias:
Ahora Aprender A Programar está en Facebook. Noticias, novedades y mucho más. Síguenos en Facebook
Mostrar Mensajes
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Páginas: [1]
2
Aprender a programar desde cero / Re:Semana 8 - Ejercicio 9
« en: 07 de Febrero 2013, 22:54 »
Gracias.
3
Aprender a programar desde cero / Re:Semana 8 - Ejercicio 8
« en: 07 de Febrero 2013, 22:37 »
Hola Mario,
Cuestion 1.
Cuando hago lo que me apuntas, me sale el error en value: se esperaba una declaración:
Public Class Form1
Dim value As Integer
value=5
Dim Peso(value) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Cuestion 2.
Cuando copio y pego el Label1 no me pregunta si quiero generar array. He revisado el listado de propiedades del Label para ver si puedes elegir Array pero no hay nada.
End Class
Cuestion 1.
Cuando hago lo que me apuntas, me sale el error en value: se esperaba una declaración:
Public Class Form1
Dim value As Integer
value=5
Dim Peso(value) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Cuestion 2.
Cuando copio y pego el Label1 no me pregunta si quiero generar array. He revisado el listado de propiedades del Label para ver si puedes elegir Array pero no hay nada.
End Class
4
Aprender a programar desde cero / Semana 8 - Ejercicio 9 curso bases de la programación I tutorizado online
« en: 07 de Febrero 2013, 14:06 »
Hola,
He resuelto el problema de la siguiente forma puesto que he tenido muchos problemas utilizando While.... los bucles se me quedaban colgados. No termino de entender la funcionalidad de la herramienta While.
La pregunta es: mejora la eficiencia, rendimiento del programa utilizando la herramienta While? como se introduciría en el codigo que he creado?
Public Class Form1
Dim cantidadExcedida As Boolean
Dim extracción As Integer
Dim totalextraccion As Integer
Dim valorLimite As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = "Introducir la cantidad extraida "
valorLimite = 600
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
extracción = Val(TextBox1.Text)
totalextraccion = totalextraccion + extracción
Label2.Text = "Cantidad de dinero extraida total ha sido " & totalextraccion & " €"
If totalextraccion >= valorLimite Then
MsgBox("La cantidad de dinero extraida ha sido superior a " & valorLimite & " €")
totalextraccion = 0
End If
End Sub
End Class
He resuelto el problema de la siguiente forma puesto que he tenido muchos problemas utilizando While.... los bucles se me quedaban colgados. No termino de entender la funcionalidad de la herramienta While.
La pregunta es: mejora la eficiencia, rendimiento del programa utilizando la herramienta While? como se introduciría en el codigo que he creado?
Public Class Form1
Dim cantidadExcedida As Boolean
Dim extracción As Integer
Dim totalextraccion As Integer
Dim valorLimite As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = "Introducir la cantidad extraida "
valorLimite = 600
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
extracción = Val(TextBox1.Text)
totalextraccion = totalextraccion + extracción
Label2.Text = "Cantidad de dinero extraida total ha sido " & totalextraccion & " €"
If totalextraccion >= valorLimite Then
MsgBox("La cantidad de dinero extraida ha sido superior a " & valorLimite & " €")
totalextraccion = 0
End If
End Sub
End Class
5
Aprender a programar desde cero / Semana 8 - Ejercicio 8 curso bases de la programación I tutorizado online
« en: 07 de Febrero 2013, 13:00 »
Hola,
Tengo 2 preguntas (estoy utilizando vb2010):
1. Puedo introducir el número de un array con una variable?
En lugar de definir el array: Peso(27) as integer
Me gustaría definirlo así:
valor as integer
Peso(valor) as integer
valor=27
For i=1 to valor
Peso(i)= i +1
Next
Pero cuando hago esto con vb 2010 no me registra ningun valor en el Array.
Pregunta 2. Como puedo crear labels con codigo y ubicar su posición en Form?
Quiero crear un array de labels puesto que tengo que preguntar lo mismo muchas veces:
No consigo reproducir el ejemplo 82 del libro (label1(i).Caption="Introducir..."
Estoy probando con :
For i = 1 To 5
lbl.Text = lbl.Text & vbCrLf & "Label" & i & vbCrLf
Me.Controls.Add(lbl)
Next
Pero tampoco me funciona.
Karlos
Me gustaría saber como puedo crear labels mediante código con vb 2010
Tengo 2 preguntas (estoy utilizando vb2010):
1. Puedo introducir el número de un array con una variable?
En lugar de definir el array: Peso(27) as integer
Me gustaría definirlo así:
valor as integer
Peso(valor) as integer
valor=27
For i=1 to valor
Peso(i)= i +1
Next
Pero cuando hago esto con vb 2010 no me registra ningun valor en el Array.
Pregunta 2. Como puedo crear labels con codigo y ubicar su posición en Form?
Quiero crear un array de labels puesto que tengo que preguntar lo mismo muchas veces:
No consigo reproducir el ejemplo 82 del libro (label1(i).Caption="Introducir..."
Estoy probando con :
For i = 1 To 5
lbl.Text = lbl.Text & vbCrLf & "Label" & i & vbCrLf
Me.Controls.Add(lbl)
Next
Pero tampoco me funciona.
Karlos
Me gustaría saber como puedo crear labels mediante código con vb 2010
6
Aprender a programar desde cero / Re:Semana 7 - Ejercicio5 - For...to
« en: 05 de Febrero 2013, 09:14 »
Cesar,
Gracias por la respuesta.
Lo he probado y a funcionado.
Karlos
Gracias por la respuesta.
Lo he probado y a funcionado.
Karlos
7
Aprender a programar desde cero / Semana 7 - Ejercicio5 - For...to curso bases programación I tutorizado online
« en: 03 de Febrero 2013, 22:35 »
Hola,
Utilizo visual basic 2010 y estoy intentado obtener lo siguiente:
50
51
...
60
con el siguiente codigo:
Public Class Form1
Dim i As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For i = 50 To 60
Label1.Text = i & vbCrLf
Next
End Sub
End Class
El resultado que me da es simplemente 60 por lo tanto únicamente refleja el último valor de i.
No entiendo la razón por la que no me registra cada valor de i
Karlos
Utilizo visual basic 2010 y estoy intentado obtener lo siguiente:
50
51
...
60
con el siguiente codigo:
Public Class Form1
Dim i As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For i = 50 To 60
Label1.Text = i & vbCrLf
Next
End Sub
End Class
El resultado que me da es simplemente 60 por lo tanto únicamente refleja el último valor de i.
No entiendo la razón por la que no me registra cada valor de i
Karlos
Páginas: [1]
Sobre la educación, sólo puedo decir que es el tema más importante en el que nosotros, como pueblo, debemos involucrarnos.
Abraham Lincoln (1808-1865) Presidente estadounidense.
aprenderaprogramar.com: Desde 2006 comprometidos con la didáctica y divulgación de la programación
-
SMF 2.0.19 |
SMF © 2020, Simple Machines
-
RSS -
WAP2