问题标题:
【四则运算测试:每次运行,只能做十道题,题目通过产生随机数组成的两位数的四则运算式组成,若是除法,四舍五入,保留小数点后两位】
问题描述:
四则运算测试:每次运行,只能做十道题,题目通过产生随机数组成的两位数的四则运算式组成,
若是除法,四舍五入,保留小数点后两位
黄水霞回答:
PrivateSubCommand1_Click()
DimiAsInteger,kAsInteger,sAsLong,s1AsDouble
DimaAsInteger,bAsInteger,abAsString
i=0
Randomize
a=Int(Rnd()*99)+30
Randomize
b=Int(Rnd()*99)+30
Randomize
k=Int(Rnd()*10)+1
s=0
s1=0
Ifi>10Then
MsgBox"Sorry,每次只能运算10题!"
ExitSub
EndIf
Ifk
查看更多
八字精批
八字合婚
八字起名
八字财运
2024运势
测终身运
姓名详批
结婚吉日