帮忙解释下面这段代码6677

Private Type word
aq As String
ch As String
num As Integer
End Type
Dim t
Dim word(1 To 20) As word
Private Sub Command1_Click()
Timer1.Enabled = True

Dim i%, j As Integer

word(1).aq = "since": word(1).ch = "由于": word(1).num = 5
word(2).aq = "how": word(2).ch = "怎么": word(2).num = 3
word(3).aq = "her": word(3).ch = "她": word(3).num = 3
word(4).aq = "it": word(4).ch = "它": word(4).num = 2
word(5).aq = "for": word(5).ch = "因为": word(5).num = 3
word(6).aq = "own": word(6).ch = "自己的": word(6).num = 3
word(7).aq = "that": word(7).ch = "那": word(7).num = 4
word(8).aq = "these": word(8).ch = "这些": word(8).num = 5
word(9).aq = "where": word(9).ch = "哪里": word(9).num = 5
w

帮忙解释这段代码 帮忙解释这段ASP代码 帮忙解释这段JAVA代码 帮忙解释这段代码ASP 下面这段网页代码怎么解释？50分求解 下面是2段VB代码，帮忙解释下，小弟看不懂 求助:请帮忙看看下面这段Javascript代码 请帮忙为下面这段代码写注释 如何解释这段代码？ VB 解释这段代码