小编Sha*_*bby的帖子

任务：质数（或质数）是一个大于 1 的自然数，除了 1 和它本身之外没有其他正除数。以下是前几个素数：

2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31...

定义一个函数，给定一个整数 n，确定前 n 个素数。

问题：我目前正在获取 0-n 之间的素数，但不是 n 个素数。

我的代码是：

    Sub MACRO()
    Z = InputBox("enter number")
        Dim x As Long, n As Long, i As Long, PrimeNumber As Long
        x = 0
            With ActiveSheet
            For n = 1 To Z
            For i = 2 To n - 1
                    If n Mod i = 0 Then
                        x = 0
                        Exit For
                    Else
                        x …