十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
; Visual Studio NET提供的MonthCalendar控件允许你选择日期和一组日期 这个控件允许用户方便地选择日期 它类似于让你选择一个特定日期的DataTimePicker控件 不过MonthCalendar控件还可以帮助你选择一个时间
创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站设计、网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的合山网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
使用MonthCalendar 控件
下面的例子说明如何使用MonthCalendar控件
在常用控件(Common Controls)下的工具箱(Toolbox)中找到MonthCalendar控件并将它添加到窗口表单(Window Form)中 设置以下属性
·Name mcDateSelection
·TodayDate 空
·MaxSelectionCount
·Selection Range Start 空
·Selection Range End 空
在Form Load事件中添加以下代码
mcDateSelection TodayDate = Now
然后建立列表A中的事件 在这个例子中 我设置MaxSelectionCount属性为 这意味着你只能在MonthCalendar控件中选择一个 而不是一组日期 在MonthView控件中选择一个日期 屏幕即类似于图A
图A
列表A Private Sub mcDateSelection_DateSelected(ByVal sender As Object ByVal e As System Windows Forms DateRangeEventArgs) Handles mcDateSelection DateSelected MessageBox Show( Calendar Today s Date: mcDateSelection TodayDate vbCrLf _ Calendar Selected Start Date: mcDateSelection SelectionStart() vbCrLf _ Calendar Selected End Date: mcDateSelection SelectionEnd()) End Sub 既然你只能选择一个月中的某个特定的日期 而不是一组日期 那么 Selected Start Date和Selected End Date的值相同
现在 将MaxSelectionCount属性设为 然后重新运行代码 这次 你就可以选择一组日期(在这个例子中最多为 天) 而且 一旦你选择一组日期后 你将看到如图B所示的结果
图B
控件的其它用法
你可以利用MonthCalendar控件的许多其它属性和方法 使其满足你的需要 MSDN提供使用MonthCalendar控件的更多细节
lishixinzhi/Article/program/net/201311/11787
体是Windows应用程序的基础 新一代的开发工具Visual Basic Net为设计制作窗体提供了更多简单而丰富的方法 无需再求助于复杂而易错的API函数 我们就可以轻松制作多种特效窗体 轻松制作透明窗体VB NET可以轻松制作出任一透明度的窗体 我们只要在窗体的 属性 窗口中 将 Opacity 属性设置为一个介于 (完全透明)与 (完全不透明)之间的值就可以了 Dim frm As FrmTrans = New FrmTrans()frm Opacity = frm ShowDialog() 轻松制作始终位于最上层的窗体在VB 中 要制作一个始终位于最上层的窗体我们只能求助于令人头痛的API函数 然而在 NET 中 我们只要简单设置窗体的 TopMost 属性就可实现同样效果了!例如 Dim frm As frmTopMost = New frmTopMost()frm TopMost = Truefrm Show() 轻松制作不可见的窗体如果要编写一个不让别人发现的隐藏程序 制作不可见的窗体就是必须实现的第一步 窗体的可见性通常由 Visible 属性控制 但是 如果希望 Windows 应用程序的主窗体在应用程序启动时不可见 您将会发现将它的 Visible 属性设置为 False 的方法无效 窗体总会自己显示出来(这是因为 启动窗体的生存期决定了应用程序的生存期) 虽然如此 我们还是可以通过简单将应用程序的启动设置为一个模块 从而从窗体的生存期分出应用程序的生存期 轻松实现不可见的窗体 在下面这个例子中 窗体在特定的时间内自动隐藏 ( )在 Visual Basic 中 右击项目并选择 添加模块 以将模块添加到 Windows 应用程序 ( )在已添加的模块(或类)内 创建可作为项目启动对象的 Main 函数 Sub main()Dim f As New Form ()f Visible = FalseWhile Hour(Date Now) 如果当前时间早于 点 窗体自动隐藏Application DoEvents()End Whilef ShowDialog()End Sub 轻松编写托盘程序托盘程序作为一类特殊的窗体 其快捷图标显示在系统托盘中 窗体本身则隐藏不可见 在 NET之前版本的VB中编写托盘程序是十分困难的 但是VB NET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序 新建 Windows应用程序 设置主窗体Opacity属性为 FormBorderStyle属性为None ShowInTaskbar属性为False 这样窗体将在启动后隐藏 在窗体上放置一个NotifyIcon组件NotifyIcon 一个ContextMenu(弹出菜单)组件ContextMenu 并根据需要为ContextMenu 添加菜单项 设置NotifyIcon 的ICON属性 这个图标就是应用程序出现在系统托盘中的快捷图标 设置NotifyIcon 的Text属性为 VB NET托盘程序 这就是鼠标移动到托盘图标时弹出的文字说明 设置NotifyIcon 的ContextMenu属性为ContextMenu 也就是右键单击快捷图标时的弹出菜单为ContextMenu OK 按F 运行!几乎不用编写代码 一个托盘程序就这样轻松实现了 lishixinzhi/Article/program/net/201311/13831
只是picturebox支持而已...
把gif每帧都单独存成一张图片,加个timer不断更换treeview节点显示的图片,用来实现简单的动画是够了。