Spanish Ayuda - Codigo Java a Basic

[mandias]

Hola, llevo un rato largo intentando pasar el siguiente fragmento que escribí en su dia en Java a Basic, pero no soy capaz.

Por un lado un String con varias frases.

 String lista[]={
            "Frase Numero 1",
            "Frase Numero 2",
            "Frase Numero 3",
            "Frase Numero 4",
            "Frase Numero 5"
};

Y por otro un Random que selecciona aleatoriamente una frase

int numero=(int) Math.round((Math.random()*4));
TextView resultado = (TextView)findViewById(R.id.fullscreen_content);
resultado.setText(lista[numero]);

A ver si alguien puedo echarme un cable. Gracias de antemano.

 

[Descartex]

Muy buenas.
Como decia Jack el Destripador, vayamos por partes

Por un lado un String con varias frases.

Sería algo asi:

Dim Lista() as String
Lista= Array as String("Frase Numero 1",
            "Frase Numero 2",
            "Frase Numero 3",
            "Frase Numero 4",
            "Frase Numero 5")

Y por otro un Random que selecciona aleatoriamente una frase

Sería algo asi:

Dim r as Int = Rnd(0,5)
Dim Resultado as EditText
Resultado.Text= Lista(r)

Ten en cuenta que la funcion Rnd devuelve un entero aleatorio entre el limite inferior (inlusive) y el superior (excluido).

Un saludo.