; html += "[<font color=#cccccc>上一页</font>] " Else html += "<a href=?id=" & articleid & "&page=" & (1) & ">[上一页]</a> " End If
End If For i = 1 To pagecount
If (i = pp) Then ''''如果是当前页，加粗显示 html += "<b>[" & i & "]</b> " Else html += "<a href=?id=" & articleid & "&page=" & i & ">[" & i & "]</a> " End If Next If (pp + 1 > pagecount) Then ''''显示下一页，方便浏览 If pp = pagecount Then html += "[<font color=#cccccc>下一页</font>] " Else html += "<a href=?id=" & articleid & "&page=" & (pagecount) & ">[下一页]</a></p>" End If Else html += "<a href=?id=" & articleid & "&page=" & (pp + 1) & ">[下一页]</a></p>" End If End If Label2.Text = html End Sub
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
