Saltar al contenido principal
Servicio de soporte de OCLC

DeleteToEndOfCell

Find the syntax, use, parameters, return values, and an example for the DeleteToEndOfCell macro command in Connexion client.
Sintaxis CS.DeleteToEndOfCell
Use to Delete text from the cursor position to the end of the cell.
Parameters Ninguno
Return values Ninguno
Ejemplo Sub Main()
 

     Dim CS As Object
     Set CS = GetObject(,“Connex.Client”)

     If CS.IsOnline = False Then
          CS.Logon ““, ““, ““
     End If

     CS.Search “WC”, “#1”

     If ItemType = 0 Then
          CS.CursorRow = 3
          CS.CursorColumn = 6
          CS.DeleteToEndOfCell
     End If
End Sub

What this example does
  • Logs on to Connexion if not already logged on, using the default authorization and password you selected in Tools > Options > Authorizations tab.
  • Searches WorldCat for record number 1.
  • If the result is an open WorldCat record, places the cursor in the sixth character position in the third field of the record (row 3, column 6) and deletes the text to the end of the cell, starting with the sixth character.