vb编程如何判断一个正整数是几位正整数
展开全部
取以十为底的对数，取整后加1。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
DimxAsInteger,iAsIntegerx=InputBox("请输入你要判断的数字")Ifx<=0ThenMsgBox"你输入的不是正整数"ExitSubEndIfFori=2Tox-1IfxModi=0ThenMsgBoxx&"不是素数"ExitSubEndIfNextMsgBoxx&"是素数"
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
