怎么才能实行这样的排列

如：X1 X2 X3 X4
X5 X6 X7 X8这些都是从数据库中取得的我的代码排列是：
X1
X2
...
X8高手帮忙修改哈  我是新手～～～1.aspx：<%@ Page Language="VB" src="1.vb" Inherits="le.We" %>
<html>
<head>
<title>VB</title>
</head>
<body>
<form id="form" method="POST" runat="server">
<div style="padding:5px;background-color:#dedede">
<asp:label ID="lblCurrentPage" runat="server"></asp:label>
  <asp:HyperLink id="lnkPrev" runat="server">上一页</asp:HyperLink>
  <asp:HyperLink id="lnkNext" runat="server">下一页</asp:HyperLink>
</div>
<hr size="1" color="#000099"/>
</form>
<asp:Repeater ID="Repeater1" runat="server">
<Itemtemplate>
<%# DataBinder.Eval(Container.DataItem, "id") %><%# DataBinder.Eval(Container.DataItem, "正文") %><br>
</Itemtemplate></asp:Repeater>
</body>
</html>1.vb：Imports System
Imports System.Collections
Imports System.ComponentModel
Imports System.Data
Imports System.Data.OleDb
Imports System.Drawing
Imports System.Web
Imports System.Web.SessionState
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControlsNamespace le
Public Class We : Inherits Page
Protected lblCurrentPage as label
Protected lnkPrev as hyperlink
Protected lnkNext as hyperlink
Protected Repeater1 as RepeaterPublic Sub Page_Load(ByVal src As Object, ByVal e As EventArgs) Dim connstr as string = System.Configuration.ConfigurationSettings.AppSettings("conn")
 Dim objConn As OleDbConnection = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" + Server.MapPath(connstr)) 
 Dim objCommand As OleDbDataAdapter = New OleDbDataAdapter ("select * from guest", objConn) 
 Dim ds As DataSet = New DataSet () 
 objCommand.Fill(ds) 
 Dim objPds As PagedDataSource = New PagedDataSource () 
 objPds.DataSource = ds.Tables(0).DefaultView 
 objPds.AllowPaging = True 
 objPds.PageSize = 8 
 Dim CurPage As Integer 
 If Not (Request.QueryString("Page") Is Nothing) Then 
   CurPage = Convert.ToInt32(Request.QueryString("Page")) 
 Else 
   CurPage = 1 
 End If 
 objPds.CurrentPageIndex = CurPage - 1
 lblCurrentPage.Text = "当前页：" + CurPage.ToString() + "/" + objPds.PageCount.ToString()
 If Not objPds.IsFirstPage Then 
   lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage - 1) 
 End If 
 If Not objPds.IsLastPage Then 
   lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage + 1) 
 End If 
 Repeater1.DataSource = objPds 
 Repeater1.DataBind() End Sub
End Class
End Namespace