Розробка автоматизованого робочого місця науково-технічної бібліотеки університету
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
rr:
Select Case Err.Number
Case dbeDelLinkRec
Err.Raise ueDelLinkRec, , _
Case Else
Err.Raise Err.Number, , Err.Description
End Select
End Sub
перемещение курсора
Public Sub doGoNext()
SendKeys "{TAB}"
End Sub
Public Sub doGoList()
dgd.SetFocus
End Sub
Public Sub doGoFirst()
txtStudy.SetFocus
End Sub
Public Sub doGoLast()
txtName.SetFocus
End Sub
Public Sub doGoMark()
ctlMark.SetFocus
End Sub