Duda con Private sub ()

[KenMasters]

He creado una función

Código:

Private Function funcion1( x as String)
....
End Function

Cuando en un boton por ejemplo lo ejecuto de la siguiente manera

Código:

Private Sub Command1_Click()
funcion1(text1.text)
End Sub

Lo carga normal y funciona, pero si agrego otra variable a la funcion por ejemplo

Código:

Private Function funcion1( x as String, y as String)
....
End Function

y en el boton coloco

Código:

Private Sub Command1_Click()
funcion1(text1.text, text2.text)
End Sub

Aqui es donde me da error diciendo Error de copilacion de esperaba: =

A que se debe que estoy haciendo mal, o como puedo hacer para poder trabajar como cuando es una variable ?

[culd]

Una funcion retorna un valor, un subproceso no retorna valor...

Justamente te esta diciendo que ese valor tiene que retornar en algo... Por ejemplo

Código vb:

Public Function TuFuncion(Variable1 as String, Variable2 as String) as Boolean
....
Tufuncion = true ó false
End Function
 

Para llamarlo podrias utilizar una variable del mismo tipo para rescatar el valor que retorna o tambien podes usar en comparaciones

Código vb:

Dim resultado as boolean
resultado = tufuncion(text1, text2)
 

Código vb:

If tufuncion(text1, text2) = true then
....
End If
 

Lo que vos queres capaz que es un subproceso

Código vb:

Public Sub TuSubProceso(Variable1 as string, Variable2 as string)
.....
End Sub
 

Y lo llamas con

Código vb:

Call TuSubProceso(Text1, Text2)
 

[ComprasDesdeCasa]

Hola,

la otra opción, para no utilizar call es no poner paréntesis en la llamada:

funcion1 text1.text, text2.text

Saludos.