meu select vb 6

Private Sub Label_Click()

mdl.AbreBancodados "comando para abrir banco de dados"

	soma = "SELECT SUM(Valor)FROM Dados123"

	Set teste = Banco.OpenRecordset(soma)

	Label.Caption = teste

	End Sub

	eu queria somar a coluna Valor da tabela Dados123 e mostrar essa soma no Label mas não esta dando muito certo