开放式互动匹配练习（题数不受限制）

hgjytu

点击相关的两个文本框
点击连线，删除连线
修改文本文件修改题目和设置
通过文本输入框进入练习状态，完成后，练习结果会记录在一个文本文件内（文件名为输入的姓名）
26.rar (380.4 KB, 下载次数: 219)

2016-4-12 13:20 上传

点击文件名下载附件

user_hvest

very good, l like it.

user_abomn

正需要这样的方法，谢谢楼主提供分享！！！
我想用来作一些英文词组与其汉语释义的连线练习，但看起来文本框是交叉重叠的，楼主可否也可提供一个可以清爽观看的示例，谢谢！

wynrefer

不明白楼上所说的“交叉重叠”，“清爽观看”是什么意思。

user_hjkjh

很好的作品，颇值得学习。
经测试发现两个问题：１）答题完毕后输出的txt文件中，无第１页答案；２）第２页如果没有做完就结束ＰＰＴ，输出的文本中最后一题会重复显示（因第１页内容无显示，不知道是否存在同样问题）。请楼主核对，谢谢！！

user_ummyu

已修正，新版本支持Unicode，text文件必须以Unicode格式存盘。
26.rar (397.66 KB, 下载次数: 243)

2016-4-7 13:28 上传

点击文件名下载附件

358606271

将 ts=fso.opentextfile(tfile,1,true,-1) 改为
ts=fso.opentextfile(tfile,1,true,-2)  则Text File可以任何格式存盘。

user_dejql

非常感谢，修正版非常好了！！
改Unicode后，一些１６进制的代码含义搞不明白了。
另外：但从实现本效果的角度看，一些过程或代码行是不是可以去掉啊？
拓展提问：能否遍历题库文本后，获得总题数，按百分制，得出每题分值，然后根据答题判断，给出总分（在最后一页和输出文本上显示，或者每页显示该页得分再加总显示）？？
再次感谢楼主的ＶＢ牛作品，愿多向楼主学习领教，请不吝指教为盼！！！

user_ikynkpuc

format参数取－２，是以系统缺省方式（即ＡＮＳＩ）打开，等价于０。对吧？　

ωo兠兠洧溏

format参数取－２可打开Ansi和Unicode文件；
format参数取－0只能打开Ansi文件；
format参数取－1只能打开Unicode文件。