当前位置:编程学习 > VB >>

请大侠们帮我编一段VB程序,在线等。。

在文本框中输入一个数,然后算出比这个数小的最大的素数。 怎么编程啊。 命令按钮的单击事件。在文本框2中显示。 需要又简单又易懂的程序哦。。。
答案:for i=text1.text to 2 step -1
        for j=2 to int(sqr(i))
                if  i mod j=0 then exit for
        next
        if j=int(sqr(i))+1 then 
                print i
                exit for
        endif
next
'打印出的i就是你要求的数

上一个:vb语法问题?(From ** in 集合)
下一个:vb 如何只显示txt文件中指定开始内容和结尾内容中间的行

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,