怎么样在Label上面显示字符"&"?

Question

怎么样在Label上面显示字符"&"?
前提是不要改变字符串。

Answer 1

Private Sub Form_Load()
Label1.UseMnemonic = False
Label1.Caption = "&123"
End Sub

Answer 2

前提是不要改变原来字符。所以，输入两个&&肯定是不行的。

Answer 3

重新说明
1、我不需要有访问键；
2、字符"&"一般不会出现在第一个字符。
3、控件是CheckBox.
谢谢大家！

Answer 4

不对，checkbox没这个属性。。
思考中……
对！用checkbox和label混用的方法

Answer 5

重新说明
1、我不需要有访问键；
2、字符"&"一般不会出现在第一个字符。
3、控件是CheckBox.
谢谢大家！
＝＝＝＝＝＝＝＝＝＝＝
楼主还是没有说清楚还是不知道楼主想干什么。。
Private Sub Command1_Click()
Check1.Caption = "a" + Chr(38) + Chr(38) + "b"
End Sub

Answer 6

前提是不要改变原来字符。所以，输入两个&&肯定是不行的。
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
楼上的方法也是不行的

Answer 7

check1.caption = replace(str1,"&","&&")str1 不会改变。如果要从 caption 取回原字符串：
str1 = replace(check1.caption,"&&","&"）

Answer 8

用：&& 就可以解决了

Answer 9

用 && 可以啊，我试过了

Answer 10

用 MrKnowNothing(尽管一无所知 却努力无所不知) 的方法可以解决你的问题设置你的CheckBox.Caption=""
再加一个Label1在CheckBox的位置就可以了，如下：Private Sub Form_Load()
   Check1.Caption = ""
   Label1.UseMnemonic = False
   Label1.Caption = "lkajd&dlfkj"
End Sub

Answer 11

楼上的办法是可行的，但是如果要改变它们的位置的时候不方便，可以把这两个控件放到picturebox里面作为一个整体来操作.