求助,vb编程题。设计一个程序,找出100~900之间的无暇素数
1、return 0；}这个是能够正确计算出来无暇素数的代码，你自己对比一下吧。3位数字的无暇素数是指数字本身是一个素数，它的个位和百位颠倒之后还是一个素数的数字。
2、首先，是没分清break和continue的区别。这个是只输出两个数的原因。然后，是输出的n不是原来的数，题主对n做了取逆序数，输出的是逆序数。这个是出现大于900的原因。最后，题主本身的对遍历条件n做了操作，导致循环本身也有问题。建议题主，先理清逻辑，重写下。
3、一共有43个这样的无暇素数。下面是结果和fortran代码。因为1000肯定不是素数，所以循环从100做到999。另外，需要说明一下的是，101这样的对称数字，只算做一次，而157和751这样的不对称情况，就在两个地方算作两次。
VB编程问题:随机产生100个1000以内的整数,并显示出其中的最大值和最...
1、循环100次（for。。）rnd随机并int（int（rnd。。）判断mod求余=0（if 。。）则计数（n=n+。。）判断结束（end。。
2、使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。无重复随机数算法一 这是最简单的算法，每产生一个随机数，就和已有的比较，如果已经存在，则重新产生。比较适合从一个大范围里面抽出一小部分数据，比如，从题库中抽取试题。
3、将下面程序放在 Command_Click（） 事件中。
4、建一个有1000个乱数的文件txt在c盘，下面的程序把文件txt的乱数读入数组，用冒泡法排序，并把的结果输出txt里面。
VB编程题目求解
1、可用差值渐进法求解，关键是要先设定一个精度值0.001或更小和预设一个Y值以及相应的跨步值100。第一：设定一个Y值为0，求出Y*（Y+1）=0，与X、Z值代入的右边公式的结果比较，判断值大小如何。
2、答一下第一题：Dim a Dim b（1 to 50）Dim c for a=1 to 50 b（a）=1/a Next for a=1 to 50 c=c+b（a）Next 好了，c 就是答案了。
3、你按alt+那个字母，效果等同鼠标点击那个按钮。VB里也可以，不过只能用alt+ 一个字母的形式做快捷键啦。还是用例子说吧，你的command1要用alt+x来做快键，就在caption的属性里加 &x ，它就能出现一个带下划线的x。加 &Y 就是带下划线的Y。你可以再试试。这样设的好处是，代码都省了。
VB编程产生100个0-100之间的随机整数找出其中能被3整除的数,并且按由...
举个例子，要产生10个1到100之间的随机整数，如下：打开VB0开发软件，新建一个标准exe工程；在设计界面上添加一个Text控件和一个Command控件；Command1控件的Caption属性设置为产生10个1~100之间的随机数。
你这个程序能够运行。既能让1-100各个数字按随机顺序排列，也能把这个序列的各个数字保存到文件中。只是，这个方法效率太低，应该用更好的算法提高效率。有什么问题请留言。
rnd*（上界–下界+1）+下界 如果要求产生的随机数要求包含上界（本题中的100），是正确的。rnd*（上界–下界）+下界 如果要求产生的随机数要求不包含上界（本题中的100），或没有明确说明是否包含上界（本题中的100），就应该没有+1。
为了生成某个范围内的随机整数，可使用以下公式：Int（upperbound - lowerbound + 1） * Rnd + lowerbound）这里，upperbound 是随机数范围的上限，而 lowerbound 则是随机数范围的下限。
dim num3，num7 as integer for i=1 to 1000 if i mod 3=0 then num3=num3+1 end if if i mod 7=0 then num7=num7+1 end if next 最后num3就是能被3整除的数的个数。num7是能被7整除的个数。
标签： #vb编程设计例题100例
