Re: [Gambas-user] Question Rnd vb to gambas

2009-11-05 Thread Dmxa
Thx all for help XD Dmxa wrote: > > I have a doubt, not long ago I started with the gambas2 and I am proving > of passing 1 program Rnd of VB08 to gambas2 but when doing the function > Rnd from a listbox to a textbox I do not obtain to leave. > in VB08 use: > Dim i2 As Integer > i2 = Int(Rnd()

Re: [Gambas-user] Question Rnd vb to gambas

2009-11-05 Thread Fabien Bodard
Dim i2 As Integer i2 = Int(Rnd() * (lbDatos2.Items.Count - 1)) lis.lisx.Text = lis.lisx.Text & lbDatos2.Items.Item(i2) & vbCrLf & vbCrLf gambas Dim i2 as integer i2 = int(Rnd()*(lbDatos2.Count-1) txtB.Text &= lbDatos2[i2] & "\n\n" that's all :) --

[Gambas-user] Question Rnd vb to gambas

2009-11-04 Thread Dmxa
I have a doubt, not long ago I started with the gambas2 and I am proving of passing 1 program Rnd of VB08 to gambas2 but when doing the function Rnd from a listbox to a textbox I do not obtain to leave. in VB08 use: Dim i2 As Integer i2 = Int(Rnd() * (lbDatos2.Items.Count - 1)) lis.lisx.Text = li