如何根据当前月份自动选择列表框项（VB.NET）答案

【问题标题】：How to Automatically Select a ListBox Item Based on the Current Month (VB.NET)如何根据当前月份自动选择列表框项（VB.NET）
【发布时间】：2020-12-18 16:14:04
【问题描述】：

我有一个 Visual Studio 程序，可以将选定的复选框作为新记录导入 Access 数据库。也被导入的项目之一是 ListBox 值。所有的项目，包括ListBox的选中项目，都被输入到数据库中。

目前，用户必须手动选择 ListBox 项。我希望自动选择 ListBox 项。

ListBox 的内容是从“2021 年 1 月”到“2021 年 12 月”的一系列月/年组合，我希望根据处理 mybase 时的月份和年份来选择月/年组合。负载发生。例如：当前日期/时间“2021 年 5 月 11 日 12:11:21”会自动选择“2021 年 5 月”。日期和具体时间无关紧要。

以下是我对自动选择的尝试。我已经添加了 12 月，以便我现在可以测试该程序。如果还有其他组件可以更好地为我服务，请随时发表您的意见！

这是我的子代码：

Private Sub MonthSelectionLogic() 处理 MyBase.Load

    If DateTime.Now.ToString = ("12/dd/2020 HH:mm:ss") Then
        MonthList2021.SelectedItem = "January 2021"
    End If

    If DateTime.Now.ToString = ("1/dd/yyyy HH:mm:ss") Then
        MonthList2021.SelectedItem = "January 2021"
    End If
End Sub

【问题讨论】：

这可能不合适，但您也可以使用DateTimePicker。您可以简单地将当前日期或日期/时间分配给Value 属性，其中Format 设置为Custom，CustomFormat 设置为“MMMM yyyy”。然后将显示当前月份名称和年份。其余的日期和时间仍将存储在控件中但不显示。

标签： vb.net visual-studio datetime ms-access listbox

【解决方案1】：

MonthList2021.SelectedItem = Date.Now.ToString("MMMM yyyy")

不需要If 声明。 “MMMM”格式说明符用于完整的月份名称，例如"January", "MMM" 是缩写，例如"Jan", "MM" 用于填充数字，例如“01”，“M”是未填充的数字，例如“1”。

【讨论】：