Visual Basic - Sumar determinadas columnas de un listview

Hola a todos, tengo un problemita para terminar una aplicacion.
Estoy trabajando con una base de datos acces, y un list view con cuatro columnas.
La primer columa es autonumerica, la segunda tiene un articulo, la tercera el precio, y la cuarta la fecha que se registro. Ej:

1 | Remera | $300 | 19/09/2014

Cree un boton que suma la tercer columna entera y me da el resultado total de las ventas con este codigo:


Y lo llamo con:

Lo que me faltaria hacer es poder elegir la fecha cada dia y que sume los registros de ese dia, y tambien lo mismo para que sume el total de registros por mes.

Espero que puedan ayudarme, este año empece a estudiar analista de sistemas y llegue bastante lejos por mi cuenta, mas de lo que me enseñaron en la facultad, por eso no se como resolver este problema. Muchas gracias

Hombre si ya te funciona y solo quieres filtrar por el día actual pues es simplemente poner una pequeña condición a tu código actual:


Con eso miras si es la fecha de hoy... para el caso de del mes actual, pues coges la fecha corta con Datetime.now().toshortDateString() y lo guardas en una variable string y con las funciones de cadena eliminas el día y después solo tienes que mirar que mes es y así comparar entre el primer día del mes (1/mes y día obtenido) y el último del mes (que si quieres simplificar, pues usas 31 siempre y así no tienes que mirar en que acaba ese mes y no vas a tener problemas)... y aplicar eso a la condición... al final casi lo mismo.

Datetime.Now().ToShortDateString() : devuelve la fecha de hoy en formato corto, por ej: 19/09/2014

Espero haberte ayudado.

Gracias manuel, en este momento no tengo mi pc, ni bien llegue a casa lo pruebo. Te hago otra consulta:
En ese caso me contaria los del dia actual, como podria hacer para yo poder elegir el dia asi saber cuanto vendi dias anteriores.

EDITO:
ME DA ERROR DE SINTAXIS ESTE CODIGO:
if String.compare(LV2.ListItems(i).SubItems(3).toString(), Datetime.Now().ToShortDateString())=0 then

De nada.

En cuanto a lo segundo, ¿Qué versión de VB.NET estás usando o aun estás con VB 6? porque si es el segundo caso no funciona, String.compare es para .NET solo. Pero no es necesario usar esa función, incluso en VB 6 podrías usar instr (la famosa instring)

En cuanto a la otra pregunta, pues si quieres un día distinto, pues simplemente le pones un textbox, o se lo preguntas al usuario con un inputbox()... lo único que tienes que tener cuidado es que el formato sea coincidente con el de fecha corta (como las fechas que tu usas) y nada más.

Bibliografía:

String.compare: http://msdn.microsoft.com/es-es/library/system.string.compare(v=vs.110).aspx
Inputbox: http://msdn.microsoft.com/es-es/library/6z0ak68w(v=vs.90).aspx
Instr: http://msdn.microsoft.com/es-es/library/8460tsh1(v=vs.90).aspx

Hasta luego

Claro Manuel lo que me explicas es exactamente lo que necesito, el problema es que estoy usando VB6. Podrias pasarme el codigo ? GRACIAS !

En Visual Basic 6 no necesitas complicarte tanto la vida, una comparación de cadenas puedes hacerlo con:

cadena1=cadena2

hasta luego