男性，52岁，乏力1年，腹胀、消瘦半年，骨痛2月，偶有发热。体检：脾肋下10cm，肝肋下1.5cm，浅表淋巴结无肿大；血常规检验：血红蛋白量85g/L，血小板数65×10⁹/L，白细胞数17×10⁹/L；血片分类中性成熟粒细胞占40%，嗜碱性粒细胞占2%，嗜酸性粒细胞占6%，幼粒细胞占20%，幼红细胞10%，淋巴细胞22%，成熟红细胞大小不一，可见嗜碱性点彩红细胞，泪滴形红细胞较易见。骨髓检查：干抽，骨髓涂片中骨髓小粒少见，有核细胞增生减低，粒红比为2.43:1，粒系占49.6%，红系占20.4%，巨核细胞全片3个，血小板少见，原始细胞不多见，各种血细胞形态无明显异常，未见其他明显异常细胞。试分析该病案。

以下哪个选项定义了10个整型数构成的数组？数组元素为NewArray(1)至NewArray(10)。

A． Dim NewArray(10)As Integer

B．Dim NewArray(1 T0 10)As Integer

C． Dim NewArray(10)Integer

D．Dim NewArray(1 To 10)Integer