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()
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 :)
--
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