想得到这种1排显示２个或者３个的结果，请问该如何写代码？

我有一个函数，
'Arrange 竖排几列。只设3个值，1、2、3

Sub GetActicle(Arrange)
  sql = "select top 12 ID,Title From MyTable order by ID desc"
  ...
  (略过)
  do while not rs.eof 

  If Arrange = 2 then
  DivStr = "<li> '"&rs(1)&" </li>"
  End If
'*****　　想得到这种排列结果如下，请问该如何写代码,前提是不用table,用 div　 ********************

1. 上csdn有哪些好处？ 2.不上csdn有哪些坏处？
3. 上了csdn能获得哪些技术？ 4.能学到真正技术吗？

新手，请贴出完整代码，谢谢。

float:left