VB陣列問題 請幫忙

**如下，單擊按鈕後，BX 是您想要的結果。

private sub command1 click（） 標記重複的元素，以 rep- 開頭

如果你的 ax 元素有 rep-，用其他東西替換它，例如 @ 只要它被標記為重複，然後根據它刪除它以確定它是否是重複元素。

dim i as integer, j as integerfor i = 1 to ubound(ax)if left$(ax(i), 4) <"rep-" thenfor j = i + 1 to ubound(ax)if left$(ax(j), 4) <"rep-" and ax(j) = ax(i) then

ax(j) = "rep-" & ax(j)end if

next j

end if

next i

刪除重複的元素並儲存到 bx（）。

請注意，我使用兩個相等的 （==） 作為分隔符，並確保分隔符不包含在所有 ax 元素中。

如果是這樣，請切換到不太常用的內容，例如 %$ @之類。

dim s as string, bx as variantfor i = 1 to ubound(ax)if left$(ax(i), 4) <"rep-" thens = s & "==" & ax(i)

end if

next i

bx = split(s, "==")

end sub

如果僅使用 VS2008。

dim ax() as string =

dim bx = (from a in ax group by a into group select a).toarray

就是這樣。

預設下界為 0

選項 A（0 到 3,0 到 3）可以儲存 4*4=16 個元素，B 以同樣的方式儲存 A（0 到 9） 10 個元素。

c -1 到 1=（-1 0 1） -3 到 3（-3 -2 -1 0 1 2 3） 3*7=21 個元素空間。

問題資料只需要 9 個元素即可儲存所有答案 d

所謂曲線畫，通常數學把問題抽象成x、y，描述一般規律。 在數學中，橫軸是x軸，縱軸是y軸，平面上的乙個點由一對x，y確定。 也就是說，可以將一對x和y繪製為乙個點，為了描述溫度隨時間變化的規律，那麼將橫軸視為時間，將縱軸視為溫度。

每次測量單位時間時，都可以在這個坐標系中畫乙個點，這樣隨著時間的推移，連續測量溫度，畫出點，並通過連線這些點得到溫度曲線。

上圖似乎沒有形成曲線，因為橫軸的刻度不夠小，其實在VB中，你把每個畫素單位作為你測量溫度的間隔單位，然後你可以把它連線成一條曲線。

如何畫乙個點：

物件。 pset （x，y） [color]其中 x 是時間間隔（或畫素的基本單位），可以是 1,2,3,4,5,6 ,..

Y是實際測得的溫度值（可以縮放到一定比例）。

使用陣列儲存資料，您可以：

d（1 到 n，1 到 2） 作為整數將 x 分量儲存在第一維中，將 y 分量儲存在第二維中。

我不知道您的具體應用代表什麼曲線？

然後，假設您在圖 1 上畫畫：

for i = 1 to n

d(i,1),d(i,2))

next i

ANS 是在排序過程中定義的變數，它有乙個字段作為排序過程，當它在 cmdshow click 中被引用時，編譯器會將其解釋為另乙個尚未定義的變數。 因此，有必要將 ans 轉換為模組級變數。

方法：將 dim ans（） 作為字串放在所有程序之前，而不是程序內部。 並在排序過程中刪除變數的原始定義。

您沒有呼叫上面的函式，即排序函式，並且不帶引數。

原來的陣列在for迴圈後變為（1,4,9,16,25），陣列下標從0開始，所以a（1）=4，a（a（1））=a（4）=25

從程式的角度來看，這是分配乙個 5*5 矩陣，分配結果如下：

將從左上角到右下角的對角線值相加是 1+7+13+19+25=65，所以答案是 c