下面程序对已知数组a（)，删除数组中某个数组元素。 在空白处填入合适的语句，使程序完整。 Dim i, j,

下面程序对已知数组a()，删除数组中某个数组元素。 在空白处填入合适的语句，使程序完整。 Dim i, j, Key As Integer Dim a() As Integer = {1, 6, 8, 3, 5, 9, 10, 2, 7, 4} Key = Val(InputBox("输入要删除的值")) For i = 0 To UBound(a) If a(i) = Key Then ________ End If Next i If i ＜= 1 ubound(a) then for j="i" + to a(j - 1)="a(j)" next redim preserve a(ubound(a) msgbox("删除完成") else msgbox("找不到要删除的元素") end if＞ A、Exit For

B、Exit Sub

C、Exit Do

D、a(i - 1) = a(i)

E、a(i) = a(i - 1)