Buscamos un maestro para escribir código de programa VB ~Recompensa por puntuación alta~Muchas gracias
Aquí tienes un ejemplo sencillo para ilustrar lo que quieres decir. ¿Si desea conectarse a la base de datos o conectarse dinámicamente? Debe ser más complejo
El código se ve así
¿Dim? lPrecio(2)? ¿Como? Largo
¿Oscuro? ¿Total? ¿Como? Largo
¿Privado? ¿Sub? Command1_Click()
l¿Total? =?0
¿Para qué? ¿I? =?0?¿Adónde ir? Lista1. ¿ListCount? -?1
¿Y si? Lista1. ¿Datos del artículo (i)? Entonces
l¿Total? =?lTotal? +?Precio(1)
¿Fin? si
entonces
Etiqueta1. ¿título? =?Str(lTotal)? y amplificador? "Yuan"
¿Fin? Submarino
¿Privado? ¿Sub? Form_Load()
lPrecio(0)? =?10:?lPrecio(1)? =?5:?lPrecio(2)? =?五
¿Fin? Submarino
¿Privado? ¿Sub? List1_ItemCheck(¿Elemento?como?entero)
¿Si? Lista1. ¿Datos del artículo (artículo)? =?1?Entonces
Lista1. ¿Datos del artículo (artículo)? =?0
Otro
Lista1. ¿Datos del artículo (artículo)? =?1
¿Fin? Si
¿Finalizar? Submarino