Multiplicaciones y sumar resultado

<%=Texto%>
Buenas, la solución sería así:
Supongamos que vos tenés 3 array de textbox:
-Txtcantidad donde el usuario pone la cantidad de artículos a vender
-Txtvalor donde es el precio del artículo
-txttotal donde es cantidad*valor
Después va otro textbox (txttotalfactura) el cual no es un array y va el total de la factura
Private sub Command1_click()
dim i as integer
'recorremos todos las cantidades y hacemos el subtotal
for i = 0 to txtcantidad.ubound
txttotal(i).text = val(txtcantidad(i).text) * val(txtvalor(i).text)
next i
'recorremos todos los subtotales y hacemos el total de la factura
for i = o to txttotal.ubound
txttotalfactura.text = val(txttotalfactura.text) + val(txttotal(i).text)
next i
end sub