按键精灵1--6级答案

="H":ExitDoElseIfIsNumeric(Input查询)=TrueThen查询结果=查询(数据库路径,Input查询)EndIfIf查询结果<>""ThenMsgBox查询结果,65,"查询结果"LoopElseIfInputHome="2"ThenDo搜索返回="":Show搜索=""Input搜索=InputBox("退出:Q主页:H"&vbcrlf&vbcrlf&"可模糊搜索到编号、姓名、年龄、身高字段","搜索·请输入关键字进行搜索","关键字")IfInput搜索="Q"OrInput搜索="q"Then:InputHome="Q":ExitDoElseIfInput搜索="H"OrInput搜索="h"Then:InputHome="H":ExitDoElse搜索返回=搜索(数据库路径,Input搜索)EndIfIf搜索返回<>""Then搜索结果=Split(搜索返回,",")Fori=UBound(搜索结果)-1To0Step-1Show搜索=Show搜索&搜索结果(i)&vbCrLfNextMsgBoxShow搜索,65,"搜索结果"EndIfLoopElseIfInputHome="3"ThenDo查询结果="":删除结果=""Input删除=InputBox("退出:Q主页:H","删除·请输入编号进行删除","编号")IfInput删除="Q"OrInput删除="q"Then:InputHome="Q":ExitDoElseIfInput删除="H"OrInput删除="h"Then:InputHome="H":ExitDoElseIfIsNumeric(Input删除)=TrueThen查询结果=查询(数据库路径,Input删除)EndIfIf查询结果<>""Then删除结果=MsgBox(查询结果,68,"确定要删除此条数据?")