Lancer un dialogue et récupérer la liste de ses contrôles : Différence entre versions
De zBasic
| Ligne 5 : | Ligne 5 : | ||
oRetour = [[zDial.Lance]](oDlg) | oRetour = [[zDial.Lance]](oDlg) | ||
maListe = [[zDial.Liste]](oRetour) | maListe = [[zDial.Liste]](oRetour) | ||
| − | if | + | if oRetour.Tag = 1 then [[zTable.Ecrit]]("Feuille1", "A1", maListe) |
End Sub | End Sub | ||
[[Catégorie:Exemples]] | [[Catégorie:Exemples]] | ||
Version actuelle en date du 8 avril 2024 à 09:16
Sub Main
GlobalScope.BasicLibraries.loadLibrary ("zBasic")
oDlg = zDial.Charge("Dialog1")
oRetour = zDial.Lance(oDlg)
maListe = zDial.Liste(oRetour)
if oRetour.Tag = 1 then zTable.Ecrit("Feuille1", "A1", maListe)
End Sub
