当前位置:编程学习 > VB >>

如何实现对COBOL中IF语句中自动添加THEN,ELSE,EndIF

类似于美化代码
需求如下:
「IF」语句
必须有「END-IF」语句
必须有「ELSE」语句
例如:
037300     IF  INIGT-O-RET-STS  =  CT-ZEROW
037400       THEN
037500*        ログファイルパス取得
037600         MOVE  INIGT-O-GETDATA   TO  GET-WK-LOGPATH
037700         MOVE  CT-MODE-ARGG     TO  WK-PROC-MODE
037800       ELSE
037900         MOVE  CT-ERR-CD-B       TO  WK-ERRORCD
038000         MOVE  CT-MODE-ERR       TO  WK-PROC-MODE
038100         MOVE  CT-MODE-INIF       TO  WK-ERR-NAIYO
038200     END-IF.


--------------------编程问答-------------------- 给个提示吧! --------------------编程问答-------------------- 不懂COBOL,话说这里是VB版 --------------------编程问答-------------------- 关注一下! --------------------编程问答-------------------- 知道是Vb版,我的意思是用VB来实现对COBOL的规范化…… --------------------编程问答-------------------- 就是文本处理程序嘛
说简单也简单,说复杂也可以复杂
你的要求应该是格式化代码
不同的语言或脚本格式不同要求也不同,还会涉及到表达式的处理,这就麻烦了。
从VB语言的角度来说:

If YY=1 Then
   Msgbox "OK"
End If

同:
If YY=1 Then Msgbox "OK"

是完全一样的,但格式就不是这么回事
如果程序变成以下这样就更加复杂

If YY = "File:" & A.CreateFile("C:\JJ",3,3) & Chr(34) & _
TT+B/83+(R^4) & chr(34) Then Msgbox "OK": JJ=-1: Exit Function

这样就更加难分析了,我曾经搞过ASP的代码的解码器时碰到过这样的问题,感觉有
点像编操作系统,呵呵,说说而已,起码你应该知道你的问题涉及点什么东西。 --------------------编程问答-------------------- 我现在面临的问题是不知道该从哪一方面入手,有人能推荐个类似JAVA或者C的格式化代码看看么.谢谢 --------------------编程问答-------------------- 说到根本就是先要完全了解你要美化的语言,包括所有的
语句、事件、函数、常数、关键字、运算符号、对象、属性
和其他的相关信息,然后再了解多一点VB的字符串处理方面
技术,然后再开始思考如何处理这方面的逻辑程序。 --------------------编程问答-------------------- 编译原理的东西,找本书看看吧 --------------------编程问答-------------------- 这用不着编译原理多少知识,首先行读出来,如果某一行是if,那么读下一行,如果下一行是then,就不做处理,将这两行写入到新文件中,如果不是then,就将if写进去,再写个then,再写下一行。
--------------------编程问答-------------------- 俺以前做过一个很简单的脚本加亮的小程序,也做过脚本翻译的程序,主要基于代码上下行无关,且没有/* */之类的注释都好处理。
--------------------编程问答-------------------- 什么呀
补充:VB ,  基础类
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,