Probervios Chinos 6.0 o .net

Cex

Lanero Reconocido
9 Feb 2006
1,785
Hola!

Tal ves le llame la atencion el titulo del tema, lo que sucede es que tengo la curiosidad por hacer una aplicacion en visual basic 6.0 o .net q pueda leerme de un documento de texto (TXT) una determinada linea. me explico

He ido recolectando proverbios chinos durante muxo tiempo, me gustan muxo, y me gusta leer y meditar uno diariamente.

entonces queria desarrollar esta pequeña aplicacion para fines no mas de investigacion, aprender a hacerlo y para mi propio uso.

Puedo hacer que me lea todo el archivo en una caja de texto, pero no se como hacer para que me lea una determinada linea aleatoria.

podrian ayudarme?
 
Hay varias formas pero esta es la más fácil (.NET):
Agrega un RichTextBox invisible al form. Después carga el txt entero en él. Luego, para leer una línea aleatoria usa Randomize() y MsgBox(RichTextBox1.Lines(Int((RichTextBox1.Lines.Length) * Rnd())))

Quedaría algo así:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Randomize()
MsgBox(RichTextBox1.Lines(Int((RichTextBox1.Lines.Length) * Rnd())))
End
End Sub

PD: Me pasas los proverbios?? :D
 

Los últimos temas