Я хочу код, который будет искать, существует ли файл, если он существует, он откроет эту запись, иначе он создаст новый - PullRequest
1 голос
/ 18 июня 2020

Я новичок в программировании. Я создал программу на VB. net с базой данных в доступе MS. Я хочу создать текстовое поле, которое будет работать как панель поиска, так и добавлять новую. Когда пользователь вводит текст и переходит к следующему текстовому полю, функция будет искать его, если этой программы нет. существует, он покажет эту запись, иначе он создаст новую. Проблема с этим кодом в том, что при добавлении новой записи он меняет номер проги. последней открытой записи. Вот код

Private Sub progno_enterpress(sender As Object, e As EventArgs) Handles progno.LostFocus

    prgnum = progno.Text
    If progno.Text = "" Then
        Call notfound()
        Exit Sub

    Else
        Table1BindingSource.Filter = "(Prgno Like '" & prgnum & "')"
        If Table1BindingSource.Count <> 0 Then

                With DataGridView1
                    .DataSource = Table1BindingSource
                End With

                Table1BindingSource.EndEdit()
            Exit Sub
        Else
            Table1BindingSource.Filter = Nothing
            Table1BindingSource.AddNew()
            Exit Sub
        End If
...