form1.oSelect.add("oOption")
Function caca() Dim oOption form1.oSelect.add("oOption") oOption.innertext = "teciii" oOption.Value = "2" End function