Private Sub CommandButton1_Click()
   ComboBox1.list = Array("podatak1", "Podatak2", "Podatak3", "Podatak4")
 End Sub