| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1278 人关注过本帖
标题:到期限时日期显示为红色
只看楼主 加入收藏
dunnys
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2022-2-13
结帖率:22.22%
收藏
已结贴  问题点数:10 回复次数:2 
到期限时日期显示为红色
你好
我用LiseView读取数据库数据,我想在开始日期30天或365天
图片附件: 游客没有浏览图片的权限,请 登录注册
后的到期日,日期自动显示为红色作为标注,请问如何可以做到。

谢谢!

SELECT
convert(char(10),[SY10006],120) AS [开始日期]
,convert(char(10),(CASE WHEN SY10007 = '6' THEN DATEADD(DAY,31,SY10006) WHEN SY10007 = '12' THEN DATEADD(DAY,365,SY10006) END),120) AS [到期日期]
FROM [SY10]



图片附件: 游客没有浏览图片的权限,请 登录注册


[此贴子已经被作者于2022-5-10 14:45编辑过]

搜索更多相关主题的帖子: convert 日期 THEN char 显示 
2022-05-10 14:43
apull
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:三体星系
等 级:版主
威 望:216
帖 子:1506
专家分:9241
注 册:2010-3-16
收藏
得分:10 
程序代码:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim str As String
        Dim time As Date
        For Each item As ListViewItem In ListView1.Items
            str = item.SubItems(1).Text
            time = DateTime.Parse(str)
            If (time, Now) < 0 Then
                item.SubItems(1).ForeColor = Color.Red
            End If
        Next
    End Sub

单独单元格自定义格式需要设置
ListViewItem1.UseItemStyleForSubItems = False
否则需要修改整行的颜色

图片附件: 游客没有浏览图片的权限,请 登录注册
2022-05-10 23:55
qq88881111
Rank: 1
等 级:新手上路
帖 子:13
专家分:6
注 册:2021-5-2
收藏
得分:0 
楼上正确
2022-05-27 07:39
快速回复:到期限时日期显示为红色
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018173 second(s), 11 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved