2.8w+
社区成员
- 全部
进来看看就有分
如何用VB写一个组件，实现简繁体中文相互转换?
我用下面这个函数，写了一个组件，为什么在生成DLL时出现，未知的过程或变量StrConv的错误提示
Function GBBIG5(sStr As String, iConver As Integer) As String
On Error Resume Next
Dim STR
If iConver = 1 Then 'BIG5-->GB
STR = StrConv(sStr, vbFromUnicode, &H804)
GBBIG5 = StrConv(STR, vbUnicode, &H404)
ElseIf iConver = 2 Then 'GB-->BIG5
STR = StrConv(sStr, vbFromUnicode, &H404)
GBBIG5 = StrConv(STR, vbUnicode, &H804)
End If
End Function
我用下面这个函数，写了一个组件，为什么在生成DLL时出现，未知的过程或变量StrConv的错误提示
Function GBBIG5(sStr As String, iConver As Integer) As String
On Error Resume Next
Dim STR
If iConver = 1 Then 'BIG5-->GB
STR = StrConv(sStr, vbFromUnicode, &H804)
GBBIG5 = StrConv(STR, vbUnicode, &H404)
ElseIf iConver = 2 Then 'GB-->BIG5
STR = StrConv(sStr, vbFromUnicode, &H404)
GBBIG5 = StrConv(STR, vbUnicode, &H804)
End If
End Function
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
centerstar 2004-12-06
看看有没有转成功，测试一下
cdsun 2004-12-06
错误修正了就改阿
tpf9000 2004-12-06
up
fangq 2004-12-06
顶！观注！
sdts 2004-12-06
来学习学习
daikaiming 2004-12-06
顶一下，狂学中！
DARKNESSFALL 2004-12-06
顶一下
suscom 2004-12-06
错误提示，我已经知道了，是因为工程的名称StrConv和关键字冲突了
现在DLL已经成功生成，但是转换的结果是乱码,ASP代码如下
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<%
set myConv=server.CreateObject("myStrConv.GBTOBIG")
Response.write myConv.GBBIG5("产品介绍",2)
set myConv=nothing
%>
现在DLL已经成功生成，但是转换的结果是乱码,ASP代码如下
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<%
set myConv=server.CreateObject("myStrConv.GBTOBIG")
Response.write myConv.GBBIG5("产品介绍",2)
set myConv=nothing
%>
honghe1 2004-12-06
你定义这个函数了吗？
StrConv(STR, vbUnicode, &H804)
请注意检查这个函数的名称和调用的函数是不是名称一样。
StrConv(STR, vbUnicode, &H804)
请注意检查这个函数的名称和调用的函数是不是名称一样。
chengcom 2004-12-06
up
敏捷软件开发－原则、模式与实践.pdf 本书讲授了一些原则、模式以及实践，它们可以帮助软件开发人员在追求美的程序、设计以及团队的道路上迈出第一步。本书探索了基本的设计原则，软件设计结构的通用模式以及有利于团队融为一个有机整体的一系列实践。本书包含了许多代码，仔细研读这些代码是学习本书所教授的原则、模式及时间的最有效方法
自己动手从0到1写嵌入式操作系统 这不是rtos源码分析的课程，而是为初级的同学设计，从基础原理讲师，一步步不断迭代设计rtos的课程！
用不到【2000行代码，汇编代码仅18行】（不含注释）实现一个精巧的可以运行在ARM Cortex-M内核芯片上的RTOS！
该RTOS功能与ucos类似，具体实现不同。学习之后，再去学习ucos之类的系统将没有什么问题。 1、系统地掌握RTOS的工作原理及其应用；
2、用更短的时间、更少的精力，学习RTOS相关知识；
3、设计出一个具备自己特色的RTOS。将其用作毕业设计、找工作的敲门砖；
4、提升技术水平，为升职加薪跳槽提供资本。
juniper路由器学习资料 从网络搜集的关于juniper的资源，包含
fru-mx960-acoustic.pdf
fru-mx960-cable-manager.pdf
JNCIA_学习指南中文.pdf
Juniper_EX交换机中文操作手册V1.0.pdf
Juniper_MX_路由器介绍.pdf
Juniper_MX960配置模板v1.2.docx
Juniper_netscreen.ppt
Juniper路由器（M10i）配置手册.pdf
Juniper路由器命令行配置手册.pdf
Juniper路由器实验手册.pdf
junos-cli.pdf
junos-release-notes-13.3.pdf
mx960-hwguide.pdf
mx960-install-quick-start.pdf
MX960操作维护介绍.pdf
MX960路由器操作手册.pdf
mx-series-line-card-guide.pdf
中国象棋人工智能论文集 这是本人收集的有关中国象棋人工智能的论文集
2009计算机博弈专辑文章.pdf
Computer Games Are an Efficient Tool for Event Game Theory.pdf
MINORS HASH TABLE IN COMPUTER CHINESE CHESS.pdf
中国象棋机器博弈的时间自适应分配策略研究.pdf
中国象棋计算机博弈中搜索算法的研究与改进.pdf
中国象棋计算机博弈关键技术分析.pdf
人工神经元网络结合TD(λ)算法在中国象棋机器博弈中的应用.pdf
博弈论的里程碑成果与局限性分析.pdf
基于剪枝策略的中国象棋搜索引擎研究.pdf
基于机器博弈的作战模拟系统探讨.pdf
大师级象棋机器人研究与开发.pdf
机器博弈研究面临的各种挑战.pdf
棋牌游戏与事件对策.pdf
积极开展民间棋类的计算机博弈活动.pdf
解剖大象的眼睛-中国象棋开发.pdf
计算机博弈原理与方法学概述.pdf
linux网络内核书合集01 本合集是本人搜集的关于linux网络内核的书籍，都是经典，包含：（1）Linux网络体系结构：Linux内核中网络协议的设计与实现.chm （2）Linux网络内核分析与开发.pdf （3）嵌入式Linux网络体系结构设计与TCP／IP协议栈.pdf （4）深入理解LINUX网络技术内幕.pdf 第一本是英文版chm格式，其余三本均为中文版，扫描清晰
<8>Lua从入门到精通 lua语言以其，轻量级: 可扩展，支持面向过程编程和函数式编程；自动内存管理；只提供了一种通用类型的表（table），用它可以实现数组，哈希表，集合，对象；闭包(closure)；提供多线程支持；
在 游戏开发，独立应用脚本，Web 应用脚本，扩展和数据库插件，安全系统，等领域得到了广泛应用。 实现从lua入门到精通。
Winfrom通用权限管理系统 Winfrom框架，动态生成菜单界面，附带数据库。纯手写，仅供学习参考，希望.net 程序员越来越好。
博客地址：https://blog.csdn.net/zzzzzzzert 有问题留言，互相学习交流
linux网络内核书合集05 本合集是本人搜集的关于linux网络内核的书籍，都是经典，包含：（1）Linux网络体系结构：Linux内核中网络协议的设计与实现.chm （2）Linux网络内核分析与开发.pdf （3）嵌入式Linux网络体系结构设计与TCP／IP协议栈.pdf （4）深入理解LINUX网络技术内幕.pdf 第一本是英文版chm格式，其余三本均为中文版，扫描清晰
linux网络内核书合集03 本合集是本人搜集的关于linux网络内核的书籍，都是经典，包含：（1）Linux网络体系结构：Linux内核中网络协议的设计与实现.chm （2）Linux网络内核分析与开发.pdf （3）嵌入式Linux网络体系结构设计与TCP／IP协议栈.pdf （4）深入理解LINUX网络技术内幕.pdf 第一本是英文版chm格式，其余三本均为中文版，扫描清晰
计算机视觉实战：如何使用OpenCV构建视觉应用 本次公开课讲师屈老师是哈尔滨工业大学副教授，视觉技术研究室负责人。课程会介绍计算机视觉的基本概念、系统基本构成及各要素。并使用OpenCV，带领大家从零开始一步一步的搭建一个简单但可用的实际的视觉跟踪系统，使大家从中学习视觉系统的构建及OpenCV系统实现。 学习本次课程后，学员可以了解计算机视觉的基本概念、系统构成，进一步使用OpenCV搭建第一个可用的实际视觉系统，为以后深入学习掌握计算机视觉迈出第一步。
