Ayuda al sumar todos los valores de una columna

[camilodeveloper]

Hola,

La idea es que al hacer click en un boton me muestre en una caja de texto el total de la suma de los valores de una columna x de una tabla y. el código que estoy utilizando es el siguiente, pero me bota un error:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim Conexion As OleDb.OleDbConnection
Dim Command As OleDb.OleDbDataAdapter
Dim Table As DataSet
Conexion = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLED B.4.0; Data Source=C:\Documents and Settings\Web Developer\Mis documentos\HMR\HMR Comunicaciones\HMR Comunicaciones\HMRBD.mdb")
'Command = New OleDb.OleDbDataAdapter("select * from Llamadas_Local where Fecha between 10/01/2006 and 30/01/2006 ", Conexion)
' cargando el dataset
Table = New DataSet()
TextBox1.Text = Table.Tables("Llamadas_Local").Compute("Sum(Total) ", "").ToString()
End Sub



El error que me sales es: Referencia a objeto no establecida como instancia de un objeto.

Gracias de antemano.