日历控件选中多天怎么设置

Question

用后台代码 或者 使用js如何实现日历选中多天也行
此问题很急，还望智者能帮帮忙！！！
不好意思我弄错了该问题分类属于.NET

Answer 1

'365天计时程序
'想后台可以设定窗口不可见
Option Explicit
Dim hh As Integer, mm As Integer, ss As Integer
Dim yy As Long, dd As Integer
Private Sub Form_Load()
dd = 365
hh = 23
mm = 59
ss = 59
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
On Error Resume Next
Dim s As String * 2, m As String * 2, h As String * 2
s = IIf(ss < 10, "0" & ss, "" & ss)
m = IIf(mm < 10, "0" & mm, "" & mm)
h = IIf(hh < 10, "0" & hh, "" & hh)
Label1.Caption = yy & "年" & dd & "天" & h & ":" & m & ":" & s
ss = ss + 1
If ss = 60 Then
mm = mm + 1
ss = 0
End If
If mm = 60 Then
hh = hh + 1
mm = 0
End If
If hh = 24 Then
If dd = 365 Then
dd = 0
yy = yy + 1
Else
dd = dd + 1
End If
hh = 0
mm = 0
ss = 0
End If
End Sub
更多VB代码请关注我的博客：http://hi.baidu.com/zgmg/blog/item/c1a68eec0fabdb2b63d09f5b.html