VB有乙個我不知道的問題，請指教

除數為0的誤差為11，這些錯誤號由編譯器定義，可以根據錯誤號大致確定程式錯誤的原因。

1. 返回或設定指示錯誤的值。 Number 是 err 物件的預設屬性。 可讀和可寫。

說明從物件返回使用者定義的錯誤時，將選為錯誤的錯誤數新增到 VBOoObjectError 常量中，並相應地進行設定。 例如，數字 1051 作為錯誤返回，並顯示以下內容：

number := vbobjecterror + 1051, source:= someclass

err 物件。

包含有關執行時錯誤的資訊。

說明 err 物件的屬性是由錯誤的生成器（Visual Basic、物件或程式設計師）設定的。

err 物件的預設屬性是 number。 由於此預設屬性可以由物件名稱 err 表示，因此不必修改以前在 err 函式或 err 語句中寫入的 **。

當發生執行時錯誤時，err 物件的屬性將填充一些資訊，這些資訊可以清楚地標識錯誤以及用於處理錯誤的資訊。 若要在 ** 中生成執行時錯誤，請使用 raise 方法。

在任何形式的 resume 或 On error 語句之後，以及在錯誤處理子例程中的 exit sub、exit function 或 exit property 語句之後，將 err 物件的屬性設定回零或長度為零的字串 （）。"")。您可以使用 clear 方法顯式重新設定 err。

要為系統錯誤和類模組生成執行時錯誤，請使用 raise 方法而不是 error 語句。 是否在其他**中使用 raise 方法取決於要返回多少資訊。

err 物件是具有全域性作用域的內部物件。 沒有必要在 ** 中建立這些物件的例項。

2. chdrive 語句更改當前驅動器。

語法 chdrive 驅動器

必需的驅動器引數是乙個字串表示式，用於指定存在的驅動器。 如果使用長度為零的字串 （""），當前驅動器不會更改。如果 drive 引數中有多個字元，則 chdrive 將僅使用第乙個字母。

chdrive 是更改預設驅動器而不是 drive1 的驅動器，它與 drivelistbox 控制項無關，例如 chdrive"d"

只需將 D 驅動器用作預設驅動器，下次執行程式時，drivelistbox 控制項將預設為 D 驅動器（這是您看到的第一件事）。 你知道嗎？

涉及的知識：

1.生成隨機數。

2. 陣列。 3.排序演算法。

解決方案： 1.生成隨機數：

x = int(rnd*10)

2.本題採用二維陣列，第一維儲存0-9，二維儲存相應的出現次數。

定義陣列，並對其進行初始化，以便陣列的第一維包含數字 0-9，即 .

d(1,0)=0;d(1,1)=1;d(1,2)=2;..d(1,9)=9;

dim d(1 to 2,0 to 9) as integerdim i as integer

for i=0 to 9

d(1,i)=i

d(2,i)=0 '在第 2 維中設定 0

next i

3.排序演算法，網際網絡上有很多搜尋。

完成**：1，初始化。

dim d(1 to 2, 0 to 9) as integerdim i as integer

for i = 0 to 9

d(1, i) = i

d(2, i) = 0

next i

2.生成隨機數並計數。

dim x as integer

randomize

for i = 1 to 200

x = int(rnd * 10)

d(2, x) = d(2, x) +1 '注意：假設 x=5，則 d（1,5） 儲存為 5，因此 d（2,5） 增加 1

next i

3.排序。 dim j as integer

for i = 0 to 9 - 1

for j = i + 1 to 9

if d(2, i) d(1, i) = d(1, j)

d(1, j) = x

x = d(2, i)

d(2, i) = d(2, j)

d(2, j) = x

end if

next j

next i

4. 輸出排序結果。

print "數字", "結果"

for i = 0 to 9

print d(1, i), d(2, i)next i

將其替換為中間變數，這樣可以更快。

郵政號碼，**號碼可以與以下表示式一起使用：如果喜歡"######" then ；表示數字。

男性和女性的表達方式：例如，if like"[男人和女人]。" then

檢查文字框 validate 事件中輸入的有效性，該事件在檔案框失去焦點時觸發。 如果輸入不正確，請設定事件引數 cancel =true，以便焦點保持在原位。

退出事件 只需檢查每個文字框是否為空，將文字框設定為文字框陣列更方便。 前提是視窗開啟時所有文字框都是空的，或者是正確的值。

這主要是因為變數的範圍。

dim a as variant，開頭的這句話宣告了乙個全域性變數，也就是說變數 a 在表單載入之前就存在了，並且會一直存在到整個程式結束，所以表單載入中 a 的賦值會被記住，所以 a 的值可以在 command1 點選中顯示出來。

如果沒有 dim a 作為變體的語句，那麼表單載入中的變數 A 是區域性變數，只在表單載入中起作用，而變數 A 會在表單載入結束後消失，command1 click 中的變數 A 也是只屬於 command1 click 的區域性變數， 由命令1 click的過程自動宣告，表單載入中的變數A無關緊要（其實表單load中的變數A不見了），命令1點選對變數a沒有任何賦值，所以不會顯示任何內容。

其實，這個錯誤是由於沒有養成良好的寫作習慣，建議養成良好的習慣，這樣可以省去很多麻煩。 在網際網絡上搜尋“培養程式設計師的職業標準”，這裡有一些好習慣可能會對您有所幫助。

variant 資料型別來替換任何資料型別，適應性更強。 如果變體的內容是數字，則可以將其表示為字串或其實際值，具體取決於上下文。

chr（65） 輸出 ASCII 值為 65 的字元。

因為 dim a as variant 定義了寫在頂部的變數型別語句是全域性變數，所以模組中所有子過程中的 a 變數是相同且通用的。

如果沒有這個全域性定義，你就會陷入孤島。

首先，在模組頂部使用 dim a as varant 語句，這意味著您定義了乙個模組級變數，因此無論您在任何事件中以該形式將 a 分配給什麼，該數字都將被儲存。 如果你沒有該語句，那麼在 command1 click 事件和表單載入事件中，a 是乙個程序級變數，它只作用於這兩個事件，所以你在表單載入過程中給 a 賦值並不重要，按鈕點選事件中的 a 變數是否為 2 也無關緊要。 建議您先了解全域性變數、模變數、過程變數的概念，養成強制變數宣告的習慣。

s=0 i=1 0 個週期。

因為沒有迴圈，所以 s 仍然是 0 的初始值

i的起始值為1，步長為-1，那麼在第乙個迴圈之前，需要判斷初始值1和終止值的關係，如果初始值很小，那麼步長一定是正數，反之步長一定是負數， 初始值小，條件不滿足，所以沒有進入的迴圈體直接退出，所以i=1

i=0，s=1,1個週期。

因為步長為-1，迴圈體執行一次後，i變為0，但不在1-10範圍內，所以跳出來。

提出這個問題的老師不知道程式：迴圈變數不應該用於計算。

雖然這個問題已被接受，但仍然欠。