5个回答
展开全部
在command控件,tooltiptext属性中写入你的提示内容则可。
或在代码中加一行:command1.tooltiptext=" 点击后转到下一题"。
鼠标放在按钮上,就显示文本内容。
或在代码中加一行:command1.tooltiptext=" 点击后转到下一题"。
鼠标放在按钮上,就显示文本内容。
更多追问追答
追问
不是你说的这个意思,我的意思是,当单击下一题时,就出现下一个问题的标题和选项;当单击上一题时,就出现上一个问题的标题和选项。
追答
所说的“标题和选项”,只能是保存于数据库的记录,不管这个数据库是什么做的,只要VB能调用就行。每一题是一条记录,点下一题或上一题后,查找并输出这个题的“标题和选项”就是了,而这些题全部放入VB中是行不通的,以后一但有变化,还得重新编程。至于输出到什么控件中,按你的设计而定,比如你的截图是输出到Label控件。
展开全部
添加一个label控件
Private Sub Command1_Click()
label1.Caption="文字1"
End Sub
Private Sub Command2_Click()
label1.Caption="文字2"
End Sub
Private Sub Command1_Click()
label1.Caption="文字1"
End Sub
Private Sub Command2_Click()
label1.Caption="文字2"
End Sub
追问
这个方法只适合两种选择
如果是多个选择题,这个就不能再进行判断了
追答
哦~明白你的意思了
你这样做,题目的资料保存在数据库
Private Sub Command1_Click() '这是上一题的按钮
rs.MovePrevious '移动数据库记录到上一条
label1.Caption= rs("题目")
label2.Caption="A:" & rs("A答案")
label3.Caption="B:" & rs("B答案")
label4.Caption="C:" & rs("C答案")
label5.Caption="D:" & rs("D答案")
End Sub
Private Sub Command2_Click() '这是下一题的按钮
rs.MoveNext '移动数据库记录到下一条
label1.Caption= rs("题目")
label2.Caption="A:" & rs("A答案")
label3.Caption="B:" & rs("B答案")
label4.Caption="C:" & rs("C答案")
label5.Caption="D:" & rs("D答案")
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这个只能利用数据库了,单是VB不行
更多追问追答
追问
那该怎么写呢,我对数据库不是很熟悉
追答
要做这种测试系统肯定得用数据库啊。题目及选项都是事先存在数据库的,窗口界面仅仅是显示数据。所以当你点击下一题时,可以编写代码读取数据库中的下一条记录,内容就全是下一题的内容
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
留个QQ我帮你做个实例
追问
21512103
谢谢
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不是单击 是鼠标放在按钮上 就显示文本吧 我记得command控件有个可以实现这种效果的事件,你看看
追问
不是鼠标放在按钮上,就显示文本,而是单击按钮,就出现如图所示的标题和选项
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询