August 01, 1997
The VSData Database Engine
The VSData Database EngineBy Michiel de BruijnDr. Dobb's Sourcebook July/August 1997
VsData1.SearchString = Chr(34) & _
Search$ & Chr(34) & " IN Field(1)"
VsData1.FindFirst
If Not VsData1.EOF Then
UpdateFields
Else
MsgBox "Not found!"
VsData1.MoveFirst
End If
Example 3: Adding a find option.
|
|
||||||||||||||||||||||||||||
|
|