Diameter and Dgree symbols

A

Alu_GK

Hello -
Access 2003 + Access runtime, Windows vista + XP.
I 'm running an application that was developed on Access 2003, vista.
The application is running on Access runtime 2003, Windows XP.
In the text field I need to insert the symbol Diameter (Ø) and Degree (°).
The alt+0176 set the degree symbol, and the diameter should be alt+0216 but
it's not working.
My question is:
Is there a way that I can create a button of symbols that the user can
choose from then which symbol he prefers to insert the text box (that will
allow me to add more symbols in the future) ?
What code lines can I use in order to create those symbols without regarding
the operation system or the software environment ?

Thanks !
 
F

fredg

Hello -
Access 2003 + Access runtime, Windows vista + XP.
I 'm running an application that was developed on Access 2003, vista.
The application is running on Access runtime 2003, Windows XP.
In the text field I need to insert the symbol Diameter (Ø) and Degree (°).
The alt+0176 set the degree symbol, and the diameter should be alt+0216 but
it's not working.
My question is:
Is there a way that I can create a button of symbols that the user can
choose from then which symbol he prefers to insert the text box (that will
allow me to add more symbols in the future) ?
What code lines can I use in order to create those symbols without regarding
the operation system or the software environment ?

Thanks !

Have you considered using the AutoCorrect Options available on your
computer?
Click on Tools + AutoCorrect Option.
Enter an unusual combination of letters in the Replace column, such as
*(*
Then in the With column enter ALT + 0216

Click on Add, Then OK.

Now when entering data, all the user need do is type *(*

As AutoCorrect is used by all programs, make sure you use a
combination of letters that would never normally appear in your data
in "any" program.
 
F

Fred

Or try copying them from a document in another program (e.g. Word) and
pasting them into expressions, code etc.
 
B

Barry A&P

i hope nobody laughs at my code
as far as your buttons are concerned make a button on your form called
DiaButton then do like fred said and copy the charachter from word paste it
in the code and in the Caption Property of the button then on its click event.

Private Sub DiaButton_Click()
On Error GoTo Err_DiaButton_Click

Dim stradddia As String
stradddia = mycombo & "Ø"
mycombo = stradddia

Exit_DiaButton_Click:
Exit Sub

Err_DiaButton_Click:
MsgBox Err.Description
Resume Exit_DiaButton_Click

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top