Lit et écrit une chaîne sans les accents tout en majuscules ou en minuscules

De zBasic
Aller à : navigation, rechercher

Zbasic sansaccent.png

Sub Main
  GlobalScope.BasicLibraries.loadLibrary("zBasic")
  maCell = zCellule.Lit("Feuille1", "A1", "C")
  enMaj = zBasic.SansAccent(maCell, 1)
  enMin = zBasic.SansAccent(maCell, 0)
  zCellule.Ecrit("Feuille1", "A2", "C", enMaj)
  zCellule.Ecrit("Feuille1", "A3", "C", enMin)
End sub