Prikazi cijelu temu 27.11.2011 19:19
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Pomoc oko combobox-a
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Combobox1_ID_AfterUpdate()
  2. Me.test.DefaultValue = "'" & Me.Combobox1_ID.Column(1) & "'"
  3. Me.test1.DefaultValue = Me.Combobox1_ID.Column(2)
  4. End Sub
  5.  
  6. Private Sub Combobox2_AfterUpdate()
  7.     Forms![Combobox1]![Subform Underformulär].Form![Combobox2_ID].DefaultValue = Me.Combobox2
  8.     Me.test_Combobox2.DefaultValue = "'" & Me.Combobox2.Column(1) & "'"
  9. End Sub

Izbrisi control source na ovim poljima.
Znaci na test test1 i test_combo2 obrisi control source neka bude prazno
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.