vb.net - 如何使用 CheckIfPrime

Question

我需要CheckIfPrime在我的代码中使用该项目，但是有一些问题，我可以知道我应该如何处理它吗？我需要申报吗？

For number As Integer = 1 To 30
    If CheckIfPrime(number) = True Then
        sb.Append(number.ToString & " ")
    End If
Next

请就如何在 Visual Basic 中做到这一点提出建议。

Answer 1

VB.net没有方法，因此CheckIfPrime要在您的任务中处理它，我们需要创建一个方法来检查数字是否为素数。

   Public Function CheckIfPrime(number As Integer) As Boolean
        For i As Integer = 2 To number - 1
            If number Mod i = 0 Then
                Return False
            End If
        Next
        Return True
    End Function

用法

   For number As Integer = 1 To 30
      If CheckIfPrime(number) = True Then
       'Console.WriteLine(number.ToString & " ")
       sb.Append(number.ToString & " ")
      End If
   Next

Source