Prikazi cijelu temu 25.02.2020 00:07
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Cascading Combo Boxes u Formi i Subformi
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Combobox1_ID_AfterUpdate()
  2.  
  3. Me.Image27.Visible = True
  4. Me.Combobox2.Visible = True
  5. Me.SUB_ShopOrder.Visible = True
  6.  
  7. If Me.RecordsetClone.NoMatch Then
  8.  
  9. Me.Image27.Visible = False
  10. Me.Combobox2.Visible = False
  11. Me.SUB_ShopOrder.Visible = False
  12.  
  13. End If
  14.  
  15. ' ovo sam ja dodo
  16. Forms![FRM_TimeManagement]![Child2].Form![OP_ID].RowSource = Forms![FRM_TimeManagement]![Child2].Form![OP_ID].RowSource
  17. End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.