Type boolean non reconnu

[stef]

Salut,bon, j'ai telecharger un PDF en prog LS et là, je vois que le type Boolean existe bel et bien.Pourkoi, quand je cree un fonction qui me retourne un booleen, à la compilation, ca me dit que ce type n'existe pas ?Faut il faire appel a des lib specifiques, et si oui lesquelles ?Bref, si vous avez une soluce, ca m'interesse.Au fait, comment fait on pour retourner un tableau dans un fonction ?J'ai essaye ceci mais sans resultat :function titi as variantdim table(1) as stringtable(0) = "toto"table(1) = "tata"titi = tableet dans le sub :dim valeur as variantvaleur = titiune idée ?Merci !:-)

[Cedric]

extrait de l'aide du designer:A Boolean value is one that contains the value of True or False only. Boolean values are stored as 16-bit (2-byte) numbers. When Boolean values are converted to numeric data types, True becomes -1 and False becomes 0. When other numeric data types are converted to the Boolean data type, 0 becomes False and any other value becomes True.Boolean variables are initialized to False.Mais ce n'est vrai qu'en v6 !En v5, tu peux toutefois utiliser le type interger et y stocker True & FalseEnsuite avec ta variable integer, tu peux tout à fais écrire:If MonBooleen then blablaEnd If============================================En ce qui concerne le retour d'un tableau, ben.... euh... je crois qu'on peut pas. Par contre, tu peux passer ton tableau en paramètre à ta fonction et celle-ci pourra modifier le tableau.

[stef]

Ok, je suis en V5...en fait, je croyais que le type boolean etait autorisé.Sinon, j'ai essayé de le passer en param mais ca marche pasComment declares tu ton appel avec le param tableau ??

[Cedric]

Ben, tu écris:Sub ZZ( MonTab() As String ) End Sub

[Lémur]

a on est en v5 car en v6 passage et/ou retour de tableau sa passe tres bien

[stef]

Ouais, je m'en doute bien que la syntaxe est comme ca mais lors de la compile, il me jette un msg du type : pass by value....Bref, j'ai quand meme reussi en V5 a passer un tableau en retour...DE la facon suivante, ca fonctionne bien :function titi as variant ' je le definit tel queldim table(2) as stringtable(1) = "ok"table(2) = "cool"titi = tableend functionet dans le sub :dim montab as variantmontab = titi.....En fait, j'ai galere parce que je crois que la syntaxe que j'utilisais lui plaisait po (je savais po que Lotus est un logiciel pensant !)Merci pour tout !:-)

[Cedric]

chez moi Sub ZZ( MonTab() As String )End Subne pose pas de pb à la compile...J'ai même écrit ça:Function titi As Variant ' je le definit tel quel Dim table(2) As String table(1) = "ok" table(2) = "cool" Call ZZ (Table) ' ZZ Table ' Les deux écritures passent titi = tableEnd Functionconcenrnat ton écriture...ben, je chipote je sais, tu ne retourne pas un tableau, mais un variant.moi, j'aime pas les variant )