Ayuda con Programa Por Favor visual basic 6.0

[GhostGirl7]

Hola.. Soy nueva en esto de Visual
Necesito hacer correr un programa que calcule las ventas totales al final del día, y los impuestos a pagar de un restaurante.
Lo hice y corrió.
Pero al abrirlo nuevamente me marca error
en:
GrdMenu.Cols = 2

y la programación que le puse es:

Private Sub Form_Load()
TxtVentaTotal.Enabled = False
TxtImpuesto.Enabled = False
GrdMenu.Cols = 2
GrdMenu.Rows = 9
GrdMenu.FixedCols = 0
GrdMenu.FixedRows = 1
GrdMenu.TextArray(0) = "Menú"
GrdMenu.TextArray(1) = "Precio"
GrdMenu.TextArray(2) = "Hamburguesa"
GrdMenu.TextArray(3) = "2.50"
GrdMenu.TextArray(4) = "Cerveza"
GrdMenu.TextArray(5) = "4.00"
GrdMenu.TextArray(6) = "Gaseosa"
GrdMenu.TextArray(7) = "3.00"
GrdMenu.TextArray(8) = "Ensalada"
GrdMenu.TextArray(9) = "1.50"
GrdMenu.TextArray(10) = "Salchichas"
GrdMenu.TextArray(11) = "2.00"
GrdMenu.TextArray(12) = "Refresco"
GrdMenu.TextArray(13) = "1.00"
GrdMenu.TextArray(14) = "Sopa"
GrdMenu.TextArray(15) = "1.50"
GrdMenu.TextArray(16) = "Postre"
GrdMenu.TextArray(17) = "1.50"
End Sub

Ayuda por favor