show trademark in form caption ?

How can I show the "TM" in the form caption so that it appears smaller and super script than the text next to it?

Code:

---

Because every customer is differentTM.

---

Use the ASCII value...

Quote:

---

Originally posted by Navarone

Quote:

---

Because every customer is different (TM).

---

---

Is that not how it is usually done?

Here is what I did.

VB Code:

frmIntro.Caption = "1:1 card" & Chr(147) & "Because every customer is different" & Chr(153) & Chr(148)

I can do this:

VB Code:

Option Explicit
 
Private Sub Form_Load()
    Me.Caption = "Because every customer is different" & Chr$(&HA9)
End Sub

But I can't find the TM symbol :(

Woka

Wokawidget, here is the hex code for the TM symbol.

VB Code:

Chr$(&H99)

I copied the symbol in text format and used the asc function
to get the ASCII value. Then converted the decimal to hex.

:cool: ™

Whenever I need an ascii value I just make a table in a textbox - like so

VB Code:

For I = 1 To 255
Text1.Text = Text1.Text & Chr(I) & "  " & I & vbCrLf
Next

...