许可证怎么加才对

weiyuqiang

  

子程序名	返回值类型	公开	备 注
历史去重	整数型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
文本	快速文本对象

线程_进入许可区 (许可证)
文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
如果 (文本.寻找文本 (内容, , 真) ＝ -1)
文本.添加 (内容 ＋ #换行符 )
文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
返回 (真)
返回 (假)

线程_退出许可区 (许可证)
这么加是不是错误的 我在一个逻辑型的子程序中加，怎么加才是正确的

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 历史去重, 整数型, 公开<br /> .参数 内容, 文本型<br /> .局部变量 文本, 快速文本对象<br /> <br /> 线程_进入许可区 (许可证)<br /> <br /> 文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br /> .如果 (文本.寻找文本 (内容, , 真) ＝ -1)<br />     文本.添加 (内容 ＋ #换行符)<br />     文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束<br /> <br /> 线程_退出许可区 (许可证)<br /> <br /> 这么加是不是错误的 我在一个逻辑型的子程序中加，怎么加才是正确的

菜鸟路过

返回 要放在最后面

熊猫xpanda

退出许可证要放在返回前面
你代码中的返回假和返回真前面加一句 推出许可证就行了

丿Mrs°戮默

这一看就不对吧  启动的线程接收文本参数么  是用了多线程文本传参么
  如果不是  这就是一个子程序  貌似子程序加线程许可是没用的吧

笨来无一悟

文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”) 加在这个的前面和后面许可证是为了避免冲突的 那就只在会导致冲突的地方加

Ruang

命令  返回（）后面的代码就不运行啦

lyie15

返回之后的代码不作运行的，所以就许可证只有进入没有退出，程序的其他线程就成摆设了。调整下就行，在你需要保护的程序 前后加就可以了

xiaoyu1986

  

子程序名	返回值类型	公开	备 注
历史去重	整数型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
文本	快速文本对象

文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
如果 (文本.寻找文本 (内容, , 真) ＝ -1)
线程_进入许可区 (许可证)
文本.添加 (内容 ＋ #换行符 )
文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
线程_退出许可区 (许可证)
返回 (真)
返回 (假)

这么加是不是错误的 我在一个逻辑型的子程序中加，怎么加才是正确的

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 历史去重, 整数型, 公开<br /> .参数 内容, 文本型<br /> .局部变量 文本, 快速文本对象<br /> <br /> <br /> <br /> 文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br /> .如果 (文本.寻找文本 (内容, , 真) ＝ -1)<br />     线程_进入许可区 (许可证)<br />     文本.添加 (内容 ＋ #换行符)<br />     文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br />     线程_退出许可区 (许可证)<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束<br /> <br /> <br /> <br /> 这么加是不是错误的 我在一个逻辑型的子程序中加，怎么加才是正确的

Ruang

  

子程序名	返回值类型	公开	备 注
历史去重	整数型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
文本	快速文本对象

线程_进入许可区 (许可证)
文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
如果 (文本.寻找文本 (内容, , 真) ＝ -1)
文本.添加 (内容 ＋ #换行符 )
文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
线程_退出许可区 (许可证)
返回 (真)
返回 (假)

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> .支持库 commobj<br /> <br /> .子程序 历史去重, 整数型, 公开<br /> .参数 内容, 文本型<br /> .局部变量 文本, 快速文本对象<br /> <br /> 线程_进入许可区 (许可证)<br /> 文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br /> .如果 (文本.寻找文本 (内容, , 真) ＝ -1)<br />     文本.添加 (内容 ＋ #换行符)<br />     文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)<br />     线程_退出许可区 (许可证)<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束

补充内容 (2025-4-22 17:51):
主要用于操作数据部分

w409608911

.版本 2
.支持库 commobj

.子程序 历史去重, 整数型, 公开
.参数 内容, 文本型
.局部变量 文本, 快速文本对象



文本.从文件读 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
.如果 (文本.寻找文本 (内容, , 真) ＝ -1)
    线程_进入许可区 (许可证)
    文本.添加 (内容 ＋ #换行符)
    文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
    线程_退出许可区 (许可证)
    返回 (真)
.否则
    ' 如果这里也需要对文件或变量进行操作也一样，在需要操作的变量前加“线程_进入许可区 (许可证)”操作完成后“线程_退出许可区 (许可证)”

    线程_进入许可区 (许可证)
    文本.添加 (内容 ＋ #换行符)
    文本.写到文件 (取运行目录 () ＋ “\历史缓存\历史数据.txt”)
    线程_退出许可区 (许可证)


    返回 (假)
.如果结束


' 这样弄就好，
' 这么加是不是错误的 我在一个逻辑型的子程序中加，怎么加才是正确的