vb等級(jí)考試題目與評(píng)析65-全文預(yù)覽
【正文】 其名稱為 Text1，初始內(nèi)容為空白；然后再畫三個(gè)單選按鈕，其名稱分別為 Op Op2和 Op3，標(biāo)題分別為 單選按鈕 單選按鈕 2和 單選按鈕 3，編寫適當(dāng)?shù)氖录^程。 第一題主要考查了 Label控件的使用。 第二題主要考查了單選按鈕的使用，在單選按鈕中如果選中它，則將觸發(fā)其 Click事件，對(duì)于文本框而言，其 Text屬性是其缺省屬性，它用 來表示文本框中的內(nèi)容。 要求： 去掉程序中的注釋符，把程序中的 ？改為正確的內(nèi)容，使其能正確運(yùn)行，但不能修改程序中的其他部分，也不能修改控件的屬性。程序運(yùn)行后，如果單擊 開始 命令按鈕，則該按鈕變?yōu)榻?，而?biāo)題變?yōu)?繼續(xù) ，同時(shí)標(biāo)簽中的字體每隔 100毫秒增大 （即變?yōu)樵瓉淼?），如圖 2所示，字體大小超過 100后，自動(dòng)縮小為 8；如果單擊 停止 命令按鈕，則該按鈕變?yōu)榻茫?繼續(xù) 命令 按鈕變?yōu)橛行?，同時(shí)標(biāo)簽中的字體停止變化；再次單擊 繼續(xù) 命令按鈕后，標(biāo)簽中的字體繼續(xù)變化。 圖 1 圖 2 第 1小題： 本題考查的 是數(shù)組和 For Next 循環(huán)結(jié)構(gòu)語句的使用，打開工程文件 ，雙擊 Command1命令按鈕，在代碼窗口中補(bǔ)充如下代碼： Private Sub Command1_Click() Dim Arr Arr = Array(43, 68, 25, 65, 78, 12, 79, 43, 94, 72) pos = 0 neg = 0 For k = 1 To 10 If Arr(k) = 0 Then
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1