Access2Base - Comments review

Change-Id: If7fb37a3656b55f7820698a59b8f1d8d8b14d594

wizards/source/access2base/DoCmd.xba

@@ -855,7 +855,7 @@ Public Function GoToRecord(Optional ByVal pvObjectType As Variant _
 							, Optional ByVal pvOffset As Variant _
 			) As Boolean
 
-'Move to record indicated by pvRecord in the object designated by pvObjectType (MUST BE acDataForm)
+'Move to record indicated by pvRecord/pvOffset in the window designated by pvObjectType and pvObjectName
 
 	If _ErrorHandler() Then On Local Error Goto Error_Function
 	GoToRecord = False
@@ -864,9 +864,6 @@ Const cstThisSub = "GoTorecord"
 	Utils._SetCalledSub(cstThisSub)
 	If IsMissing(pvObjectName) Then pvObjectName = ""
 	If IsMissing(pvObjectType) Then pvObjectType = acActiveDataObject
-'	If IsMissing(pvObjectType) Then
-'		If pvObjectName <> "" Then pvObjectType = acDataForm Else pvObjectType = acActiveDataObject
-'	End If
 	If IsMissing(pvRecord) Then pvRecord = acNext
 	If IsMissing(pvOffset) Then pvOffset = 1
 	If Not (Utils._CheckArgument(pvObjectType, 1, Utils._AddNumeric() _