请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 560 人关注过本帖， 1 人收藏

标题：请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3

取消只看楼主加入收藏

月清晖

等　级：论坛游民
帖　子：16
专家分：43
注　册：2011-3-5
结帖率：100%

楼主

已结贴√ 问题点数：10 回复次数：1

请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3

请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3

其实就是方便使用自定义函数，主要用于asp的自定义函数解密

来张图更直观

图片附件: 游客没有浏览图片的权限，请登录或注册

已经实现的部分死代码

程序代码：

Private Sub jieking_Click()

Text1.Text = Mid(Text1.Text, HeadlonV.Text + 1, Len(Text1.Text) - HeadlonV.Text - TaillonV.Text - 2)

Text2.Text = king(Text1.Text) & vbCrLf

Clipboard.Clear

Clipboard.SetText Text2.Text

End Sub

我希望的是代码是活动的，不知是不是这么表述，希望各位慷慨地给出自己的方法！

搜索更多相关主题的帖子: Text1　Text2　

2013-03-30 11:17

月清晖

等　级：论坛游民
帖　子：16
专家分：43
注　册：2011-3-5

第 2 楼

得分:0

回复 2楼 seafish011

查到相关信息，貌似要用类解决，完全不会啊~

2013-03-31 13:03

快速回复：请教：Command1功能是用Text1的函数代码处理Text2的内容显示在Text3