Como puedo sumar los valores de un text box
Buenas noches, quiero saber cómo puedo sumar los valores ingresados en un TextBox Ejemplo:16928919 = 1+6+9+2+8+9+1+9 =45
El valor 16928919 está en un textbox
El valor 16928919 está en un textbox
{"Lat":2.81137119333114,"Lng":-72.7734375}
1 respuesta
Respuesta de Roberto Alvarado
1
Buenos días que pena, pero no puedo entender la línea
total += Val( SubStr(textbox1.text, i, 1))
ya que en esta me está saliendo un error en (SUBSTR)
Me puedes explicar el proceso
Gracias
total += Val( SubStr(textbox1.text, i, 1))
ya que en esta me está saliendo un error en (SUBSTR)
Me puedes explicar el proceso
Gracias
Muchas gracias por tu colaboración pero lo solucione de la siguiente manera
Private Sub Command1_Click()
Dim total As Integer
Dim i As Integer
Dim con As Integer
total = 0
con = 0
For i = 1 To Len(Text1.Text)
total = Mid(Text1.Text, i, 1)
con = con + total
Next
End Sub
Private Sub Command1_Click()
Dim total As Integer
Dim i As Integer
Dim con As Integer
total = 0
con = 0
For i = 1 To Len(Text1.Text)
total = Mid(Text1.Text, i, 1)
con = con + total
Next
End Sub
