'宣言 Function GetNavigationTargetRecord( _ ByVal currentRecord As Record, _ ByVal navigationDirection As PanelNavigationDirection, _ ByVal selectionHost As ISelectionHost, _ ByVal shiftKeyDown As Boolean, _ ByVal ctlKeyDown As Boolean, _ ByVal siblingNavigationStyle As PanelSiblingNavigationStyle, _ ByVal restrictToRecordType As Type _ ) As Record