pb使用的ANSI,一个字符占用一个字节
PB代码
程序代码: | [ 复制代码到剪贴板 ] |
#COMPILE DLL
#DIM ALL
FUNCTION UnicodeTest ALIAS "UnicodeTest" (S AS ASCIIZ) EXPORT AS STRING
MSGBOX s
UnicodeTest=s
END FUNCTION
#DIM ALL
FUNCTION UnicodeTest ALIAS "UnicodeTest" (S AS ASCIIZ) EXPORT AS STRING
MSGBOX s
UnicodeTest=s
END FUNCTION
VB代码
程序代码: | [ 复制代码到剪贴板 ] |
Private Declare Function UnicodeTest$ Lib "UniCodeEample.dll" (ByVal S As String)
Private Sub Command1_Click()
MsgBox UnicodeTest("汉字和English")
End Sub
Private Sub Command1_Click()
MsgBox UnicodeTest("汉字和English")
End Sub
|
暂时没有评论
发表评论 - 不要忘了输入验证码哦! |