Kako da napravim anketu

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Mislio sam da napravim jednostavnu anketu koja podatke zapisuje u txt fajl.
u fajlu sam sacuvao podatke ovako
33 33 33
znaci samo tri broja
Mislio sam da ih ucitam preko streamreadera zatim uradim sledece

Dim Citac As IO.StreamReader = New IO.StreamReader("c:\proba.txt") Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load         Dim strTekst() As String = Citac.ReadToEnd.Split(" ")         Citac.Close()         Lb1.Text = "Vrijednost (" & strTekst(1) & ")"         Lb2.Text = "Vrijednost (" & strTekst(2) & ")"         Lb3.Text = "Vrijednost (" & strTekst(3) & ")"         Dim A, B, C As Integer         A = CInt(strTekst(1))         B = CInt(strTekst(2))         C = CInt(strTekst(3))         Bar1.Width = Unit.Pixel(A)         Bar2.Width = Unit.Pixel(B)         Bar3.Width = Unit.Pixel(C)         Dim F As Integer = A + B + C         Response.Write("Ukupno: " & F)     End Sub

Bar1,2 i 3 su slike i to sam mislio da mi bude graficki prikaz

Jel ima neko ideju kako da ovo malo sredim i ako ima neko primjer boljeg koda (hocu da probam samo sa txt fajlom bez baze)

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Sorry na ovolikom delay-u.
Ti hoces da prikazes slikovito rezultate glasanja?
Nesto kao sto je u phpbbu glasanje. Za prvu opciju su glasali toliko i toliko itd...

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

da da bas tako