|
|
Podobnie można używać baz danych napisanych w Access'ie, jeśli napiszemy bazę danych w tym programie można ją bez większych kłopotów modyfikować i konfigurować w Visual Basic'u.
Do tego celu służy kontrolka Data, a do wyświetlania przydają się pola tekstowe, czyli kontrolka TextBox i oczywiście parę przycisków Command Button.
Kontrolce Data przypisujemy określoną bazę danych, a kontrolkom TextBox przypisujemy tą właśnie kontrolkę we właściwości DataSource, a we właściwości DataFiled określone źródło, dziedzinę/dział bazy danych, którą to właśnie ma wyświetlać.
Jeśli chcemy przeprowadzać jakieś operacje na rekordach bazy danych podam parę opcji, jakie można wykonywać:
Find(szukanie)
prompt$ = "Enter the full (complete) book title."
'get the string to be used in the Title field search
SearchStr$ = InputBox(prompt$, "Book Search")
datBiblio.Recordset.Index = "Title" 'use Title table
datBiblio.Recordset.Seek "=", SearchStr$ 'and search
If datBiblio.Recordset.NoMatch Then 'if no match
MsgBox ("Sorry, I couldn't find your book.")
datBiblio.Recordset.MoveFirst 'go to first record
End If
Delete(usuwanie)
prompt$ = "Do you really want to delete this record?"
reply = MsgBox(prompt$, vbOKCancel, "Delete Record")
If reply = vbOK Then 'if the user clicks OK
datBiblio.Recordset.Delete 'delete current record
datBiblio.Recordset.MoveFirst 'move to first record
End If
Add(dodwanie rekordów)
prompt$ = "Enter the new record, and then click the left arrow button."
reply = MsgBox(prompt$, vbOKCancel, "Add Record")
If reply = vbOK Then 'if the user clicks OK
txtTitle.SetFocus 'move cursor to Title box
datBiblio.Recordset.AddNew 'and get new record
'set PubID field to 14 (this field is required
datBiblio.Recordset.PubID = 14 'by biblio.mdb)
End If
I to są już wszystkie operacje na bazach danych.
Tutaj jest przyklad napisany przez Renaissance Computing.
Napisanie samego programu jest proste, ale bazy danych o wiele trudniejsze. Dlatego w przykładzie znajduje się również przykładowa baza danych.
Pozdrawiam! 
|
|
|

  
|
|
|
|
|
|