查看: 28  |  回复: 0
  VB6 如何让TREA帮你写VB6代码,实现一句代码不写,新建和修改
楼主
发表于 今天 21:22

建议先:Trae 默认设置 变 UTF-8 成 GB2312

打开Trae:

“文件”->“首选项”->“设置”->“通用”->“Editor 设置”

搜索 UTF-8 (或搜索 gb2312),修改成 GBK  即可。GBK 或 GB2312 都可以被vb6ide识别。


这里教一个最简单的方法:

在VB6IDE中新建一个工程(默认窗体名:Form1.frm,工程名:工程1.vbp),并保存工程,退出VB6IDE(因为等会要用TRAE修改窗体,VB6IDE无法更新窗体,所以要退出一下)。

然后打开TRAE软件,下载地址:https://www.trae.cn


1、用TRAE打开我们的目录,我发命令:

帮我给这个窗体放3个label(写参数1,参数2,结果),
然后分别3Text控件在lable后面,在下一行做一个按钮:运行。
给我新建一个模块,把刚才text1和text2的数以参数形式得到它们的和,返回给Text3。

2、TRAE修改后,需要手工点击一次“保留”。重新打开 工程1.vbp 可以看到窗体设计已经完成。手工添加一下模块 Module1.bas

3、双击窗体我们可以看到From1的代码已经写好了。

4、双击模块Module1.bas我们可以看到代码已经写好了。按F5可以正常运行代码了,成功!

5、如果要修改功能,由于不想多次重启VB6IDE,所以功能可以都做到模块里面,这样规范,也好修改。比如我说:

请把CalculateSum里面的+这个功能改成 乘号,子程序名不用动。

6、可以看到,TRAE已经完成了修改。【免费】VB6IDE和VBA 的插件代码优化者(Code Organizer) 是个不错的VB6IDE免费插件,可以自动去掉 Attribute 开头的行,并且可以自动识别编码(ANSI、UTF-8),这样就可以不用重启VB6IDE而直接更新模块代码了。

7、按F5运行代码,可以看到得到正确结果。


以上是最简单的方法,大家可以摸索一下,如果指向实现功能,而不想要窗体,可以采用VB6IDE用 Sub Main 的方式启动。

为了节约Token也更规范,我们还可以这样告诉TRAE:

编程要求:
你是一个VB6程序员只能用VB6语言写代码(不是VB.net),你喜欢:
1、你的新变量用匈牙利命名法(3字缩写在前)修改,比如 LastTime 改成 dtmLastTime,但你不要修改我已有的信息。
2、Function的子程序以f_开头,Sub子程序以s_开头,变量以缩写&代替Long比如
Private Function f_ChkTime(ByVal lngA&) As Long 和 Private Sub s_ChkTime(ByVal lngA&) As Long
我需要一段代码:

以上问AI的话可以下载软件:【免费】问AI 代码提取软件

您需要登录后才可以回帖 登录 | 立即注册
【本版规则】请勿发表违反国家法律的内容,否则会被冻结账号和删贴。
用户名: 立即注册
密码:
2020-2026 MaNongKu.com