rivate Function IsPrime(ByRef n As Integer) As Boolean '。此函数用于判断一个数是否素数:
Dim j As Integer ;
IsPrime = True ;
For j = 2 To n - 1 ;
If n Mod j = 0 Then IsPrime = False: Exit For ;
Next ;
End Function用法dim i as integer ,n as integerfor i =100 to 300if IsPrime (i) thenprint;
i,n=n+1if n mod 10 =0 then print '10个一行;
endifnext。
扩展资料:
VB编程学习入门:
工具箱除了最常用的控件以外,根据设计程序界面的需要也可以向工具箱中添加新的控件,添加新控件可以通过选择“工程”菜单中的“部件”命令或通过在工具箱中右击鼠标,在弹出菜单中选择“部件”命令来完成
窗体设计器位于VB主窗口的中间。它是一个用于设计应用程序界面的自定义窗口。应用程序中每一个窗体都有自己的窗体设计器。窗体设计器总是和它中间的窗体一道出现,在启动VB开始创建一个新工程时,窗体设计器和它中间的初始窗体“Form1”一道出现。
要在应用程序中添加其它窗体,可单击工具栏上的“添加窗体”按钮。
就这么多?
没了?
追答对,这是主要程序,在立即窗口中输入,就可运行。你想建立对象,放入对象中也可以。反正主要代码就是这些。