ASP.NET源码社区
在asp.net 2.0中，增加了许多新的控件和功能，大大方便了开发者的开发。这次要讲解的是在asp.net 2.0中新增的multiview控件的使用。所谓multiview控件，实际上是有点象在c/s开发中很常见的tabcontrol控件，可以在一个页面中，放置多个"view"(我们称为选项卡)，比如可以用multiview控件，可以让用户在同一页面中，通过切换到每个选项卡，从而看到要看的内容，而不用每次都重新打开一个新的窗口。本文，将以visual studio .net 2005 为例，说明如何使用asp.net 2.0中的multiview控件。
首先，打开visual studio .net 2005,新建一个website,我们选用vb.net语言。然后，往web窗体中拖拉一个menu控件，这个menu控件是负责控制各个选项卡的，也就是最终呈现在用户面前的界面，并且我们指定每个选项卡的图片样式，代码如下：
＜asp:Menu ID="Menu1" Width="168px" runat="server" Orientation="Horizontal" StaticEnableDefaultPopOutImage="False" OnMenuItemClick="Menu1_MenuItemClick"＞
＜Items＞
＜asp:MenuItem ImageUrl="~/selectedtab.GIF" Text=" " Value="0"＞＜/asp:MenuItem＞
＜asp:MenuItem ImageUrl="~/unselectedtab.GIF" Text=" " Value="1"＞＜/asp:MenuItem＞
＜asp:MenuItem ImageUrl="~/unselectedtab.GIF" Text=" " Value="2"＞＜/asp:MenuItem＞
＜/Items＞
＜/asp:Menu＞ |
接着，拖拉一个multiview控件到WEB窗体中，放在刚才的menu控件下，注意，multiview控件中，分成很多个view选项卡，我们这里为了方便，暂时设置为3个选项卡，并且在每一个选项卡中，都设计一个表格，在实际应用中，这个表格就是当用户点选每个选项卡时显示给用户看的内容。代码如下
＜asp:MultiView ID="MultiView1" runat="server" ActiveViewIndex="0" ＞
＜asp:View ID="Tab1" runat="server" ＞
＜table width="600" height="400" cellpadding=0 cellspacing=0＞
＜tr valign="top"＞
＜td class="TabArea" style="width: 600px"＞
TAB VIEW 1
INSERT YOUR CONENT IN HERE
CHANGE SELECTED IMAGE URL AS NECESSARY
＜/td＞
＜/tr＞
＜/table＞
＜/asp:View＞
＜asp:View ID="Tab2" runat="server"＞
＜table width="600px" height="400px" cellpadding=0 cellspacing=0＞
＜tr valign="top"＞
＜td class="TabArea" style="width: 600px"＞
TAB VIEW 2
INSERT YOUR CONENT IN HERE
CHANGE SELECTED IMAGE URL AS NECESSARY
＜/td＞
＜/tr＞
＜/table＞
＜/asp:View＞
＜asp:View ID="Tab3" runat="server"＞
＜table width="600px" height="400px" cellpadding=0 cellspacing=0＞
＜tr valign="top"＞
＜td class="TabArea" style="width: 600px"＞
TAB VIEW 3
INSERT YOUR CONENT IN HERE
CHANGE SELECTED IMAGE URL AS NECESSARY
＜/td＞
＜/tr＞
＜/table＞
＜/asp:View＞
＜/asp:MultiView＞ |
最后，我们对menu的itemclick事件进行编写代码，在下面的代码中，为了演示效果，我们设置了两幅图片，当用户点选当前选项卡时，选项卡的图片显示出"selected tab"的图案，而其他的两个没点选的则显示灰色，代码如下
Protected Sub Menu1_MenuItemClick(ByVal sender As Object, _
ByVal e As MenuEventArgs) Handles Menu1.MenuItemClick
MultiView1.ActiveViewIndex = Int32.Parse(e.Item.Value)
Dim i As Integer
For i = 0 To Menu1.Items.Count - 1
If i = e.Item.Value Then
Menu1.Items(i).ImageUrl = "selectedtab.gif"
Else
Menu1.Items(i).ImageUrl = "unselectedtab.gif"
End If
Next
End Sub |
运行上面的程序，可以得到下面的结果，下图是点选第二个选项卡时的结果。
