数组数组visual basic

Question

我正在开发一个模块，用于从 ZKSoftware 指纹生物识别中捕获 Attlogs，并使用 CD 附带的 SDK 将其发送到 MySQL 数据库，到目前为止，我设法成功连接到时钟，在列表视图上显示日志，但是我在多维数组上推送值时遇到了困难，我确定这是一个声明问题，但我最好寻求帮助......代码如下：

Dim thisLog(1) As String
Dim allLogs()() As String = New String()() {}

之后迭代 (i) 在我得到的列表视图中加载 Attlogs：

            thisLog = {sdwEnrollNumber, idwYear.ToString() & "-" + idwMonth.ToString() & "-" & idwDay.ToString() & " " & idwHour.ToString() & ":" & idwMinute.ToString() & ":" & idwSecond.ToString()}
            allLogs(i) = {thisLog(0), thisLog(1)}

我得到的错误与数组的大小有关，所以问题可以重新回到如何使用捕获的每一行数据创建一个矩形数组 (2)(n)。提前致谢

Answer 1

我强烈建议您创建一个类来存储数据。之后有一个 List(Of LogEntry)。这将使您的代码更易于阅读。

Class LogEntry

    Public Property EnrollNumber As String
    Public Property EntryDate As DateTime

    Public Sub New(ByVal enrollNumber As String, ByVal entryDate As DateTime)

        Me.EnrollNumber = enrollNumber
        Me.EntryDate = entryDate

    End Sub

End Class

要添加新记录，您只需创建该类的实例并将其添加到列表中。

    Dim allLogs As New List(Of LogEntry)

    allLogs.Add(New LogEntry(sdwEnrollNumber, New DateTime(idwYear, idwMonth, idwDay, idwHour, idwMinute, idwSecond)))

由于您现在将有一个有效的日期而不是串联的字符串，因此以后进行操作会很容易。

    Console.WriteLine(allLogs(0).EnrollNumber)
    Console.WriteLine(allLogs(0).EntryDate.ToString("yyyy-MM-dd HH:mm:ss"))

Answer 2

如何为每行捕获的数据创建一个矩形数组 (2)(n)？

使用列表：

Dim allLogs As New List(Of String())()

allLogs.Add(New String(1) {sdwEnrollNumber, _
     String.Format("{0}-{1}-{2} {3}:{4}:{5}", _
     idwYear, idwMonth, idwDay, idwHour, idwMinute, idwSecond)} )

我还可以使用appropriate DateTime constructor 和format string 来格式化第二部分，这取决于您首先如何获得这些idw 变量。