Change label caption based on listbox selection

[stildawn]

Hi All

I have a listbox, with the record ID as the boundcolumn (and thus the listbox.value)

I want to have a label caption to change to the "Notes" field value of the record selected in the listbox.



I believe I do the code in a afterupdate on the listbox, but how do I use the ID number of a record (the listbox.value) to grab the value of that records "Notes" field?

[davegri]

Check out the DLookup function

[June7]

Is Notes field a memo (long text) type?

If not, try including Notes field as hidden column of listbox. Then expression in textbox references that column by index. If Notes is third column, index is 2:

=listboxname.Column(2)

[stildawn]

Yep just found it thanks.

I have the code as:

Private Sub List8_AfterUpdate()

NotesBody.Caption = DLookup("[Notes]", "FRT_Table", "[ID] =" & List8.Value)


End Sub

How this returns something like this: <div>ID 26 Test Notes</div>

So its returning HTML tags etc, some other records also returns font colour tags etc as well, anyway to get rid of the tags?

[June7]

So I presume it is a memo type field set for Rich Text.

Try: PlainText(DLookup("[Notes]", "FRT_Table", "[ID] =" & List8.Value))

[stildawn]

Yep thats it, I had it set to rich text.

So I can simply change the field to Long Text - Plain Text and that solves it.

But, is there a way I can achieve what I want while leaving as rich text? I used a label.caption because I dont want users of the form to be able to edit the notes at all, just view them. But is there another control type I could use that would enable rich text but not be able to be edited by the form user?

[June7]

Textbox with the given expression in ControlSource.

[stildawn]

But can't users edit a textbox?

[June7]

Not when ControlSource is an expression. Try it. Let is know if you get different experience.