The XHTML WYSIWYG Editor For Desktop & Web Applications

Access 2000

  1. Start Access and create a blank database.
  2. Select "Forms" from the "Objects" list and double click on "Create form in Design view" as show in the screenshot below. This will create a new form.
    Create a new form dialog box in Access.
  3. From the menu bar, select Insert > ActiveX Control... which will bring up a list of ActiveX components registered on your computer as shown in the screenshot below.
    Dialog box displaying a list of all components registered on the computer with XStandard selected.
    Scroll to the bottom of the list, select "XStandard" and press the OK button. The XStandard control will be added to the form.
  4. Stretch the editor to desired size. To configure the editor, select it by clicking on it and a list of available properties will be displayed in the "Properties" window as shown in the screenshot below.
    Screenshot of the Access 2000 environment. XStandard is on a form. The properties for the editor are displayed in the Properties window.
  5. To bind a database field to the editor, click on the "Data" tab in the "Properties" window and specify the database field in the "Control Source" property as shown in the screenshot below.
    Screenshot showing a database field name in the Control Source property in order to data bind the editor to a database field.

Tips

When you need to programmatically get or set the value (XHTML) in the editor, use the Data property instead of the Value property.

Access does not pass the BACKSPACE key to the editor. Use the following workaround:

1. Set the form's "Key Preview" property to "Yes".

2. Include the following KeyDown event subroutine in the form's code module:

  1. Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  2. If KeyCode = vbKeyBack And Shift = 0 Then
  3. KeyCode = 0
  4. SendKeys "+{BS}"
  5. End If
  6. End Sub

Pressing Undo button in Access may clear the contents of the editor. Use the following code to let users control the undo opperation:

  1. Private Sub Form_Undo(Cancel As Integer)
  2. If MsgBox("This operation my clear contents in the editor. Do you want to cancel the Undo?",vbYesNo) = vbYes Then
  3. Cancel = True
  4. Else
  5. Cancel = False
  6. End If
  7. End Sub