Solved

How to enter symbol like triangle in a text box?

Posted on 2007-11-15
23
4,934 Views
Last Modified: 2008-02-01
I have a text box where I like to enter special characters. For example insted of:

txtTest = "A"

I would like to have:

txtTest = <the shape of a triangle>

I am specially interested in having:

txtTest = <the shape of paper clip>

txtTest = chr(??) ' what should the value of ?? for a paper clip?

"paper clip" is like the one used by outlook to show an email has some attachments.

Please note that I want to use a text box not a lable or an image controls. I am using Access.

Thank you.
0
Comment
Question by:Mike Eghtebas
  • 11
  • 9
  • 3
23 Comments
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20291400
Look in your Character Map for Wingdings 1 and 2 for a symbol
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20291439
Try this free truetype download

http://www.fontstock.net/9514/Paper-Clip.html

use the letter I.
0
 
LVL 11

Expert Comment

by:cup
ID: 20291496
Triangle Wingdings3 hex 70
Paper clip - what do you think of webdings hex 27?  It is actually a link

You may have to look for some font with a paper clip in it.  I think the one used in Outlook is a bitmap.
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20291550
tonydemarco,

I changed the font for txtTest to Wingdings but I do not know what key combinations I have to use to se the paper clicp.

I will look on the web trying to locate it.

Mike

0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20291715
tonydemarco,

I don't want make the user to download it. I am hopping just to locate it from window xp environment.

Mike
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20291740
cup,

I will try webdings hex 27. Would be like:

txtTest = chr(hex 27)

using code?

What key combination if code didn't work?

re:> I think the one used in Outlook is a bitmap.

You are right about that; but I need as a text.

Thanks,

Mike


0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20291769
cup,

Entering =Chr(27) in the control sorce of the text box gives me an square. and the following errors:

=Chr(hex 27)

MIKE



0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20291989

re: "I don't want make the user to download it.
I am hopping just to locate it from window xp environment."

I can not find any standard WinXP font with a paperclip.
Free TrueType Paperclip font may be the only way.

Other option is a bitmap of a paperclip that has it's property set to Visible = False (No) until the value
of a textbox is "A" then Visible = True (Yes).

Sorry!
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20292068
tonydemarco,

Instead of paper clicp, I could use a pin which I located under Wingdings chart.

Its hey word code is e with umulats (two ..) above it.
Its code is <font face="Webdings">&#235;

And how to use it with =Chr(...)  is my question.

Please note  Webdings here is different from Wingdings.

Maybe this is for web applications only. I am working on a desktop access application.

Would we be able to display the pin now instead of paper clip?

Thank,

Mike
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20292171
Problem #1 is being able to place a value in the data table that will give you a "push pin" from Webdings without setting the entire tables fonts to Webdings. (that sounds like fun but not practical) So what you want to do is equate some value in your table Like the "A" or "Y" or "N" to do something in your form like display a paperclip.
Once again the best way to accomplish this is through a paperclip bitmap that can be stored right in the form ie. "Picture Type "Embedded"".
See my attached code example to trigger the event.
Private Sub Form_Current()

If Me.EMail = "Y" Then

Me.paperclip.Visible = True

Else: Me.paperclip.Visible = False

End If

End Sub

Open in new window

0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20292636
re:> tables fonts to Webdings

I am willing to do this. Furthermore, this is not a bound text box and it will be the issue. All I need to do set the text box font name to Webdings.

Please have in mind, as stated in the original question, I have to have a text box. This is because I need to apply some conditional formatting which is not available to labels, image controls, etc.

Regarding your code, this is a continous form and and unbound controls are either or visible or all invisible.

=================
Please help me with my last post:

Its key-word code is e with umulats (two ..) above it.
Its code is <font face="Webdings">&#235;

And how to use it with =Chr(...)  is my question...

Thanks.

Mike

0
What Is Threat Intelligence?

Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.

 
LVL 11

Assisted Solution

by:cup
cup earned 150 total points
ID: 20293235
In VBA, hex 27 would be &H27 but if you wish to use the bigger numbers i.e bigger than 127, use chrw instead of chr.
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20293329
Create a textbox called and put this in the data control source

=IIf([YourControl] Like "y",Chr(235),"")
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20293358
oops!
Create a textbox and set its font to WebDings 14pt and put this in the data control source

=IIf([YourControl] Like "y",Chr(235),"")
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20299439
cup,

hex 27 compared to <font face="Webdings">&#235, I will choose 235.

I changed the font to Webdings but I am not able to get the pin shape (fat borad pin @ 45 degree). Is it possible to make this work? I am using:

Text37 = ChrW(&H235)   ' comapred to >&#235 from the chart.
=======
tonydemarco,
Using your method, how can I show the pin?
               v--- what do you mean? Text37 goes here?
=IIf([YourControl] Like "y",Chr(235),"")

Thank you,

Mike
0
 
LVL 9

Accepted Solution

by:
tonydemarco earned 350 total points
ID: 20300043
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20300744
tonydemarco,

Thank you for the sample database. I really appreciate it. Upon openning of the form, I get the following message:

"Your Microsoft Office Access database or project contains a missing or broken reference to the file 'QTOControl.dll' version 1.0.

* To ensure that your database or project works properly, you must fix this reference."

No I am trying to fix this by adding it to my references. Is QTOControl.dll is a complete name?

I hope I don't have to install QTOControl.dll in my computer (company desktop). Our IT department wouldn't like this.

Mike
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20301395
No, you don't have to install the control. It is a reference to QuickTime toolbox control.
Either just disregard it or uncheck the reference.
[Alt - F11] - Tools - References.
0
 
LVL 9

Expert Comment

by:tonydemarco
ID: 20301421
Look for a reference that says "missing reference" then uncheck it.
Name of control is Apple QuickTime Control. It allows you to play QuickTime Video in a form.
Not needed here.
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20301867
tonydemarco,

That worked. Thank again.

Mike
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20301871
I will close this question shortly. My browser is acting up a bit.

Mike
0
 
LVL 11

Expert Comment

by:cup
ID: 20405334
Have a look at the character 0x47 in the font MS Outlook.
0
 
LVL 33

Author Comment

by:Mike Eghtebas
ID: 20412785
Thank you.
0

Featured Post

Do You Know the 4 Main Threat Actor Types?

Do you know the main threat actor types? Most attackers fall into one of four categories, each with their own favored tactics, techniques, and procedures.

Join & Write a Comment

Microsoft Word is a program we have all encountered at some point, but very few of us have dug deep into its full scope of features, let alone customized it to suit our needs. Luckily making the ribbon (aka toolbar, first introduced in Word 2007) wo…
You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
In Microsoft Access, learn the trick to repeating sub-report headings at the top of each page. The problem with sub-reports and headings: Add a dummy group to the sub report using the expression =1: Set the “Repeat Section” property of the dummy…
Office 365 is currently available in five editions. Three of them are for business use: Office 365 Business Essentials, Office 365 Business, and Office 365 Business Premium. Two of them are for home/personal use: Office 365 Home and Office 365 Perso…

762 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now