.net 生成关于日期时间的数字

如何生成一个从1到9999的数字作为一个附加到日期时间的字符串，然后在第二天从1开始

e、 g.

0001-24-07-2019

，

0002-24-07-2019

，

0003-24-07-2019

<代码>9999-24-07-2019然后

0001-25-07-2019

，

0002-25-07-2019

<代码>9999-25-07-2019

xxxxno = ProjectManager.PrependZeros((CInt(_ProjectManager.GetTransID()) + 1).ToString, 6) & "-" & Now.ToString("dd-MM-yyyy-hh-mm-ss")

Dim xxxxno As String = Now.Millisecond.ToString() & New Random().Next(1000, 9999).ToString()

---

如果我正确理解您的要求，您可以使用以下内容：

Private lastUsedDate As Date
Private lastNumber As Integer

Private Function GenerateString() As String
    If lastUsedDate <> Today Then
        lastUsedDate = Today
        lastNumber = 0
    End If

    lastNumber += 1

    If lastNumber > 9999 Then
        ' TODO: Decide what you'd like to happen in this case.
    End If

    Return lastNumber.ToString("0000") & "-" & Today.ToString("dd-MM-yyyy")
End Function

两个字段

lastUsedDate

和

lastNumber

在类级别声明，以便每次调用

GenerateString（）

时都能记住它们的值

如果希望在程序关闭/重新启动后记住这些值，可以将它们存储在中。在这种情况下，您将使用

My.Settings.LastUsedDate

和

My.Settings.LastNumber

。您还应在适当的情况下调用My.Settings.Save（），以保存设置。

根据：

e、 g.

0001-24-07-2019

，

0002-24-07-2019

，

0003-24-07-2019

<代码>9999-24-07-2019然后

0001-25-07-2019

，

0002-25-07-2019

<代码>9999-25-07-2019

xxxxno = ProjectManager.PrependZeros((CInt(_ProjectManager.GetTransID()) + 1).ToString, 6) & "-" & Now.ToString("dd-MM-yyyy-hh-mm-ss")

Dim xxxxno As String = Now.Millisecond.ToString() & New Random().Next(1000, 9999).ToString()

我认为需要的代码片段是：

Dim输出为IEnumerable（字符串的）=可枚举。范围（0,2）。
选择Many（函数（x）可枚举。范围（1，9999）。
选择（函数（i）$“{i.ToString（“0000”）}-{Date.Now.AddDays（x.ToString（“dd-MM-yyyy”）}”）
例如,
txtOutput.Lines=output.ToArray

要获得类似于：

0001-20-02-2020
0002-20-02-2020
0003-20-02-2020
.......continue
9998-20-02-2020
9999-20-02-2020
0001-21-02-2020
0002-21-02-2020
0003-21-02-2020
.......continue
9997-21-02-2020
9998-21-02-2020
9999-21-02-2020

对于上述日期范围：

Dim输出为IEnumerable（字符串的）=可枚举。范围（0,2）。
选择Many（函数（x）可枚举。范围（1，9999）。
选择（函数（i）$“{i.ToString（“0000”）}-{New DateTime（2019,7,24）.AddDays（x）.ToString（“dd-MM-yyyy”）}”）
txtOutput.Lines=output.ToArray

Dim xxxxno作为字符串

看起来像VB而不是C#，而且，我看不到与“asp”或“数组”的直接连接；您可能需要调整标记。也就是说，您希望这些数字是连续的吗？您使用的是

Random

，这似乎是一个矛盾。方法是从数字

1

开始，以某种方式记住该数字，并在每次“使用”时不断递增。还请记住，该数字设置为

1

的日期，如果当前日期不同，请再次将其设置为

1

（并记住新日期）。@corak…是的，这就是我想要实现的目标，即以1开始数字，记住它，然后增加它，然后记住它使用的日期，以便在不同的日期从1开始…请我需要帮助，因为我是一个新手。netyes代码矛盾，因为我尝试了两个代码，但从未得到结果