VB, la primera pregunta es un programa de práctica para usar el control del cuadro de lista. ¡Por favor, dame algún consejo!
Privado?Sub?Command1_Click()
For?i?=?9?To?0?Step?-1List2.AddItem?List1.List(i)List1.RemoveItem?i
Siguiente
Comando2.Enabled?
Comando1.Enabled?=?False
Comando2.Enabled?=?True
¿Fin? Sub
¿Privado?Sub?Command2_Click()
Para?i?=?9?Step-1 List1.AddItem?List2.List(i) List2.RemoveItem?i
Siguiente
Comando1.Enabled?p>
Fin?Sub
¿Privado?Sub?Command3_Click()
¿Descargar?Me
End?Sub
Privado?Sub?Form_Load()
Dim?i, j, t son números enteros
Aleatorización
Para?i?=?1?to?10 a(i)? =?Int(Rnd?*?90)?+?10
Siguiente
Para?i?=?1?A?10Para?j?=?1?A?i
Si?a(i)?
Fin?Si Siguiente
Siguiente
Para ?i?=?1?To?10 List1.AddItem?a(i)
Siguiente
Comando2.Enabled?=?False
Fin