Значения по умолчанию при добавлении новой записи

Question

Я пытаюсь добавить новую запись с помощью кнопки Binding Navigator Add.У меня есть три поля, которые могут быть установлены по умолчанию для новой записи.UserId, время начала и время окончания.Используя приведенный ниже код, я могу установить время начала и окончания, но не поле со списком пользователей.Разве невозможно установить это значение?

Я попытался установить значение в BindingNavigatorAddNewItem_Click

Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click
    'MsgBox("Add new Log")
    Dim User As String = currUser.Name
    Dim Index As Integer = cmbOperator.FindString(User)
    cmbOperator.SelectedIndex = Index
    cmbOperator.SelectedItem = User

    dtpLogIn_Date.Value = currUser.Start_Time
    dtpLogOut_Date.Value = currUser.End_Time

End Sub

Форма после добавления новой перерисовки

Answer 1

Одним из решений является установка индекса cmbOperator в событии BindingSource_PositionChanged. Я предполагаю, что это происходит после изменения позиции записи. Затем я завернул его в код, чтобы проверить, было ли добавление нового. Вероятно, мог бы также поместить его в BindingNavigator_PositionChanged.

    Dim varShiftKey = Shift_LogBindingSource.Current("Shift_Key")
    If varShiftKey = -1 Then
        Dim User As String = currUser.Name
        Dim Index As Integer = cmbOperator.FindString(User)
        cmbOperator.SelectedIndex = Index
    End If