如何制作答题软件,
用 excel 宏VBA能够实现 比较简单
如何VB制作答题器小软件?
先建一个frame! 建四个CheckBox, 分别是CheckBox1,CheckBox2,CheckBox3,CheckBox4,把Caption修改成你的答案! 假设把正确答案写在CheckBox2 则在CheckBox1,CheckBox3,CheckBox4里写入语句 Private Sub Check1_Click() If Check1.Value = 1 Then MsgBox “正确答案是第二个”, vbOKOnly + vbInformation + 0, “提示” End If End Sub Private Sub Check3_Click() If Check3.Value = 1 Then MsgBox “正确答案是第二个”, vbOKOnly + vbInformation + 0, “提示” End If End Sub Private Sub Check4_Click() If Check4.Value = 1 Then MsgBox “正确答案是第二个”, vbOKOnly + vbInformation + 0, “提示” End If End Sub 第二题在建一个Frame 以此类推……
如何制作一个答题器?
Excel或PPT
如何设计一个自动答题软件
这个有点麻烦吧,首先你需要把收集到的题目和答案都放到数据库中,然后在界面上选择了题目之后,再到数据库中去匹配答案,最后返回结果显示出来哈!!
如何制作一些在线答题的工具
http://www.sojump.com/ 直接到这个网站上去制作.
如何用vb和access设计一个答题软件
用data控件 在data属性栏内,connect选择Access“,databasename选择你要连接的数据库,recordsource选择你的数据库中要连接的表 text 属性栏内,datasource选择data,datafield选择你要显示的字段名称
答题器怎么做的?
楼上的几位““说那么多废话什么用 楼主,你下载这个答题器吧,可以用的. http://buduan.s6.c93.com/zt.html 还有一个也是 http://www.woha.info/ PS:安心,我已经替你先做过实验了,没有病毒及木马
想制作网页答题器
帮你整理一下思路.此答题器的工作流程应该是下面的样子:①用户打开页面→②输入答案→③点击提交按钮→④管理员收集答案并整理 如果你同意上面的流程是对的话,那么其实这个问题就不简单了.①中的页面你需要挂到一个人人都可以访问的地方;③步后答案提交也必须通过来网络传输到某个目的地址.这两点限制了你不得不有个服务器才行,如果你有服务器请追问.
如何用按键精灵写自动答题脚本?高手进
首发!教你自己制作一个按键答题脚本
制作脚本有两个要素,1:程序,2:代码
程序嘛,按键精灵就好,下面是代码,在这里感谢多游戏玩以前玩家提供的代码范本,我在这里仅作优化和改进.
————————————–代码部分—–/(此内内容为注释)——————————-
—-
While 1
GetLastKey a /(这里不用说了,定义变量)
If a=49 /(这个是循环定义部分,49是获取按键1的代码)
MoveTo 329,314 /(鼠标移动到329,314坐标)
LeftClick 1 /(左键单击一下)
EndIf
If a=50 /(这个是循环定义部分,50是获取按键2的代码)
MoveTo 329,336
LeftClick 1
EndIf
If a=51 /(这个是循环定义部分,51是获取按键3的代码)
MoveTo 329,359
LeftClick 1
EndIf
If a=52 /(这个是循环定义部分,52是获取按键4的代码)
MoveTo 330,384
LeftClick 1 EndIf
If a=103 /(这个是循环定义部分,103是获取小键盘的按键7的代码
)
MoveTo 455,229 /(这里取个巧,这个坐标是星星的坐标,所以我可以按一
下键它自动点星星再点答案.)
LeftClick 1
MoveTo 329,314
LeftClick 1
EndIf
If a=104 /(这个是循环定义部分,104是获取小键盘的按键8的代码
)
MoveTo 455,229
LeftClick 1
MoveTo 329,336
LeftClick 1
EndIf
If a=105 /(这个是循环定义部分,105是获取小键盘的按键9的代码
)
MoveTo 455,229
LeftClick 1
MoveTo 329,359
LeftClick 1
EndIf
If a=107 /(这个是循环定义部分,107是获取小键盘的按键+的代
码)
MoveTo 455,229
LeftClick 1
MoveTo 330,384
LeftClick 1
EndIf
EndWhile
怎么用易语言制作答题器
.版本 2.支持库 iext
.如果真 (取文本长度 (编辑框2.内容) = 1) .计次循环首 (取数组成员数 (mark), 计次) .如果真 (mark [计次] = 编辑框2.内容) 超级列表框1.插入表项 (index, ar问题 [计次], , , , ) 超级列表框1.置标题 (index, 1, ar答案 [计次]) index = index + 1 .如果真结束
.计次循环尾 ().如果真结束.如果真 (取文本长度 (编辑框2.内容) = 2) .计次循环首 (取数组成员数 (mark), 计次) .如果真 (mark [计次] + mark2 [计次] = 编辑框2.内容) 超级列表框1.插入表项 (index, ar问题 [计次], , , , ) 超级列表框1.置标题 (index, 1, ar答案 [计次]) index = index + 1 .如果真结束
.计次循环尾 ()