vb的几个小问答题目帮忙解答一下

1、mousedown 和mouseup 事件

2、循环体执行的次数是不确定的，需视具体情况而定。

在do loop while 和 do loop until 中的循环体执行次数一次以上

在for next、while wend、do while loop 、do untile loop中的循环体执行0次以上

3、字符串常量的分界符 " ,日期/时间型常量的分界符是 #

4、“计算机”+ vbcr +"网络"

5、int（），fix（）取整 。cint，round（）四舍五入

6、包含有常用的内部控件的窗口是工具箱。在vb系统中文件类型有 frm、vbp、bas、cls等。

7、列表框组合框控件有AddItem、Clear、Drag、Move、OLEDrag、Refresh、RemoveItem、SetFocus、ShowWhatsThis、ZOrder等方法。向列表组合框控件添加项目的方法AddItem，删除项目的方法是RemoveItem。

dim i

i=0

nd=int(inputbox("请选择难度(数字，1~1000)","选择","100"))

do

i=i+1

a=msgbox("进行第"&i&"题吗？",vbyesno)

if a=vbno then

exit do

end if

if a=vbyes then

randomize

dim aa,ab,ac

aa=int(1+nd*Rnd)

ab=int(1+nd*Rnd)

ac=aa+ab

ad=inputbox(aa&"+"&ab&"等于多少？")

if ad="" then

msgbox "老大，你耍我？"

exit do

end if

if int(ad)=ac then

msgbox "答对了！"

else

msgbox "答错了！"

end if

end if

loop

这就是了，不过，很抱歉，你那个5秒计时的效果无法实现。

---