展开全部
’新建一程序在窗体上画 “树形框1”和“文本框1” 复制以下代码运行实现(不要往“树形框1”加项目)
.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
树型框1.显示根部线 = 真
编辑框1.是否允许多行 = 真
树型框1.加入项目 (, “原版本下载”, , , , , )
树型框1.加入项目 (0, “SAGA版”, , , , , )
树型框1.加入项目 (0, “黑肉版”, , , , , )
树型框1.加入项目 (, “MOD”, , , , , )
树型框1.加入项目 (3, “PR 蛋疼模组”, , , , , )
树型框1.加入项目 (3, “”, , , , , )
.子程序 _树型框1_项目被选择
.参数 选择方式, 整数型
.局部变量 临时文本, 文本型, , "0"
临时文本 = 分割文本 (“这里是原版,这里是SAGA版,这里是黑肉版,这里是MOD,这里是PR 蛋疼模组,这里是空白”, “,”, )
编辑框1.内容 = 临时文本 [树型框1.现行选中项 + 1]
.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
树型框1.显示根部线 = 真
编辑框1.是否允许多行 = 真
树型框1.加入项目 (, “原版本下载”, , , , , )
树型框1.加入项目 (0, “SAGA版”, , , , , )
树型框1.加入项目 (0, “黑肉版”, , , , , )
树型框1.加入项目 (, “MOD”, , , , , )
树型框1.加入项目 (3, “PR 蛋疼模组”, , , , , )
树型框1.加入项目 (3, “”, , , , , )
.子程序 _树型框1_项目被选择
.参数 选择方式, 整数型
.局部变量 临时文本, 文本型, , "0"
临时文本 = 分割文本 (“这里是原版,这里是SAGA版,这里是黑肉版,这里是MOD,这里是PR 蛋疼模组,这里是空白”, “,”, )
编辑框1.内容 = 临时文本 [树型框1.现行选中项 + 1]
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询