iCentar » Racunari i oprema » Programirannje i baze podataka » Vb/Vbnet

Gjoreski	01.11.2013 11:25
Predmet:User control Pravam edna user controla koja treba da e identicna so textbox no ne znam kao treba da se vnesat parametri za DataSource i DataField. jas kaj mene staviv PreuzmiIzvorni kôd (Visual Basic): Public Property Get DataSource() As String DataSource = txtNum.DataSource End Property Public Property Let DataSource(ByVal New_DataSource As String) txtNum.DataSource = New_DataSource PropertyChanged "DataSource" End Property 'Fild Public Property Get DataField() As String DataField = txtNum.DataField End Property Public Property Let DataField(ByVal New_DataField As String) txtNum.DataField = New_DataField PropertyChanged "DataField" End Property Private Sub UserControl_WriteProperties(PropBag As PropertyBag) PropBag.WriteProperty "DataSource", txtNum.DataSource, "" PropBag.WriteProperty "DataField", txtNum.DataField, "" End Sub Private Sub UserControl_ReadProperties(PropBag As PropertyBag) txtNum.DataSource = PropBag.ReadProperty("DataSource", "") txtNum.DataField = PropBag.ReadProperty("DataField", "") End Sub koga ke ja stavam kontrolata na forma dobivam poraka Metod od data member not faund i obelezano e `.DataSource=`

Gjoreski

01.11.2013 11:25

Predmet:User control

Pravam edna user controla koja treba da e identicna so textbox no ne znam kao treba da se vnesat parametri za DataSource i DataField.
jas kaj mene staviv

PreuzmiIzvorni kôd (Visual Basic):

Public Property Get DataSource() As String
DataSource = txtNum.DataSource
End Property
Public Property Let DataSource(ByVal New_DataSource As String)
txtNum.DataSource = New_DataSource
PropertyChanged "DataSource"
End Property
'Fild
Public Property Get DataField() As String
DataField = txtNum.DataField
End Property
Public Property Let DataField(ByVal New_DataField As String)
txtNum.DataField = New_DataField
PropertyChanged "DataField"
End Property
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
PropBag.WriteProperty "DataSource", txtNum.DataSource, ""
PropBag.WriteProperty "DataField", txtNum.DataField, ""
End Sub
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
txtNum.DataSource = PropBag.ReadProperty("DataSource", "")
txtNum.DataField = PropBag.ReadProperty("DataField", "")
End Sub

koga ke ja stavam kontrolata na forma dobivam poraka Metod od data member not faund i obelezano e
.DataSource=

zxz	01.11.2013 11:59
Predmet:Re: User control Uf ovo se cesto javlja, moze biti svasta. Imas i klasu cini mi se PropertyBag. Ako moze zakaci neki primjer.

zxz

01.11.2013 11:59

Predmet:Re: User control

Uf ovo se cesto javlja, moze biti svasta.
Imas i klasu cini mi se PropertyBag.
Ako moze zakaci neki primjer.

Gjoreski	01.11.2013 13:40
Predmet:Re: User control eve vaka da ja definiram celata zadaca: Mi treba da napravam User controla textbox koja ke ima nekolku funkcii. 1. Da bide Bound odnosno da moze da se povrzi so recordset a. DataSource b. DataField 2. Treba vo text da se prikazuva edna vrednost a vo DataField treba da ima druga vrednost Primer: Imame recordset od tabela Vraboteni textboxot e vrzan so recordsetot vo text od textboxsot go gledame imeto od vraboteniot a vo DataField imame ID od vraboteniot 3. Pri promena na tekstot da se otvori grid koj ke sodrzi nekoj recordset koj ke se filtrira na osnova od vneseniot tekst nesto slicno kako comboxsot od Access Vo osnova ova e nesto slicno ComboBox od MSAccess no sakam da bide textbox. Eve vaka bi trebalo da izgleda koga se prebaruva Jas da go spremam ova sto go pravam i go stavam da vidime sto cini a sto ne cini.
Prilozi: Text_Search.bmp (Velicina datoteke:383.03 KB)

Gjoreski

01.11.2013 13:40

Predmet:Re: User control

eve vaka da ja definiram celata zadaca:
Mi treba da napravam User controla textbox koja ke ima nekolku funkcii.

1. Da bide Bound odnosno da moze da se povrzi so recordset
a. DataSource
b. DataField
2. Treba vo text da se prikazuva edna vrednost a vo DataField treba da ima druga vrednost
Primer:
Imame recordset od tabela Vraboteni
textboxot e vrzan so recordsetot vo text od textboxsot go gledame imeto od vraboteniot
a vo DataField imame ID od vraboteniot
3. Pri promena na tekstot da se otvori grid koj ke sodrzi nekoj recordset koj ke se filtrira na osnova
od vneseniot tekst nesto slicno kako comboxsot od Access

Vo osnova ova e nesto slicno ComboBox od MSAccess no sakam da bide textbox.

Eve vaka bi trebalo da izgleda koga se prebaruva

Jas da go spremam ova sto go pravam i go stavam da vidime sto cini a sto ne cini.

Prilozi:
Text_Search.bmp (Velicina datoteke:383.03 KB)

zxz	01.11.2013 15:08
Predmet:Re: User control Ako sam te dobro razumio ti hoces da tvoj textbox oponasa access combo box (world text) odnosno da vidi jednu kolonu iz neke tabele a da pamti id od te tabele te da po njoj filtrira podatke u datagrid ili list. Jesam li dobro razumio?

zxz

01.11.2013 15:08

Predmet:Re: User control

Ako sam te dobro razumio ti hoces da tvoj textbox oponasa access combo box (world text) odnosno da vidi jednu kolonu iz neke tabele a da pamti id od te tabele te da po njoj filtrira podatke u datagrid ili list.

Jesam li dobro razumio?

Gjoreski	01.11.2013 15:13
Predmet:Re: User control Tocno taka samo sto podatocite se filtriraat ne po id tuku po vneseniot teks

Gjoreski

01.11.2013 15:13

Predmet:Re: User control

Tocno taka samo sto podatocite se filtriraat ne po id tuku po vneseniot teks

zxz	01.11.2013 15:22
Predmet:Re: User control E to mozes uraditi sa Activx Microsoft data bound list. i u njoj imas dbcombo koji tako radi. Stim sto moras biti oprezan jer niti jenda ova nemoze raditi kao combo u accessu sa velikim brojem redova. Preporucujem samo do 500 redova preko ne. Ako treba neki primjer mogu napraviti.

zxz

01.11.2013 15:22

Predmet:Re: User control

E to mozes uraditi sa Activx Microsoft data bound list. i u njoj imas dbcombo koji tako radi.
Stim sto moras biti oprezan jer niti jenda ova nemoze raditi kao combo u accessu sa velikim brojem redova.
Preporucujem samo do 500 redova preko ne.

Ako treba neki primjer mogu napraviti.

Gjoreski	01.11.2013 22:16
Predmet:Re: User control Eve kade zapnav
Prilozi: ctlText.rar (Velicina datoteke:2.64 KB)