banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

Annonce

GEODATA DAYS 2024

#1 Mon 28 June 2010 16:41

jean94
Participant assidu
Date d'inscription: 13 Aug 2009
Messages: 436

[MapBasic 10] Fonction Rnd()

Bonjour à tous

Code:

Dim RandomCount As SmallInt
Dim RandomNum As SmallInt
Dim RandomId As String

RandomCount = 1
RandomId = "id"

Do While RandomCount = 8
randomize
RandomNum = Right$(Rnd(1), 1)
RandomCount = RandomCount + 1
RandomId = RandomId + RandomNum
print RandomNum
print RandomId
Loop

Quelqu'un peux voir l'erreur, mes "print" ne s'affiche pas
JF

Hors ligne

 

#2 Mon 28 June 2010 16:46

Spacejo
Membre
Lieu: Nancy
Date d'inscription: 17 Aug 2008
Messages: 2511

Re: [MapBasic 10] Fonction Rnd()

Salut,

Au risque de dire une annerie smile
As tu essayé -->

Code:

RandomId = RandomId & str$(RandomNum)

A+
Joël

Hors ligne

 

#3 Mon 28 June 2010 17:01

jean94
Participant assidu
Date d'inscription: 13 Aug 2009
Messages: 436

Re: [MapBasic 10] Fonction Rnd()

Oui et j'ai le meme résultat

Pour s'assurer de bien ce comprendre je veux un id suis de 8 carathère aléatoire

e.g. : id69320791

JF

Dernière modification par jean94 (Mon 28 June 2010 17:03)

Hors ligne

 

#4 Mon 28 June 2010 17:06

Spacejo
Membre
Lieu: Nancy
Date d'inscription: 17 Aug 2008
Messages: 2511

Re: [MapBasic 10] Fonction Rnd()

et --> RandomId = "id" & str$(RandomNum)

Hors ligne

 

#5 Mon 28 June 2010 17:15

jean94
Participant assidu
Date d'inscription: 13 Aug 2009
Messages: 436

Re: [MapBasic 10] Fonction Rnd()

Je ne peux pas car il s'agit d'une boucle et RandimId = "Id" est déja déclarer plus haut.

Au fait le code fonctionne dans la FMB mais pas en MBX !!!

Hors ligne

 

#6 Mon 28 June 2010 17:19

Spacejo
Membre
Lieu: Nancy
Date d'inscription: 17 Aug 2008
Messages: 2511

Re: [MapBasic 10] Fonction Rnd()

As tu un message d'erreur?
As tu déclaré ton fichier MapBasic.Def?

Hors ligne

 

#7 Mon 28 June 2010 17:28

jean94
Participant assidu
Date d'inscription: 13 Aug 2009
Messages: 436

Re: [MapBasic 10] Fonction Rnd()

Non et Oui

En fait j'ai partiellement règler le problème avec

Do While RandomCount < 9 
au lieu de
Do While RandomCount = 8

JF

Hors ligne

 

#8 Mon 28 June 2010 17:59

jean94
Participant assidu
Date d'inscription: 13 Aug 2009
Messages: 436

Re: [MapBasic 10] Fonction Rnd()

Je relance le post avec ceci,

Exist-il une fonction qui rafraichie un dialog ou une listbox?
Voici mon problème :
L'utilisateur ajoute un champ à une table via un edit text. Lorsque la sub est terminée je voudrais que le dialog edit text disparraisse et que mon dialog "sub main" soit à jour c-a-d que le list box ait ajouté le nouveau champ dans sa list.

J'ai une fonction qui met à jout le listbox mais je ne peux l'appeler de ma fonction edit text, car il ne reconnais pas l'ID de mon control list box de mon dialog "sub main"

JF

Dernière modification par jean94 (Mon 28 June 2010 18:02)

Hors ligne

 

Pied de page des forums

Powered by FluxBB