Buttons With Arrows On Them

Without actually using a bitmap or any other kind of image, isn't it possible to put an arrow picture on a command button?

Yes... you can write "4" in the caption with the Webdings Font

<, <<, >, >>

VB Code:

'Usage:   Set Font To Wingdings
'Line Arrows
Command1.Caption = Chr$(223) 'Left Arrow
Command1.Caption = Chr$(224) 'Right Arrow
Command1.Caption = Chr$(225) 'Up Arrow
Command1.Caption = Chr$(226) 'Down Arrow
Command1.Caption = Chr$(227) 'Up-Left Arrow
Command1.Caption = Chr$(228) 'Up-Right Arrow
Command1.Caption = Chr$(229) 'Down-Left Arrow
Command1.Caption = Chr$(230) 'Down-Right Arrow
'Solid Arrows
Command1.Caption = Chr$(231) 'Left Arrow
Command1.Caption = Chr$(232) 'Right Arrow
Command1.Caption = Chr$(233) 'Up Arrow
Command1.Caption = Chr$(234) 'Down Arrow
Command1.Caption = Chr$(235) 'Up-Left Arrow
Command1.Caption = Chr$(236) 'Up-Right Arrow
Command1.Caption = Chr$(237) 'Down-Left Arrow
Command1.Caption = Chr$(238) 'Down-Right Arrow
'Outlined Arrows
Command1.Caption = Chr$(239) 'Left Arrow
Command1.Caption = Chr$(240) 'Right Arrow
Command1.Caption = Chr$(241) 'Up Arrow
Command1.Caption = Chr$(242) 'Down Arrow
Command1.Caption = Chr$(245) 'Up-Left Arrow [note the gap here]
Command1.Caption = Chr$(246) 'Up-Right Arrow
Command1.Caption = Chr$(247) 'Down-Left Arrow
Command1.Caption = Chr$(248) 'Down-Right Arrow

Quote:

---

Originally posted by Hack

VB Code:

'Usage:   Set Font To Wingdings
'Line Arrows
Command1.Caption = Chr$(223) 'Left Arrow
Command1.Caption = Chr$(224) 'Right Arrow
Command1.Caption = Chr$(225) 'Up Arrow
Command1.Caption = Chr$(226) 'Down Arrow
Command1.Caption = Chr$(227) 'Up-Left Arrow
Command1.Caption = Chr$(228) 'Up-Right Arrow
Command1.Caption = Chr$(229) 'Down-Left Arrow
Command1.Caption = Chr$(230) 'Down-Right Arrow
'Solid Arrows
Command1.Caption = Chr$(231) 'Left Arrow
Command1.Caption = Chr$(232) 'Right Arrow
Command1.Caption = Chr$(233) 'Up Arrow
Command1.Caption = Chr$(234) 'Down Arrow
Command1.Caption = Chr$(235) 'Up-Left Arrow
Command1.Caption = Chr$(236) 'Up-Right Arrow
Command1.Caption = Chr$(237) 'Down-Left Arrow
Command1.Caption = Chr$(238) 'Down-Right Arrow
'Outlined Arrows
Command1.Caption = Chr$(239) 'Left Arrow
Command1.Caption = Chr$(240) 'Right Arrow
Command1.Caption = Chr$(241) 'Up Arrow
Command1.Caption = Chr$(242) 'Down Arrow
Command1.Caption = Chr$(245) 'Up-Left Arrow [note the gap here]
Command1.Caption = Chr$(246) 'Up-Right Arrow
Command1.Caption = Chr$(247) 'Down-Left Arrow
Command1.Caption = Chr$(248) 'Down-Right Arrow

---

That won't work that well... it doesn't on mine, for example. Probably because I have a Spanish version of Windows.

You need to set forn fist:
Command1.Font.Name = "Wingdings 3"
Command1.Font.Size = 20
Command1.Font.Bold = True
Command1.Caption = Chr(102) 'left arrow
'Command1.Caption = Chr(103) 'left arrow
'Command1.Caption = Chr(104) 'up arrow
'Command1.Caption = Chr(105) 'down arrow

It all works just fine for me on both Win98 and Win2000 (English)

It works fine for me too Hack, thanks.

Quote:

---

Originally posted by Hack
It all works just fine for me on both Win98 and Win2000 (English)

---

It didn't in mine. Maybe the best idea would be use "Webdings" like I proposed if it worked everywhere.

For everyone reading this thread: Use whatever works for you. We here at VB Forums are all about options! :D

Whats the difference between McBrain's WebDings and Hack's WingDings?

They both look the same to me (at least on my PC)

It doesn't on mine.

Quote:

---

Originally posted by Mc Brain
It doesn't on mine.

---

Ok... I have a question now!! Why is it that if a write Alt+223 I get a character, and if I code it (with the Chr functio) I get another?? :confused:

They both use a different set of keys.

Quote:

---

Originally posted by Megatron
They both use a different set of keys.

---

What do you mean?

The values for the Chr() function can be found by looking at the ASCII chart.

The values for using Alt+keys can be found in "character map"

Quote:

---

Originally posted by Megatron
The values for the Chr() function can be found by looking at the ASCII chart.

The values for using Alt+keys can be found in "character map"

---

That's not fair!! ;)

As far as I can remember... they were the same in the old times of DOS.

LOL :)