1樓：網友
很多地方都出錯了。
第乙個迴圈之前a()沒有redim，迴圈中用a(i)的話必然出錯。
第二迴圈之前的redim a(1 to n)中的n沒有賦值，預設為0，那麼實際上就是redim a(1 to 0)，出錯。
其他的錯誤跟這個兩個主要的有關。
刪除一維陣列重的某個元素 vb **出錯 急急
2樓：寒信
a(j + 1) = a(j)這裡有錯，應該是a(j ) = a(j+ 1) 而且還必須考慮 i＝4的時候會出錯。
因此前面要加一句。
if i=4 then exit sub
你這樣其實並沒有刪除陣列的元素，陣列還是5個數，只是你沒它全顯示出來。也就是如果輸入的剛好是最後乙個數的話，就什麼也不用做，只需要輸出前面4個數，就好像最後乙個被刪除一樣。其實它還在，所以這不算是刪除。
next j
3樓：網友
報了什麼錯？把報錯的資訊發出來看看。
vb程式設計 在已排好序的陣列中刪除乙個元素，刪除後陣列仍然有序。
4樓：匿名使用者
程式演算法描述：
首先用redim將準備插入的陣列的下標改大加一；避免插入後陣列元素上下限溢位；
第二步利用迴圈查詢到需要插入的元素值在陣列中的位置，並同時把該位置後的所有陣列元素向後乙個位置移動（利用逐一賦值array(n+1)=array(n)的方法，注意應該是從陣列後邊向前迴圈）；找到位置，記錄該位置並跳出迴圈（也可不跳出讓迴圈執行完畢後停止）
第三步才是把你插入的元素值賦值給你查詢到的位置。這樣元素就插入完畢了。
的改變而改變，只要物質相同，比熱就相同。比。
vb陣列中插入和刪除乙個元素
5樓：網友
將資料存在乙個動態的陣列中(dataarr)
dim dataarr()
dim i as long
1.插入(j為要插的值，m為要插入的位置)
redim preserve dataarr(ubound(dataarr)+1) '將陣列放大。
for i=ubound(dataarr) to m-1 step -1 '從最下面向m-1迴圈。
dataarr(i)=dataarr(i-1)
next i
dataarr(m)=j
2.刪除(m為要刪除的位置)
for i=m to ubound(dataarr)-1 '從m向ub..-1
dataarr(i)=dataarr(i+1)
next i
redim preserve dataarr(ubound(dataarr)-1)
vb 生成乙個陣列 刪除陣列元素
6樓：
dim a(1 to 10) as integerprivate sub command1_click()dim b as integer
randomize
a(1) = int(rnd() 100)b = int(rnd() 100)
a(1)for i = 2 to 10
a(i) = a(i - 1) +b
" " & a(i)
next i
end sub
private sub command2_click()= ""
for i = 1 to 10
if a(i) = val( then exit fornext i
if i = 11 then
msgbox "在這10個元素的有序數列中沒有要刪除的數！"
exit sub
elsefor j = i to 9
a(j) = a(j + 1)
next j
end if
for i = 1 to 9
a(i) &" "
next i
end sub
7樓：網友
首先dim 乙個陣列 然後遍歷陣列 如果陣列項等於要刪除的 就 去掉 最後把陣列顯示在text裡。
定義乙個一維陣列a（1to10）將陣列元素的第n個元素刪除vb
8樓：網友
我覺得只要將陣列中的這個值置空就行了，並將這個位置的值和最後乙個位置的值互換！！！
vb中動態多維陣列中刪除元素
9樓：網友
重新定義陣列即可，別忘了帶保持引數preserve。
多維陣列preserve只改變最後一維的維數。
vb程式設計實現一維陣列a(10)中陣列元素迴圈向右移動乙個位置
10樓：網友
for i=10 to 0 step -1if i>0 then
if i=10 then temp=a(10)a(i)=a(i)-1
elseif i=0 then a(0)=tempendif
next陣列元素迴圈向右移動乙個位置，最後乙個位置，移動到最前面(左)
如何用VB編制圍棋，Vb程式設計設計一個圍棋棋盤
圍棋可不好編，特別是附帶ai的話，演算法如果沒有借鑑，自創的話任務量很大，且不一定成功，我沒這方面實踐經驗，但對於你的思路可以給你以下建議 1，第一條，是不可行的，建議你用gdi繪圖來繪製棋盤，這樣可以判斷座標，方便落子 2，棋子同樣採用動態繪圖，填充黑白兩色，落子與清除會很簡單，只要在滑鼠點選事件...
定義包含元素的一維陣列，從鍵盤分別給這個一維陣列賦值，求出其中的最大值 最小值及它們的下標
這麼多問題,給個有心人幫你吧.2.program wt input,output vara array 1.3,1.5 of longint i,j,max,h,l longint begin for i 1 to 3 do for j 1 to 5 do read a i,j for i 1 to...
C 裡面，怎麼在一維陣列裡面刪除數
int a 100 假設要刪掉 a 39 for int i 39 1 i 100 1 i 從 a 39 後後面的 依次移到前面 一維抄陣列刪 襲除某bai數 du如zhi下 dao include using namespace std int main for i 0 i 11 i cout c...