[填空题]下面程序的功能是从键盘上输入一个大于100的整数m，计算并输出满足不等式1+22+32+42+…+n2＜m的最大的n，请填空。
PrivateSubCommand1_Click()
Dims,m,nAsInteger
m=Val(InputBox("请输入一个大于100的整数"))
n=(6)
s=0
DoWhiles＜m
n=n+1
s=s+n*n
Loop
Print"满足不等式的最大n是"(7)
EndSub

教师考试 导游证考试 房产评估类 人资类别 IT计算机证 社会工作 法律类别 职业资格类 外贸类 特种作业考试 交通交规 通信类考试 软考考试 项目管理 计算机等级考试