分页控件(vb6.0中有没有分页显示控件)
其实分页控件的问题并不复杂，但是又很多的朋友都不太了解vb6.0中有没有分页显示控件，因此呢，今天小编就来为大家分享分页控件的一些知识，希望可以帮助到大家，下面我们一起来看看这个问题的分析吧！
vb6.0中有没有分页显示控件
★呵呵！
>>将文本赋值给MsFlexGrid的单元格
MsFlexGrid.TextMatrix(3,1)=”Hello”
>>在MsFlexGrid控件单元格中插入背景图形
Set MsFlexGrid.CellPicture=LoadPicture(“C:\temp\1.bmp”)
>>选中某个单元
MsFlexGrid.Row=1
MsFlexGrid.Col=1
>>用粗体格式化当前选中单元
MsFlexGrid.CellFontBold=True
>>添加新的一行
使用AddItem方法,用Tab字符分开不同单元格的内容
dim row as string
row=”AAA”&vbtab&”bbb”
MsFlexFrid1.addItem row
>>怎样来实现MSFlexGrid控件单数行背景为白色，双数的行背景为蓝色?
Dim i As Integer
With MSFlexGrid1
.AllowBigSelection= True’设置网格样式
.FillStyle= flexFillRepeat
For i= 0 To.Rows- 1
.Row= i:.Col=.FixedCols
.ColSel=.Cols()-.FixedCols- 1
If i Mod 2= 0 Then
.CellBackColor=&HC0C0C0’浅灰
Else
.CellBackColor= vbBlue’兰色
End If
Next i
End With
>> MSFlexGrid控件如何移到最后一行
MSFlexGrid1.TopRow= MSFlexGrid1.Rows– 1
>>如何判断msflexgrid有无滚动条
Declare Function GetScrollRange Lib"user32"(ByVal hWnd As Long, ByVal nBar As Long, lpMinPos As Long, lpMaxPos As Long) As Long
Public Const SB_HORZ=&H0
Public Const SB_VERT=&H1
Public Function VsScroll(MshGrid As MSHFlexGrid) As Boolean’判断水平滚动条的可见性
Dim i As Long
VsScroll= False
i= GetScrollRange(MshGrid.hWnd, SB_HORZ, lpMinPos, lpMaxPos)
If lpMaxPos<> lpMinPos Then VsScroll= True
End Function
Public Function HeScroll(MshGrid As MSHFlexGrid) As Boolean’判断垂直滚动条的可见性
Dim i As Long
HeScroll= False
i= GetScrollRange(MshGrid.hWnd, SB_VERT, lpMinPos, lpMaxPos)
If lpMaxPos<> lpMinPos Then HeScroll= True
End Function
>>程序运行时，想动态增加MSFlexgrid的列数
在第2列后插入一列：
Private Sub Form_Load()
Me.MSHFlexGrid1.Cols= 5
MSHFlexGrid1.Rows= 2
For i= 0 To Me.MSHFlexGrid1.Cols- 1
Me.MSHFlexGrid1.TextMatrix(0, i)= i
Me.MSHFlexGrid1.TextMatrix(1, i)= i
Next
End Sub
Private Sub Command1_Click()
Me.MSHFlexGrid1.Cols= Me.MSHFlexGrid1.Cols+ 1
Me.MSHFlexGrid1.ColPosition(5)= 3
End Sub
>>请教MSFlexGrid中的对齐功能的使用
设置MSFlexGrid1.ColAlignment(index)=n
>>得到MSFlexGrid控件中当前选中的一行
msflexgrid1.rowsel就是当前选中行
>>如何通过代码调节列宽度
msflexgrid1.colwidth(i)=4000
c# 分页代码
那个东西要自己写。。
我写了一个，挺复杂的。。。
给你做参考吧。。。。
<%
//分页
int allWriteBackForumNum= AllDataWorkTitle.WriteBackFroumNum(forumTitleId);//得到全部回帖数量，分页用
int maxPageNum= allWriteBackForumNum/ 10+ 1;
if(allWriteBackForumNum% 10== 0&& allWriteBackForumNum!= 0)//如果回帖数量是10的倍数，减去最后那个空页
{
maxPageNum= maxPageNum- 1;
}
Response.Write("");//输出写空格
Response.Write("共"+(allWriteBackForumNum- 1).ToString()+"楼");
//输出页数并且都加上链接而且页数多的话，显示部分(花线内)
//************************************************************************************************************
Response.Write("");
if(allWriteBackForumNum!= 0&& maxPageNum<= 10)
{
for(int j= 1; j<= maxPageNum; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId
+"&ProductId="+ productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+ j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
Response.Write("<br>");
}
else if(maxPageNum> 10)
{
if(pageNum== 1)
{
for(int j= 1; j<= 10; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+ j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
string gg="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+(pageNum+ 1).ToString()+">>></a>";
string ff="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ maxPageNum+">...."+ maxPageNum.ToString()+"</a>";
Response.Write(""+ gg+""+ ff+"");
}
else if(pageNum== maxPageNum)
{
string ff="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum=1>1....</a>";
string gg="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+(pageNum- 1).ToString()+"><<</a>";
Response.Write(""+ ff+""+ gg+"");
for(int j= maxPageNum- 9; j<= maxPageNum; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId
+"&ProductId="+ productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+ j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
}
else
{
string ff="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum=1>1....</a>";
string gg="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+(pageNum- 1).ToString()+"><<</a>";
Response.Write(""+ ff+""+ gg+"");
if(pageNum- 1> 5&& maxPageNum- pageNum> 5)
{
for(int j= pageNum- 4; j<= pageNum+ 6; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId
+"&ProductId="+ productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+ j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
}
else if(pageNum- 1<= 5)
{
for(int j= 1; j<= 10; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+
brandId+"&ProductId="+ productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+
j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
}
else
{
for(int j= maxPageNum- 10; j<= maxPageNum; j++)
{
if(j== pageNum)
{
Response.Write("<font color= red>["+ j.ToString()+"]</font>");
}
else
{
string ee="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+
brandId+"&ProductId="+ productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ j.ToString()+">["+ j.ToString()+"]</a>";
Response.Write(""+ ee+"");
}
}
}
string hh="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+(pageNum+ 1).ToString()+">>></a>";
string rr="<a href=ForumPage.aspx?MclassId="+ mClassId+"&NclassId="+ nClassId+"&BrandId="+ brandId+"&ProductId="+
productId+"&ForumTitleId="+ forumTitleId+"&pageNum="+ maxPageNum+">...."+ maxPageNum.ToString()+"</a>";
Response.Write(""+ hh+""+ rr+"");
}
}
//************************************************************************************************************
//输出页数并且都加上链接而且页数多的话，显示部分(花线内)
%>
关于本次分页控件和vb6.0中有没有分页显示控件的问题分享到这里就结束了，如果解决了您的问题，我们非常高兴。