Hola. Cuando formules una duda de programación sobre un error específico, asegúrate de mencionar el tipo y mensaje de error, es una información esencial y no somos magos, jeje. Aparte de eso, debes formatear el código que publiques con las etiquetas GeShi y debes publicar en el sbforo de programación correspondiente, no en dudas generales.

---

En la función que has definido te faltaría especificar el tipo de valor de retorno: Function suma(...) As Integer

Otro posible error que te esté indicando el compiler, dependiendo de las declaraciones Option que tengas activadas, sería por estar pasándole valores de tipo String a una función que solo acepta valores de tipo Integer:
Lo solucionarías de la siguiente manera:

label1.text = CStr(suma(CInt(textbox1.text), CInt(textbox2.text)))

Saludos