Any2VB

JuncoJet · 发表于 2023-3-30 10:24

本帖最后由 JuncoJet 于 2023-4-3 09:35 编辑

QQ截图20230330102314.jpg

Any2VB是一款让你吧所有流行的语法可以用到古老的VB6中的小软件
设计简单，可行性高，只需要简单ctrl+c ctrl+v就能完成转换
详见源码文件中的 sub test

国际惯例蓝奏 https://jcjt.lanzoul.com/iBR2H0ry7xcj （更新）

wangtk1982 · 发表于 2023-3-30 11:46

报病毒了，
警报级别：严重状态：活动
日期：2023/3/3011:45类别：特洛伊木马
详细信息：这个程序很危险，而且执行来自攻击者的命令。
了解更多信息
受影响的项目：
file:D:\Temp\RarSDRa21364.40679\Any2VB.exe

xiawan · 发表于 2023-4-3 09:10

本帖最后由 xiawan 于 2023-4-3 09:14 编辑

JuncoJet 发表于 2023-3-31 22:37
我这毫无问题
会不会你电脑上没有vc2005运行库

有运行库的.
比如我复制:

[Visual Basic] 纯文本查看 复制代码

    'a = [1,2,3]
    'b = ['1",'2']
    'c = []
    'd={"s':'x"}
    'i++
    '++i
    'looop++
    'i+=2
    'i*=2
    'p<<"hello "<<word
    'h=["abc','def','hij']
    '"abc" in h
    'a="def"
    'a in h

就会end,把空行去掉就正常可以转换

在记事本复制代码,后面多加几个空行,就end了...

JuncoJet · 发表于 2023-3-30 10:30

除此外还支持三元操作符
chk?true:false 选中转换有效
out&="string" 追加字符串等同语法 out<<"string"

ps122 · 发表于 2023-3-30 11:13

谢谢分享！
l = Any2VB(s, LenB(s), ret)总是返回空值，没有结果是什么问题？

935 · 发表于 2023-3-30 11:24

这国际惯例词一提就想到了一个油腻大叔

xiawan · 发表于 2023-3-30 11:27

路过学习一下

lmq2828 · 发表于 2023-3-30 11:45

看不懂是什么，想学也不知是什么，还是谢谢分享

JuncoJet · 发表于 2023-3-30 11:47

wangtk1982 发表于 2023-3-30 11:46
报病毒了，
警报级别：严重状态：活动
日期：2023/3/3011:45类别：特洛伊木马

VB程序报毒很正常，带源码可以自己编译

JuncoJet · 发表于 2023-3-30 11:47

ps122 发表于 2023-3-30 11:13
谢谢分享！
l = Any2VB(s, LenB(s), ret)总是返回空值，没有结果是什么问题？

没有输入数据没输出吧（猜

CXC303 · 发表于 2023-3-30 12:16

感谢楼主分享，下载备用

帐号		自动登录	找回密码
密码			注册[Register]

[原创工具] Any2VB

免费评分

本帖被以下淘专辑推荐:

个人中心