VB版的各位老大兼牛人，帮小弟我想想办法

2012-12-31

VB版的各位老大兼牛人，帮我想想办法。我要在软件界面显示商标符号?，但是在中文版xp sp3+中文vb6开发环境中，

VB版的各位老大兼牛人，帮我想想办法。
我要在软件界面显示商标符号?，

但是在中文版xp sp3+中文vb6开发环境中，?符号在软件界面和代码中只能显示为？符号；

后来，我下载了英文xp sp3，用虚拟机安装后，再安装英文的vs6套装，

在英文版xp+英文vb6开发环境中，在软件界面和代码中均能正常显示为?；

各位，这是怎么回事，如何能解决在中文环境中正常显示?符号。

需要怎么做啊？不应该无法解决的啊？
[解决办法]
关注……

应该是它不支持这个字符编码。
[解决办法]
找出其内码，然后使用chr 或者chrw 转换
[解决办法]
其实道理很简单，?这个字符是在某些国家的字符集中有，在unicode当然也有，但在gbk里是没有的，UNICODE编码是十六进制的AE,对应VB里的ChrW$(&HAE)，而VB6里那些界面控件都用的是ANSI的API，当然就不支持UNICODE了，在VB6程序中要显示它，除了用内部支持显示unicode的控件外，就是有unicode版的API，如DrawTextW直接输出了
[解决办法]
as talked the above ,please use Drawtext
[解决办法]
简体中文系统中默认编码是Gb2313,其中没有?这个字符，所以没法显示，要显示：
一、改变默认编码，不过汉字显示又会有问题；
二、完全使用unicode，意味着VB6的控件都不能用，换用支持显示unicode的控件，如ms form2.0
[解决办法]
Gb2313---->Gb2312
[解决办法]

这样搞，可能更麻烦。
[解决办法]
Private Sub Form_Paint()

    Circle (500, 500), 90
    CurrentX = 500 - TextWidth("R") / 2 + 15
    CurrentY = 500 - TextHeight("R") / 2
    Print "R"
End Sub

[解决办法]

，造成一些编码冲突，没办法了才有的Unicode。

[解决办法]
你可以用 Microsoft Forms 2.0 Object Library 的控件显示这个字符，如：
Private Sub Form_Load()
Label1.Caption = "Copyright " & ChrW(&HAE) & " 1999-2012, CSDN.NET, All Rights Reserved "
TextBox1.Text = "Copyright " & ChrW(&HAE) & " 1999-2012, CSDN.NET, All Rights Reserved "
End Sub
[解决办法]
用“(R)”代替。
------解决方案--------------------

图片或者造字
[解决办法]
貌似不支持。。。

热点排行