Mensajes

[A) Solo lectura]

En la clase: (Clase1)

'Variable privada para el manejo en la clase
Private _clave As Byte()

Con lo que respecta a la propiedad puedes usarlo de 3 formas

A) Solo lectura - Solo en el caso que quieras recuperar un valor mas no asignar.

Código (vbnet) [Seleccionar] Expandir

Public property readonly Clave() as byte()
       Get
            return _clave
        End Get
end property

B) Solo escritura - Solo en el caso que quieras asignar un valor mas no recuperar.

Código (vbnet) [Seleccionar] Expandir

Public property writeonly Clave() as byte()
       Set(btval value as byte)
            _clave = value
        End Set
end property

C) Lectura y escritura - Cuando la variable sera tanto asignada como recuperada. (toma como ejemplo el selectedIndex de un combobox(en este caso puedes tanto asignar el indice como recuperarlo))

Código (vbnet) [Seleccionar] Expandir

Public property Clave() as byte()
       Set(btval value as byte)
            _clave = value
        End Set
       Get
            return _clave
        End Get
end property

Modo de uso.

1) Solo podras recuperar la variable _clave cuando hallas usado el caso A y C.
2) Si quieres asignar un valor, solo lo podras hacer si invocas el metodo B y C.
3) Usando el metodo C podras tanto recuperar como asignar el valor a _clave.

Trabajando

1) Asignar valor Clase1.Clave = MyValor
2) Recuperar valor MyVariable = Clase1.clave

Clase1 = Clase
Clave = Metodo
MyValor = Valor a asignar
MyVariable = Variable que recupera el valor de _clave

Espero sirva.
Saludos.

Publica lo que tienes avanzado.

Ready. estuvo bueno.. xD

[1]

1

2

Medidas ??  que clases de medidas  ??

TE AMO DE VERDAD...
PERO TE AMO DE VERDAD...

Creo que se empezaron a formar parejas en el foro. ( broma )

Sion duda alguna un relato increible .. seria una dicha ver la cara de una mujer que pase por esa situacion.

Es realmente un juego adictivo, pero tienen razon en decir que todo depende de la persona. Los limites los impone la persona, peroo realmente el juego es muy bueno ( esa es la idea no¿? )

[@cod]

Bueno yo supuse que ya sabias como hacer la conexion pero al parecer no es asi. EN todo caso aqui va.

'Importar las librerias
Imports system.data
Imports system.data.sqlclient

'Declarar variables
dim con as new sqlconnection("integrated security=true;server=.;database=MYDB")
dim da as sqldataadapter
dim dtb as datatable

'Funcion que se invoca para llenar el gridview
Function muestraDatos()
da = new sqldataadapter("select * from tabla",con)
dtb =  new datatable
da.fill(dtb)
datagridview1.datasource = dtb
End Sub

'Otros eventos
Sub Form_Load(...)
muestraDatos()
End sub

SUb Buscar_CLick(...)
muestraDatos()
End sub

Como te daras cuenta, solo hace falta crear la funcion y llamarla siempre desde los eventos. claro si quieres definir algun parametro para la consulta basta con modificar la funcion en cuestion.

'Para enviar algun parametro seria asi:
Function muestraDatos()
da = new sqldataadapter("select * from tabla where codigo=@cod",con)
da.selectcomand.parameters.addwithvalue("@cod",textbox1.text)
dtb =  new datatable
da.fill(dtb)
datagridview1.datasource = dtb
End Sub

Espero sirva. Un saludo.

Pues que asco .. una razon mas para dejar de usar platarma NET.