vb等級(jí)考試題目與評(píng)析45-在線瀏覽
2024-11-07 16:52本頁(yè)面
【正文】 ******************************************************* （ 2）在考生文件夾下有一個(gè)工程文件 ，要求程序運(yùn)行后，如果多次 單擊列表框中的項(xiàng)，則可同時(shí)選擇這些項(xiàng)。 要求： 修改列表框的適當(dāng)屬性，使得運(yùn)行時(shí)可以多選，并去掉程序中的注釋 符，把程序中的 ？ 改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不得修 改程序中的其他部分。 第 1小題 標(biāo)簽控件的 BorderStyle屬性 返回或設(shè)置標(biāo)簽控件的邊框樣式。其語(yǔ)法為： 控件名 .BorderStyle=0或 1計(jì)時(shí)器控件的 Interval屬性 返回或設(shè)置計(jì)時(shí)器事件之間的間隔，以毫秒為單位，取值范圍是 0到 65535 解題方法： 新建一個(gè)名為 Form1的窗體，點(diǎn)擊工具箱中的 Timer控件圖標(biāo)，然后在窗體上拖拉出一個(gè)計(jì)時(shí)器，通過(guò)屬性窗口設(shè)置其 Interval屬性為 1000。 打開(kāi)代碼窗口，輸入如下的代碼： Private Sub Timer1_Timer() = + 1 End Sub 按要求保存文件即完成本題?？梢匀?0、 1和 2三種值，取值為 0，不能進(jìn)行多重選擇；取值為 1，用鼠標(biāo)或空格鍵可 以選中多個(gè)列表項(xiàng)；取值為 2，按下 Shift鍵，用鼠標(biāo)單擊要選擇的第一個(gè)列表項(xiàng)，再單擊要選擇的最后一個(gè)列表項(xiàng)，可以連續(xù)選中兩者之間的所有列表項(xiàng)；按下 Ctrl鍵，用鼠標(biāo)單擊列表項(xiàng)，可以不連續(xù)的選中多個(gè)列表項(xiàng)。 修改后的代碼如下： Private Sub C1_Click() For i = 0 To 1 If (i) = True Then Print (i) End If Next End Sub 按要求保存文件即完成本題。請(qǐng)?jiān)诖绑w上畫(huà)一個(gè)名稱為 Text1的文本框；畫(huà)
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1