Exibir assim: 101.000,00 até 200.000,00 ...

Olá a todos,

Estou concluindo um trabalho e BARREI apenas na forma de exibir na tela.

Tenho uma página que monta os Registros em CHECKBOX, com todos os Valores R$ encontrados, está assim:

95.000,00

225.000,00

280.000,00

480.000,00

Mas não quero que mostre desta forma, é muito FEIO.

Como posso fazer para que exibido desta forma:

de 50.000,00 até 100.000,00

de 101.000,00 até 200.000,00

de 201.000,00 até 300.000,00

de 301.000,00 até 400.000,00

E assim por diante.

Meus códigos estão assim:

Base de Dados ACCESS:

Campo: valor_imovel

Tipo de dados: número

Tamanho do campo: simples

Formato: "R$ "#.##0,00;"(R$ "#.##0,00)

Casa decimais: Automático

Segue os Códidos e Select:

>

<%
Dim SQL1, lista_tipo, bairros, lista_valor, listando_valor
bairros = Request.Querystring("bairros")

SQL1="Select valor_imovel FROM imoveis WHERE codBairros IN ("& bairros &") GROUP by valor_imovel Order by valor_imovel"

Set lista_valor = dados.Execute(SQL1)
%>

<%
While Not lista_valor.EOF

Set listando_valor = dadosDB.Execute("SELECT valor FROM valores WHERE valor=" & lista_valor("valor_imovel"))
%>

<%
If listando_valor.EOF Then

'Response.Write "<strong>Vazia</strong>"
Else
%>

<a href='javascript:selecionar(<%=lista_valor(valor_imovel)%>);><input' type="checkbox" class="marcar" name="valores" id="<%=lista_valor("valor_imovel")%>" value="<%=lista_valor("valor_imovel")%>"/> <%=FormatNumber(listando_valor("valor"),2)%></a>

<%
End If
%>

<%
lista_valor.Movenext
Wend
%>

<div align="center"><input name="Pesquisar" type="submit" class="botao" id="Pesquisar" value=".:: Buscar ::." /></div>

<%
lista_valor.Close
Set lista_valor = Nothing
%>

Espero que mencionei tudo certinho para melhor entendimento de minha dúvida.

Não sei nem por onde começar, preciso da ajuda de vcs por favor.

Att,

William