variable opcional

private sub (byval UNO as string, byval DOS as string, optional byval
CAMPOOPCIONAL as integer=0)

En caso de que no se envie el campo opcional, cogerá el valor 0 (que es el
que se le da por defecto)

"ZyXpHrEeZ" escribió en el mensaje
news:

hola a todos, alguien me puede colaborar diciendome como puedo hacer para
que
un SUB reciva datos opcionales, es decir le puedo enviar a un SUB 2 o 3
campos, como puedo hacerlo?? muchas gracias a todos.
ej

private sub (byval UNO as string, Byval DOS as string, CAMPOOPCIONAL as
string)

-
Optional keyword Or Overloads, ejemplo

Public Overloads Function Formula1(ByVal x As Single) As Single
Return x * x - 1
End Function

Public Overloads Function Formula1( _
ByVal x As Single, ByVal y As Single _
) As Single
Return x * y - 1
End Function

~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Harvey Triana
Well Tracks .NET Developer (VB Hero)
(Software Engineer) ...Yet
VB Clásico: http://www.mvps.org/vexpert
~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Las cosas deben ser sencillas pero no más. A.E.


"ZyXpHrEeZ" escribió en el mensaje
news:

hola a todos, alguien me puede colaborar diciendome como puedo hacer para

que

un SUB reciva datos opcionales, es decir le puedo enviar a un SUB 2 o 3
campos, como puedo hacerlo?? muchas gracias a todos.
ej

private sub (byval UNO as string, Byval DOS as string, CAMPOOPCIONAL as
string)

En el Formulario 2 por ejemplo, pones algo similar a:

Public Sub New(ByVal Val As Integer, ByVal strVal As String)
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeComponent()

'Add any initialization after the InitializeComponent() call
Label1.Text = Val & "-" & strVal
End Sub

(Los parámetros de entrada ya estarán marcados).

En el Formulario 1 indicas los parámetros en la llamada de la forma:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim MiF As New Form2(2, "Ejemplo")
MiF.Show()
End Sub

Espero que te sirva.

Un saludo,

Jorge Serrano
MVP VB.NET


"ZyXpHrEeZ" wrote:

hola a todos, alguien me puede colaborar diciendome como puedo hacer para que
un SUB reciva datos opcionales, es decir le puedo enviar a un SUB 2 o 3
campos, como puedo hacerlo?? muchas gracias a todos.
ej

private sub (byval UNO as string, Byval DOS as string, CAMPOOPCIONAL as
string)

Perdón, me faltó el valor opcional. :-)

Public Sub New(ByVal Val As String, ByVal strVal As String, Optional ByVal
strOtro As String = "")

Un saludo.

Jorge Serrano
MVP VB.NET


"ZyXpHrEeZ" wrote:

hola a todos, alguien me puede colaborar diciendome como puedo hacer para que
un SUB reciva datos opcionales, es decir le puedo enviar a un SUB 2 o 3
campos, como puedo hacerlo?? muchas gracias a todos.
ej

private sub (byval UNO as string, Byval DOS as string, CAMPOOPCIONAL as
string)

Ah ya

Jorge-
El método constructor predeterminadamente es sobrecargado, y debería usarse
esta característica. Adicionalmente, la palabra Optional no pertenece a la
filosofía tradicional de OO. La compatibilidad de componentes es más fluida
si se usa Overloads, y el código es más limpio -.



Saludes,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Harvey Triana
Well Tracks .NET Developer (VB Hero)
(Software Engineer) ...Yet
VB Clásico: http://www.mvps.org/vexpert
~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Las cosas deben ser sencillas pero no más. A.E.


"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:

Perdón, me faltó el valor opcional. :-)

Public Sub New(ByVal Val As String, ByVal strVal As String, Optional ByVal
strOtro As String = "")

Un saludo.

Jorge Serrano
MVP VB.NET


"ZyXpHrEeZ" wrote:

> hola a todos, alguien me puede colaborar diciendome como puedo hacer

para que

> un SUB reciva datos opcionales, es decir le puedo enviar a un SUB 2 o 3
> campos, como puedo hacerlo?? muchas gracias a todos.
> ej
>
> private sub (byval UNO as string, Byval DOS as string, CAMPOOPCIONAL as
> string)