Compile Error??

[VickyC]

I have added an additional Combo box to my form so that user can select number of cost they wish to add to the bill.

From that another form will appear the amount of times via the number selected.

The code I am using is

If CostsDone = False And DisbursementsDone = False Then
varCosts = Val(cbCosts.Value)
ReDim CostsText(varCosts)
ReDim CostsAmount(varCosts)
ReDim CostsVAT(varCosts)
If varCosts <> 0 Then
frmBill.Hide
MsgBox ("You must now fill in the Costs")
For counter = 1 To varCosts
frmCosts.Show
Next counter
End If

End If

On the line of code "ReDim CostsText(varCosts)" I am getting a Compile Error Expected array. appearing.

Can anyone help with this??

Thanks,

 

[pbaldy]

Can you clarify what program you're in? This is an Access forum, but that doesn't look like VBA.

 

[VickyC]

Compile Error

Sorry I am in Word using VB6.5