vblistbox 檢查下乙個錯誤

不能這樣寫，應該這樣。

if "no" then exit subif not ( = - 1) then= + 1

no" & "\up sky\" &

end if""

= + 1

將此行放在以下句子之後。

"\up sky\" &

+1 在這一行的括號裡

這是由於在執行 VB 窗體時，將焦點自動聚合到具有 tabindex 屬性為 0 的控制項上。 可以將窗體上其他控制項的 tabindex 屬性設定為 0，例如，將文字框的 tabindex 屬性設定為 0

tabindex 屬性。

返回或設定父窗體中大多數物件的 Tab 鍵順序。

預設情況下，Visual Basic 在窗體上繪製控制項時分配 Tab 鍵順序。

例外情況是選單、計時器、資料、影象、線條和形狀控制項，它們不包含在選項卡中

鍵順序。 在執行時不可見或無效的控制項，以及無法接收焦點的控制項（幀

和 Label 控制項）仍按 Tab 鍵順序排列，但在切換時將跳過這些控制項。

每個新控制項都位於 Tab 鍵順序的末尾。 如果更改控制項的 tabindex 屬性的值以調整預設 Tab 鍵順序，則 Visual Basic

其他控制項的 tabindex 屬性會自動重新編號，以反映插入和刪除。 您可以在設計時使用屬性視窗或在執行時更改此設定。

option explicit

private sub form_load()

0end sub

private sub option1_click()

text1 = "a"

end sub

private sub option2_click()

text1 = "b"

end sub

小部件的焦點不應放在單選框上，即 tabindex 0 可以將其設定為另乙個小部件。

我記得這個值在右邊屬性欄的tabindex中被修改了（功能是按tab鍵切換標籤，有順序）。

在 option 屬性中將值設定為 false

或者它可以在表單載入事件中使用。

你是怎麼解決這個問題的？ 你能告訴我麻煩嗎？

你不能只有三個單選按鈕。