Hello Fernando, Since version 3.6 you can use Rand that returns an integer, contrary to Rnd, the higher born of the interval can be returned. Rand(1, 36), 1)
Hello all, kindly you can let me know if this email appears as a SPAM Regards Gianluigi 2015-06-05 11:07 GMT+02:00 Ru Vuott <vu...@yahoo.it>: > ...or similarly by using String[] array: > > Public Sub Main() > > Dim b As Byte > Dim ss As String[] = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", > "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", > "U", "V", "W", "X", "Y", "Z", > "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", > Null] > > For b = 1 To 12 > ss[ss.Max] &= ss[Rnd(0, 36)] > Next > > Print ss[ss.Max] > > End > > > > > -------------------------------------------- > Ven 5/6/15, nando <nand...@nothingsimple.com> ha scritto: > > Oggetto: Re: [Gambas-user] R: how to generation 12 random letters (A-Z > and 0-9) > A: "mailing list for gambas users" <gambas-user@lists.sourceforge.net> > Data: Venerdì 5 giugno 2015, 02:55 > > Thanks folks, > Not being pickey at all!! > I > made two mistakes.. > (That is why open source > is better than closed source) > Corrections > made: > > Dim j as Byte > Dim s as String > > For j = 1 To 12 > s &= > Mid("ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789", > Int(Rnd((1, 37)), 1) > Next > > Print s > > :) > -Fernando > > ---------- Original Message > ----------- > From: Fabien Bodard <gambas...@gmail.com> > To: mailing list for gambas users <gambas-user@lists.sourceforge.net> > Sent: Wed, 3 Jun 2015 15:14:45 +0200 > Subject: Re: [Gambas-user] R: how to generation > 12 random letters (A-Z and 0-9) > > > Chr(Rand(48,90)) > > > > 2015-06-02 15:28 GMT+02:00 Paul Horechuk > <phorec...@gmail.com>: > > > Just being a bit picky here, but > shouldn't that be Rnd(1,36) ? 26 > > > > letters and 10 digits? > > > > > > On 15-06-02 08:49 AM, nando wrote: > > >> Alternate: > > > >> > > >> Dim j as Byte > > >> Dim s as String > > >> > > >> For > j = 1 To 12 > > >> s &= > Mid("ABCDEFGJIJKLMOPQRSTUVWXYZ0123456789", Int(1, > 13), 1) > > >> Next > > >> > > >> > Print s > > >> > > > >> > > >> ---------- Original > Message ----------- > > >> From: > Jussi Lahtinen <jussi.lahti...@gmail.com> > > >> To: mailing list for gambas users > <gambas-user@lists.sourceforge.net> > > >> Sent: Sat, 30 May 2015 17:41:43 > +0300 > > >> Subject: Re: > [Gambas-user] R: how to generation 12 random letters (A-Z > and 0-9) > > >> > > > >>> You can write that in nicer way with rand() > function, than rnd() function. > > > >>> But that doesn't really matter, your code > works anyway. > > >>> > > >>> Jussi > > > >>> > > >>> On Sat, May > 30, 2015 at 3:12 PM, Ru Vuott <vu...@yahoo.it> > wrote: > > >>> > > >>>> Hello, > > >>>> > > > >>>> I propose: > > > >>>> > > >>>> > > >>>> Public Sub > Button1_Click() > > >>>> > > >>>> Dim j As Byte > > >>>> Dim s As String > > >>>> > > > >>>> For j = 1 To 12 > > > >>>> If Fix(Rnd(0, 2)) Then > > >>>> s &= > Chr(Rnd(48, 58)) > > >>>> > Else > > >>>> s > &= Chr(Rnd(65, 91)) > > > >>>> Endif > > > >>>> Next > > > >>>> > > >>>> > Print s > > >>>> > > >>>> End > > > >>>> > > >>>> > > >>>> > -------------------------------------------- > > >>>> Sab 30/5/15, tsukuba GIMP > user <tsukubagradua...@foxmail.com> > ha scritto: > > >>>> > > >>>> Oggetto: > [Gambas-user] how to generation 12 random letters (A-Z and > 0-9) > > >>>> A: > "gambas-user" <gambas-user@lists.sourceforge.net> > > >>>> Data: Sabato > 30 maggio 2015, 11:16 > > > >>>> > > > >>>> i want when i click button > (button_1) > > > >>>> LCDpanl(LCDLabel1) will be > Generation 12 random letters > > > >>>> how to > [UTF-8?][UTF-8?]do? > > > >>>> > > > > >>>> > ------------------------------------------------------------------------------ > > > >>>> _______________________________________________ > > >>>> Gambas-user > mailing list > > > >>>> Gambas-user@lists.sourceforge.net > > >>>> https://lists.sourceforge.net/lists/listinfo/gambas-user > > >>>> > > > >>>> > > >>>> > > >>>> > > > ------------------------------------------------------------------------------ > > >>>> > _______________________________________________ > > >>>> Gambas-user mailing > list > > >>>> Gambas-user@lists.sourceforge.net > > >>>> https://lists.sourceforge.net/lists/listinfo/gambas-user > > >>>> > > > >>> > > > ------------------------------------------------------------------------------ > > >>> > _______________________________________________ > > >>> Gambas-user mailing list > > >>> Gambas-user@lists.sourceforge.net > > >>> https://lists.sourceforge.net/lists/listinfo/gambas-user > > >> ------- End of Original Message > ------- > > >> > > > >> > > >> > > > ------------------------------------------------------------------------------ > > >> > _______________________________________________ > > >> Gambas-user mailing list > > >> Gambas-user@lists.sourceforge.net > > >> https://lists.sourceforge.net/lists/listinfo/gambas-user > > > > > > -- > > > Think Free ... > > > > Use Open Source Software > > > > > > > > > > > > ------------------------------------------------------------------------------ > > > > _______________________________________________ > > > Gambas-user mailing list > > > Gambas-user@lists.sourceforge.net > > > https://lists.sourceforge.net/lists/listinfo/gambas-user > > > > -- > > Fabien Bodard > > > > > > > ------------------------------------------------------------------------------ > > > _______________________________________________ > > Gambas-user mailing list > > Gambas-user@lists.sourceforge.net > > https://lists.sourceforge.net/lists/listinfo/gambas-user > ------- End of Original Message ------- > > > > > ------------------------------------------------------------------------------ > _______________________________________________ > Gambas-user mailing list > Gambas-user@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/gambas-user > > > ------------------------------------------------------------------------------ > _______________________________________________ > Gambas-user mailing list > Gambas-user@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/gambas-user > -- Regards Gianluigi ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user