VB6.0でエクセルのAVERAGEみたいな計算できませんか?

| 10| 20| |=AVERAGE(A1:C1)