Tu problema es el siguiente:

En vbs los tipos de variables no se definen como en otros lenguajes, como ser en C o en VB, sino que los tipos se autodefinen en virtud del contenido de la variable, entonces, Inputbox devuelve un valor de tipo TEXTO, pero cuando haces las operaciones, al ver que hay un simbolo de multiplicación, división, resta, etc, vbs se da cuenta de que son números y realiza las operaciones como tal.

Que ocurre entonces con el símbolo de +?, que se utiliza para concatenar texto, al igual que &, así que vbs piensa que son texto y el resultado es el siguiente:

Ej:

variable1 = "primero"
variable2 = "segundo"
Msgbox variable1 + variable2

Es decir, variable tipo texto + variable tipo texto = Frase

Para que calcule correctamente debes de convertir ese texto en NÚMEROS (entero), para lo cual puedes utilizar cint (también existen otras como CBool , CByte , CCur , CDate , CDbl , CLng , CSng , CStr )

En el caso del ejemplo anterior

data3 = cint(data1) + cint(data2)

If operador = "+" or operador = "-" or opeardor = "*" or operador = "/" then