[問答題] 在考生文件夾下有一個工程文件sjt3.vbp,及其窗體文件sjt3.frm,程序運行時,如果用鼠標左鍵按住窗體,并在其上移動,則窗體上顯示“您按下了
[問答題] 在考生文件夾下有一個工程文件sjt3.vbp,及其窗體文件sjt3.frm,程序運行時,如果用鼠標左鍵按住窗體,并在其上移動,則窗體上顯示“您按下了鼠標的左鍵”;如果用鼠標的右鍵按住窗體,并在其上移動,則顯示“您按下了鼠標的右鍵”。程序運行時的窗體界面如圖所示。要求:題目中所給的程序不完整,請讀懂程序后將其補充完整,以原文件名保存。試題源程序:1 Private Sub Form_MouseMove(Button As Integer, ShiftAs Integer,X As Single,Y As Single)2 ’If Button=Then Print "您按下了鼠標的左鍵"3 ’If Button=Then Print "您按下了鼠標的右鍵"4 End Sub
正確答案:第一步:啟動Visual Basic,打開考生文件夾下的工程文件sjt3.vbp。第二步:雙擊窗體中的任何位置,進入代碼編輯窗口,填寫代碼如下:第一個處填入AddItem。第二個處填入L1.ListIndex。第三步:填寫完畢,調(diào)試成功后,以原文件名保存。AddItem方法用于在程序代碼中向列表框中添加一個選項。具體格式為:列表框名.AddItem選項內(nèi)容字符串[,索引值]。此方法可將某個字符串作為選項內(nèi)容插入到列表框數(shù)組中的指定位置,由索引值說明該字符串插入到數(shù)組中的下標值。如果省略“索引值
參考解析:本題主要考查列表框的AddItem和RemoveItem方法的使用和ListIndex屬性的概念。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。