vb代码转换到易语言代码

易语言 2020-09-28 16:36:03

vb代码转换到易语言代码

文本_标准 = 文本_标准 + 临时文本 [循环变量] + #换行符
.如果真 (寻找文本 (文本_标准, “End Type”, , 假) ≠ -1)
暂时文本 = 分割文本 (文本_标准, “Private Type”, )
.计次循环首 (取数组成员数 (暂时文本) ÷ 2, y)
.如果真 (取数组成员数 (暂时文本) ≥ 2)
E.内容 = E.内容 + 转换类型_标准 (“Private Type” + 暂时文本 [y + 1])
.如果真结束

.计次循环尾 ()