Predmet:Re: Cascading Combo Boxes u Formi i Subformi
PreuzmiIzvorni kôd (Visual Basic):Private Sub Combobox1_ID_AfterUpdate()
Me.Image27.Visible = True
Me.Combobox2.Visible = True
Me.SUB_ShopOrder.Visible = True
If Me.RecordsetClone.NoMatch Then
Me.Image27.Visible = False
Me.Combobox2.Visible = False
Me.SUB_ShopOrder.Visible = False
End If
' ovo sam ja dodo
Forms![FRM_TimeManagement]![Child2].Form![OP_ID].RowSource = Forms![FRM_TimeManagement]![Child2].Form![OP_ID].RowSource
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.