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?]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