Visual Basic - ayuda

hola :a todos ,de favor me podrian ayudar?, mi problema es el siguiente:
estoy tratando de generar un codigo de barras (ean13) pero en esa cadena de 12 dijitos hay un punto ¿como elimino ese punto para que no me genere una barra. EJEMPLO
1234567890.35 aqui son 13 dijitos el punto se tomo como caracter como lo elimino para que quede 123456789035 y sean solo 12 dijitos
y se pueda generar el dijito verificador.
esto se toma de tres campos es decir se esta haciendo una concatenacion y el punto viene de un indicador. Espero haberme explicado.

Pueba este codigo, te cambiara todos los puntos por nada.

Solo para VB6, probe con el VB5 pero no lo tiene

Dim NUMEROCONCERO, NUM

NUMEROCONCERO = 1234567890.35
NUM = Replace(NUMEROCONCERO, ".", "")

MsgBox NUM

Para quitar el punto debes usar la función Replace. Por ejemplo:

Text1 = "1234567890.35"
Text2 = Replace(Text1, ".", "")

La función Replace solo está implementada en VB6. En todo caso, si dispones de una versión anterior puedes usar la siguiente función:

Private Function ReplaceVB5(Expression As String, Find As String, Replace As String) As String
Dim Pos As Integer
Dim Izquierda As String
Dim Derecha As String

Pos = InStr(1, Expression, Find)
If Pos = 0 Then
ReplaceVB5 = Expression
Exit Function
End If

Izquierda = Left(Expression, Pos - 1)
Derecha = Right(Expression, Len(Expression) - Pos - Len(Find) + 1)
ReplaceVB5 = Izquierda & Replace & Derecha
End Function

Luego, tendrías que llamarla de la siguiente forma:

Text1 = "1234567890.35"
Text2 = ReplaceVB5(Text1, ".", "")

Espero que te sirva...