![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
04/06/2010, 08:52
|
| | Fecha de Ingreso: abril-2010 Ubicación: Lima-Peru
Mensajes: 96
Antigüedad: 14 años, 9 meses Puntos: 2 | |
Respuesta: Listbox en un Label tengo una lista que lo he llenado con un arreglo utilizando un with y un boton que me agrega mas elementos al listboxt desde un textboxt , ahora tengo un boton y un label y quiero que los datos del listboxt me aparescan en un label.
el script es bastante sencillo .
Private Sub MANTTO_PEDIDO_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
LSTENTRADAS.items.clear()
With LSTENTRADAS
.Items.Add("papa a la huancaina")
.Items.Add("ensalada rusa")
.Items.Add("ocopa arequipeña")
.Items.Add("choritos a la chalaca")
End With
Private Sub cbxseleccione_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbxseleccione.SelectedIndexChanged
If cbxseleccione.Text = "menu vegetariano" Then
LSTENTRADAS.Items.Clear()
With LSTENTRADAS
.Items.Add("ensalada mixta")
.Items.Add("lechugas")
.Items.Add("caldo minuta")
.Items.Add("sopa de letras")
End With
Private Sub Agregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Agregar.Click
LSTENTRADAS.Items.Add(txtplato.Text)
End Sub |