Andrew,
You can try something like the following but I didn't find the down arrow.
Private Sub lblSort_Click()
If Right(Me.lblSort.Caption, 1) = Chr(24) Then
Me.lblSort.Caption = "Last Name " & Chr(26)
Else
Me.lblSort.Caption = "Last Name " & Chr(24)
End If
End Sub
An alternative would be to use two adjacent labels with the sort indicator label using the wingdings font.
Duane Hookom MVP
MS Access
> To: MS_Access_Professionals@yahoogroups.com
> From: no_reply@yahoogroups.com
> Date: Wed, 19 Jun 2013 06:50:36 +0000
> Subject: [MS_AccessPros] Extended ASCII characters in Form Labels
>
> Hi All,
>
> Does anyone know of a way of including extended ASCII characters in a form label in Access?
>
> I have a continuous form in which some of the column heading labels can be clicked to sort the records in the form by that column. What I want to do is when the user clicks on a label to sort the records, I want to change the label caption so that it contains an indicator that the form is sorted by that column. I'd thought of simply using the extended ASCII triangle characters (▲ & ▼) but I can't find a way of reproducing them on the label using VBA.
>
> Andrew
>
>
>
>
> ------------------------------------
>
> Yahoo! Groups Links
>
>
>
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (3) |
Tidak ada komentar:
Posting Komentar