15 мая 2023 года "Исходники.РУ" отмечают своё 23-летие!
Поздравляем всех причастных и неравнодушных с этим событием!
И огромное спасибо всем, кто был и остаётся с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту


Как очистить содержимое элемента управления DBGrid

Рассмотрим создание примера, который демонстрирует очистку элемента управления DBGrid:

  1. В меню File выберите New Project.

  2. Добавьте в Form1.form следующие элементы управления: Data, DBGrid и две кнопки.

  3. Установите следующие свойства для каждого элемента управления:
          Control          Default Name       Property           Value
          ---------------------------------------------------------------
    
          Data Control     Data1              DatabaseName     BIBLIO.MDB
                                              RecordSource     Title
    
          DBGrid Control   DBGrid1            DataSource       Data1
    



  4. Поместите следующий код в Form1 form:
          Option Explicit
          Dim sql As String
    
          Private Sub Command2_Click()
             ' SQL выражение, которое не возвращает записей.
             sql = "SELECT * From Titles Where Title = Null"
             Data1.RecordSource = sql
             Data1.Refresh
             Command1.Visible = True
             Command2.Visible = False
          End Sub
    
          Private Sub Command1_Click()
          ' Устанавливаем RecordSource для заполнения DBGrid контрола.
             Data1.RecordSource = "Titles"
             Data1.Refresh
             Command1.Visible = False
             Command2.Visible = True
          End Sub
    
          Private Sub Form_Load()
             Command1.Caption = "Заполнить DBGrid"
             Command1.Visible = False
             Command2.Caption = "Очистить DBGrid"
             Command2.Visible = True
          End Sub
    



  5. В меню Run выберите Start, или нажмите F5. Теперь, если кликнуть по соответствующей кнопке, то содержимое DBGrid либо заполнится, либо очистится.