如何用日期替换标签

Question

我正在使用Visual Basic 2010.我的问题可以通过这些图像得到最好的解释。

我想知道如何使标签显示为日期，具体取决于DateTimePicker的设置。例如：

现在代码看起来已经解决了我的问题。

Private Sub MonthCalendar1_DateChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateChanged
        Me.Label14.Text = CStr(Me.MonthCalendar1.SelectionRange.Start)
        Me.Label13.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(6))
        Me.Label12.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(1))
        Me.Label11.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(2))
        Me.Label10.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(3))
        Me.Label9.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(4))
        Me.Label15.Text = CStr(Me.MonthCalendar1.SelectionRange.Start.AddDays(5))
    End Sub

Answer 1

我没有在这台电脑上安装Visual Studio，所以我无法给你确切的代码，所以我会尝试解释它。

在DateTimePicker的事件代码中，您必须为每个标签计算从您的日期到您想要显示的日期（星期三到星期六 - 3天）的星期几的差异（并且您有一点点图像中的错误 - 你必须在星期三和星期二之间切换），星期四到星期六 - 2天，等等......）。

之后，您从上面减去（或添加，如果日期在所选日期之后）参考日期，并获得所需的日期。现在，您只需要在标签中显示结果。

Answer 2

找到了我自己的问题的答案。

要检索日期并将其显示在标签中：

1. 在“文件”菜单中，单击“新建项目”。
2. 出现“新建项目”对话框。
3. 单击“Windows窗体应用程序”，然后单击“确定”。
4. 将Label控件添加到表单，保留默认名称Label1。
5. 从Label控件的Text属性中删除文本。
6. 将MonthCalendar控件添加到表单，保留默认名称MonthCalendar1。
7. 双击MonthCalendar控件，在代码编辑器中输入默认事件处理程序。

8. 在MonthCalendar1_DateChanged事件处理程序中，添加以下代码以将项添加到列表中：

   Me.Label1.Text = CStr(Me.MonthCalendar1.SelectionRange.Start)

9. 返回Designer视图并将DateTimePicker控件添加到表单，保留默认名称DateTimePicker1。

10. 双击DateTimePicker控件，在代码编辑器中输入默认事件处理程序。

11. 在DateTimePicker_ValueChanged事件处理程序中，添加以下代码以将项添加到列表中：

    Me.Label1.Text = CStr(Me.DateTimePicker1.Value)

12. 按 F5 运行程序。

13. 当表单出现时，单击MonthCalendar控件中的日期并验证日期是否显示在标签中。

14. 单击DateTimePicker控件的下拉箭头并选择日期。

15. 日期和时间显示在标签中。