請vb高手幫忙。若大鴨子5元1只，中鴨子3元壹只，小鴨子1元3只。

For i = 1 To 20

For j = 1 To 35

For k = 1 To 100

If 5 * i + 3 * j + k = 100 Then

Debug.Print i & ":" & j & ":" & k * 3

End If

Next

Next

Next

End Sub