Can someone convert the following VB.net code to VB6.0 ?

Dim result As String = rqd.Request("0", "", "")

For i = 0 To rqd.get_Total_Sales '
Dim UID As String = rqd.get_UID(i) '

Dim InRows As List(Of String()) = New List(Of String())()

InRows.add(
rqd.get_DetailsQuantity(i, j),
rqd.get_DetailsGrossValue(i, j),
)
Next
'
Next