Siempre hay un pero...
Este es mi código para eliminar
Código:
Private Sub CmbPiso_Click()
If IsNumeric(CmbPiso.Text) Then
For I = 1 To LblCama.Count - 1
Unload LblCama(I)
Unload PicCama(I)
Next
generarMapa (CInt(CmbPiso.Text))
End If
End Sub
Private Sub Command_Click()
For I = 1 To LblCama.Count - 1
Unload LblCama(I)
Unload PicCama(I)
Next
End Sub
Si del combo lo ejecuto, me sale el mensaje que no se puede descargar, pero si lo dejo en otro control y lo ejecuto desde allí, por ejemplo un botón como el command_click, funciona bien.
Necesito implementarlo en un solo control, es decir en este caso es un combobox.
Alguna otro sugerencia compañeros ?
Gracias...