Procent: Rund af

Hej.
Jeg sidder og bøvler med et afstemningsscript som ikke vil som jeg vil.

Jeg har lavet det simpelt, da det kun er mig der opretter spørgsmål.
Ud for hvert svar (når der ER stemt) er følgende:

<%
sql = "select count(*) as antal from stemmer where svarmulighed = 1"
set svar1 = conn.execute(sql)


iAntal = svar1("antal")
iProcent = CLng(iAntal)*100
iStemmer=CLng(iProcent)/CLng(AlleStemmer)
bStemmer = Round(iStemmer,2)


Response.Write af("svar1")
Response.Write "<br>"
Response.Write bStemmer & "%"
%>

Følgende står ud for Svarmulighed 1 ud af 5.
Før dette kode har jeg naturligs "talt" Alle stemmerne sammen som er "AlleStemmer"
Problemet er, at jeg har lavet en tabel som viser barometeret. width="<%=bStemmer%>%" - men hvis jeg sætter 1 stemme på 3 forskellige, så bliver de 3 til 33,33333333333%, hvilket tabellen ikke kan li, og derfor bliver den ikke 33% lang.

Jeg har rundet af med 2 decimaler, men lige nu har jeg en der hedder 12,5% og det kan tabellen heller ikke li - Hva gør jeg? :D