how do i add a quote date to a list VB

[NIck Iacovelli <nickhere@xxxx>]

a = amibroker.stocks(b).Quotations.Count - 1
amibroker.stocks(b).Quotations(a).Date = aa(2)
amibroker.stocks(b).Quotations(a).high = aa(10)
amibroker.stocks(b).Quotations(a).low = aa(11)
amibroker.stocks(b).Quotations(a).Close = aa(4)
amibroker.stocks(b).Quotations(a).volume = aa(9)
amibroker.RefreshAll

the upper code let me change the value in ami with my value
but how do i add a next day quote
adding 1 to amibroker.stocks(b).Quotations.Count
will cause error

currently it will only update last value.

MY qt to ami is faster

nick