List 6-13　レコード全体を変更するメソッド

  1： Sub UpdateCustomer(ByVal ID As Long, _
   　                    ByVal NAME As Variant, ByVal YOMIGANA As Variant, _
   　                    ByVal ZIP As Variant, ByVal ADDRESS As Variant, _
   　                    ByVal TELEPHONE As Variant, ByVal FAX As Variant, _
   　                    ByVal BILLDAY As Variant, ByVal MEMO As Variant)
  2：     '  IDで指定された顧客番号の顧客の，
  3：     '    顧客名をNAMEに，よみがなをYOMIGANAに
  4：     '    郵便番号をZIPに，住所をADDRESSに
  5：     '    電話番号をTELEPHONEに，FAX番号をFAXに
  6：     '    締め日をBILLDAYに，摘要をMEMOに
  7：     ' 変更するメソッド
  8： End Sub