频 道 直 达 - 新闻 - 读书 - 培训 - 教程 - 前沿 - 组网 - 系统应用 - 安全 - 编程 - 存储 - 操作系统 - 数据库 - 服务器 - 专题 - 产品 - 案例库 - 技术圈 - 博客 - BBS
51CTO.COM_中国领先的IT技术网站
找资料:

VB.NET实现DataList横向数据交替变色

作者: 出处:.NET文档  (  ) 砖  (  ) 好  评论 ( ) 条  进入论坛
更新时间:2006-12-07 23:43
关 键 词:.NET  VB  DataList  变色
阅读提示:昨天群里一个网友在说交替行变色的问题,我一看,这很简单啊,不就是设置一下交替项的背景色不就行了吗?本身DataList他的样式也提供设置啊,不会吗?啊!看来我把问题看简单了!当时我想好像很少遇到过,要不自己试试!...倒。

昨天群里一个网友在说交替行变色的问题,我一看,这很简单啊,不就是设置一下交替项的背景色不就行了吗?本身DataList他的样式也提供设置啊,不会吗?但是他给我说了。他数据是设置一行显示N条数据的,所以如果说设置了那个交替项的背景色的话根本就没用。这样设置了后,变成对项起作用了。就是说一行有N项,然后那个交替色就变成在这N项当中交替了.....

啊!看来我把问题看简单了!当时我想好像很少遇到过,要不自己试试!...倒。因为最近心情很压抑,心情不太好。烦!没多少心情认真去思考解决方式,用常规自己能想到的几种解决都无法实现,解决很晕。然后呢,就索性不去想了。晚上听完广播后才又想起我要考虑这个问题,呵呵,只用了5分钟时间就想到了这个解决方式,然后呢,又用了5分钟时间去考证是否可行。今天早上来一摆弄,就可以起了。呵呵!

废话就不多说了。这个方法也是我唯一想到的方法,如果您有什么更好的方法,您也可以在这里给我提出。非常感谢!

DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>WebForm15title>
<meta content="Microsoft Visual Studio .NET 7.1" name="GENERATOR">
<meta content="Visual Basic .NET 7.1" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5"

name="vs_targetSchema">
HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
<asp:datalist id="DataList1" style="Z-INDEX: 101; LEFT: 111px;

POSITION: absolute; TOP: 54px"
runat="server" RepeatDirection="Horizontal" RepeatColumns="3"

Width="234px">
<ItemTemplate>
<asp:Label ID="lblmsg" Runat=server Text='<%# DataBinder.Eval

(Container.DataItem,"id").ToString() %>'>
asp:Label>
ItemTemplate>
<AlternatingItemTemplate>
<asp:Label ID="Label2" Runat=server Text='<%# DataBinder.Eval

(Container.DataItem,"id").ToString() %>'>
asp:Label>
AlternatingItemTemplate>
asp:datalist>form>
body>
HTML>

Imports System
Imports System.Data
Imports System.Data.oledb

Public Class WebForm15Class WebForm15
Inherits System.Web.UI.Page

Web 窗体设计器生成的代码#Region “Web 窗体设计器生成的代码”

'该调用是 Web 窗体设计器所必需的。
<System.Diagnostics.DebuggerStepThrough()>

Private Sub InitializeComponent()Sub

InitializeComponent()
End Sub
Protected WithEvents DataList1 As System.Web.UI.WebControls.DataList
'注意: 以下占位符声明是 Web 窗体设计器所必需的。
'不要删除或移动它。
Private designerPlaceholderDeclaration As System.Object
Private Sub Page_Init()Sub Page_Init(ByVal sender As System.Object,

ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
'不要使用代码编辑器修改它。
InitializeComponent()
End Sub

#End Region
Dim conn As OleDbConnection
Dim i As Integer

Private Sub Page_Load()Sub Page_Load(ByVal sender As System.Object,

ByVal e As System.EventArgs) Handles MyBase.Load
'在此处放置初始化页的用户代码
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;

" & "Data Source=" & Server.MapPath("data/link.mdb"))
Dim cmd As New OleDbDataAdapter("select top 15 id,jj from link", conn)
Dim ds As New DataSet
cmd.Fill(ds, "tab")

DataList1.DataSource = ds.Tables("tab")
DataList1.DataBind()
End Sub

Private Sub DataList1_ItemDataBound()Sub DataList1_ItemDataBound

(ByVal sender As Object,

ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles

DataList1.ItemDataBound
i = i + 1
If i > 3 And i <= 6 Then
e.Item.BackColor = Color.Blue
End If
If i >= 6 Then
i = 0
End If
End Sub
End Class

在补充一下,这里的i>3 and i<=6这个,我刚才没讲清楚,可能您有点困惑呢!

因为我这里是每行显示三条数据啦!所以这里是3和6,如果您是5条的话,那么就是5和10了,以此类推!

(责任编辑 火凤凰 sunsj@51cto.com  TEL:(010)68476636-8007)


发表
查看
我也说两句

匿名发表

(如果看不清请点击图片进行更换)


中 国 领 先 的 IT 技 术 网 站 ·
技 术 成 就 梦 想
·Java基础教程 (查看52473次)
·UML类图详解 (查看46951次)
·Java编程开发手册 (查看25172次)
·UML统一建模语言 (查看24155次)
·C#技术开发指南 (查看22515次)
·Java编程开发手册 (1195个砖)
·Java基础教程 (429个砖)
·C#技术开发指南 (304个砖)
·PB开发教程 (220个砖)
·.NET开发手册 (217个砖)
·Java编程开发手册 (653个好)
·Java基础教程 (569个好)
·.NET开发手册 (251个好)
·PB开发教程 (209个好)
·Delphi开发技术手册 (174个好)
订阅技术快讯
电子杂志下载
名称:网络安全精品应用黄皮书
简介:《2007精品网络安全黄皮书》包括了9个大类24个小类, 800余篇文章,内容包含了熊猫烧香病毒、DDOS攻击、ARP病等热点问题的介绍及解决方案。从病毒查杀、防范、系统、数据等各方面的安全设置到黑客技术的了解、防范,涉及到了安全应用的全部领域, 由浅至深内容全面。
名称:Vista精品应用黄皮书
简介:《Vista精品应用黄皮书》囊括了Vista的各方面内容。此次的精简版,是将里面的内容做了提取,便于用户下载和使用。内容包含了各种Vista的安装与实施、技巧与解析以及各种Vista相关学习文档和相关软件的安全下载。该电子书是了解和应用Vista人员必备的工具手册,并且也是第一本
名称:2006中国IT论坛精品集合
简介:本书由“51CTO论坛推广联盟”制作完成。书中所有内容均来自各联盟成员的论坛(网站)。制作本书的目的是为了集中大家的优势资源,将更多更精彩的内容带给广大技术爱好者。本书是联盟成立以来制作的第一本书。
关键字阅读
频道精选
主编信箱 热线:010-66476606 告诉我们您想看的:专题 文章
关于我们 | 诚聘英才 | 联系我们 | 网站大事 | 意见反馈 | 网站地图
Copyright©2005-2007 51CTO.COM 版权所有