02/01/2003, 17:39
|
| | | Fecha de Ingreso: enero-2003 Ubicación: Viña del Mar. Chile
Mensajes: 5
Antigüedad: 22 años, 4 meses Puntos: 0 | |
| aquí vamos con el código
Hola de nuevo:
Me dí cuenta de algo, y es que el textbox tenía nombre text1 y no textbox1 como le había puesto, fue una despistada, pero ahora me aparece el siguiente mensaje cuando hago clic en el botón:
compile error:
method or data member not found
de todas formas aquí está todo el código:
Private Sub Command1_Click()
dblSqrt (text1.Value)
End Sub
Function dblSqrt(dblParameter As Double) As Double
If dblParameter < 0 Then
dblSqrt = -1
Else
dblSqrt = Sqr(dblParameter)
End If
End Function |