1樓：匿名使用者
private sub command1_click()
'每點一下按鈕，選項向後移動一次，到最後時再迴圈到最前
for k = 0 to 3 '從0~3迴圈檢查四個選項
if option1(k).value then '如果該選項選中，比如第2個，此時 k=1
n = k 'n=k = 1
end if '退出if，其實還可以同時 exit for
next k
option1(n).value = false '取消原來的選擇，第n個
n = n + 1 'n=n+1
if n = 4 then '如果原來是最後一個選中，此時n=4，則重新賦值n=10
n = 0
end if
option1(n).value = true '新選項第n個選中
end sub
'這樣更簡單
private sub command1_click()
for k = 0 to 3
if option1(k).value then n = k:exit for
next k
n = iif(n=3,0,n+1)
option1(n).value = true
end sub
2樓：流雲行水
for k = 0 to 3 if option1(k).value then n = k end if next k
這個迴圈的作用就是歷遍各個選項，看看使用者選了哪個，n就設定為哪個if option1(k).value then 相當於if option1(k).value＝true then '選項被選中時value＝true
然後再將n加1，把選項向下移動
vb題，看不懂，求耐心大神！
3樓：陽光上的橋
答案是c
當向文字框text1中輸入小寫字母a時，文字框text2中宣示的是c，因為**首先轉換為大寫，然後在+2，表示是a的後兩個字元，也就是c：
c = ucase(chr(keycode))text2.text=chr(asc(c)+2)
4樓：笑年
chr()是轉化為字元
ucase()是轉化為大寫
asc()+2 是轉化為數字再加2，就是指這個大寫的後面2個了char()又轉化為字元
所以選c了
5樓：匿名使用者
c。。。。。。。。。。。。。。。
vb題 要分析一下 我看不懂
6樓：扈懷煒
這個對i沒有影響，i的值是 11，應該問的是x的值
7樓：島上明月
這個題 寫錯了， 題面應該問的是： x的值為（）答案： d （x=18）
這段程式 是計算 1到 10 之間 所有 3的 倍數 之和=3+6+9 =18
一道歷史材料題 看不懂啊，歷史材料題看不懂材料怎麼破（
1 利用義和團進行其統治集團內部的權力鬥爭。2 進行剿除。迫於義和團的聲勢而不敢公開鎮壓。3 材料1認為義和團運動是由幾個大臣引起的。材料4認為是由於外國侵略不斷深入，人民仇視侵略而發生的。材料4的見解比較正確。4 認為義和團在鬥爭方式上不正確，但其反抗侵略的精神是可取的。基本正確。義 和因盲目排外...
看不懂這個笑話，求解，看不懂這個笑話，求解！
發現怎麼洗味道都很不行，而且難聞，推銷員心理說 我幫不了你了 因為他的內分泌太好了，推銷員的洗衣粉的洗不乾淨 因為女人的 髒的連這麼好的洗衣服都洗不乾淨，可見髒到了極致。1.洗完之後有味2.害羞不好意思聞 因為婦女的短褲洗了很髒，而且看婦女裸著很害羞的 難道是因為如果他說 又香又幹淨。那麼潛臺詞就是...
書法看不懂了，書法看不懂怎麼辦
這幅字是岳飛的詞滿江紅。就是那首怒髮衝冠，憑欄處，瀟瀟雨歇 你可以對照原詞認一認。對於這幅字，書寫者倒是熱血沸騰豪情滿懷的，只可惜太過張揚了，少了點英雄的豪氣。書法為什麼越來越看不懂了？當今書法藝術評價標準在哪兒 書法現在已經不是過去的實用為主了，已經成為了一門以藝術性為主的高雅藝術，如果沒有經過藝...