网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
vb吧 关注：156,174贴子：1,165,952
  • 6回复贴，共1页

小白求助！戳进来必脱单！

给一部分也行！！！跪谢！！！！
差不多的题也行！！！
你想要什么跟我说！！！


怎么发给你？


Private Function IsPrime(ByVal n As Integer) As Boolean
Dim pb As Integer
pb = n - 1
IsPrime = True
For i = 2 To pb
If n Mod i = 0 Then
IsPrime = False
Exit For
End If
Next i
End Function


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 6回复贴，共1页
分享到: