Owner manual

DM API OBJECTS 123
PCDSQL
Public oNextKey As New PCDSQL
Private Sub cbCancel_Click()
Unload NextKeyForm
End Sub
Private Sub cbNextKey_Click()
Dim sResult As String
sResult = oNextKey.GetNextKey("")
txtNextKey.Text = sResult
End Sub