Os pongo el fragmento de código donde me falla el programa

Dim SubTotales As String

SubTotales = (Conectar.$Res!Cantidad * Conectar.$Res1!precio)

SubTotal.Text = (SubTotales + SubTotal.Text)
                            Esta segunda linea me dice  que no coinciden los tipos de datos

¿Como los puedo sumar?

Conviértelos a tipo Integer o Float primero, no siempre puedes hacer operaciones aritméticas con cadenas, aunque gambas haga conversiones en algunos casos automáticamente.



En adelante, presta atención al tipo de datos que manejas y al tipo de datos de las variables que los almacenan y también a los tipos de los campos de las bases de datos.

Saludos

===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"

Hoja jguardon lo he probado pero sigue =



Te puesto un pantallazo del error
el error lo da al usar el tipo Float pero con  Cint pasa lo mismo

Revisa tu codigo: intentas convertir a CFloat  el resultado de una suma imposible ( un número + un string)
El ejemplo de JGuardon no es eso. Es esto:



Convierte a entero por separado cada cifra a sumar.

Saludos.

Como norma: Si vas a operar con un control numérico no uses textBox, usa ValueBox.

Saludos.

los datos los saco de  2 tablas diferentes, en las cuales los datos numéricos están definidos como varchar los coloco en un columnViwe y a su vez quiero que me saque el total de la suma de los datos que se colocan en el mismo. Os Pongo todo el código para que lo veaís bien ya me sigo con el problema.


Public Sub Form_Open()

  Dim Contador, i As Integer
  Dim SubTotales As String

  Me.Center
  Label4.Text = "Mesa Nº"
  Consultamesas.Clear
  Consultamesas.Columns.Count = 4
  Consultamesas.Columns[0].Text = "Consumición"
  Consultamesas.Columns[0].Alignment = 1
  Consultamesas.Columns[1].Text = "Cantidad"
  Consultamesas.Columns[1].Alignment = 3
  Consultamesas.Columns[2].Text = "precio"
  Consultamesas.Columns[2].Alignment = 3
  Consultamesas.Columns[3].Text = "Sub-Total"
  Consultamesas.Columns[3].Alignment = 3
  
  Label4.Text = Label4.Text & " " & Me.Number
  
  Conectar.Connect
  producto.clear
  Conectar.$Res = Conectar.$Con.Exec("Select * from consumibles")
  For i = 0 To Conectar.$Res.Count - 1 Step 1
    Producto.Add(Conectar.$Res!producto)
    Conectar.$Res.MoveNext()
  Next

  Conectar.Connect
  Conectar.$Res = Conectar.$Con.Exec("Select * from Taula where Numero = '" & Me.Number & "'")
  Contador = Conectar.$Res.Count - 1
  For i = 0 To Contador Step 1
    Conectar.$Res1 = Conectar.$Con.Exec("select * from consumibles where producto = '" & Conectar.$Res!producto & "'")
    SubTotales = (Conectar.$Res!Cantidad * Conectar.$Res1!precio)
    'SubTotal.Text = (SubTotales + SubTotal.Text)
'    SubTotal.Text = (CInt(SubTotales) + CInt(SubTotal.Text))
    Consultamesas.Add(i, Conectar.$Res!producto)
    Consultamesas[i][1] = Conectar.$Res!Cantidad
    Consultamesas[i][2] = Conectar.$Res1!precio
    Consultamesas[i][3] = Conectar.$Res!Cantidad * Conectar.$Res1!precio

    Conectar.$Res.MoveNext
  Next
  Conectar.NoConnect
 
End

desoljor:


Estas asignando un numero a un control (parece que es un textbox), a la propiedad .text que solo acepta string. (cadenas de texto).

Deberias o cambiar el tipo de control, como te comenta Shordi a un valuebox, o convertir el numero que te da la suma en un texto, con la función format.



Saludos

===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!

Dices en tu anterior mensaje:

Citar:

los datos numéricos están definidos como varchar

No parece que eso sea lo más coherente; tratándose de datos numéricos, los campos de la base de datos deberían ser también de tipo numérico, ¿no?.

Saludos

===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"

Estoy de acuerdo jguardon en,

Citar:

los datos numéricos están definidos como varchar

No parece que eso sea lo más coherente; tratándose de datos numéricos, los campos de la base de datos deberían ser también de tipo numérico, ¿no?.

pero he definido los datos como decimal 2,2 y no me suma bien

puesto que los datos de la tabla son:

 Textos completos    
Cod_Producto producto          precio
1                   Coca-Cola           1.3
2                   Kas Naranja       1.3
3                   Café                   0.80
4                   Cortado              0.80
5                   Café Con Leche  1
6                   Desayuno          2
7                   Infusión            1
8                   Bolleria              1
9                   Pincho               0.50
10                 Tapa                 1.5