|
事件主窗口.創建完畢() 單選框1.背景顏色 = 無色 單選框2.背景顏色 = 無色 單選框3.背景顏色 = 無色 結束事件
事件單選框1.選擇改變() 如果 單選框1.選中 = 真 則 單選框2.選中 = 假 單選框3.選中 = 假 結束 如果 結束事件
事件單選框2.選擇改變() 如果 單選框2.選中 = 真 則 單選框1.選中 = 假 單選框3.選中 = 假 結束 如果 結束事件
事件單選框3.選擇改變() 如果 單選框3.選中 = 真 則 單選框2.選中 = 假 單選框1.選中 = 假 結束 如果 結束事件'
事件主窗口.按下某鍵(鍵代碼為 整數型,傳址 屏蔽 為 邏輯型) 判斷 鍵代碼 分支 返回鍵 彈出提示("你按下了返回鍵！")'如果 鍵代碼=返回鍵 則彈出相應提示 分支 音量增鍵 彈出提示("你按下了音量增鍵！")'如果 鍵代碼=音量增鍵 則彈出相應提示 分支 音量減鍵 彈出提示("你按下了音量減鍵！")'如果 鍵代碼=音量減鍵 則彈出相應提示 分支 中鍵 彈出提示("你按下了中鍵")'如果 鍵代碼=中鍵 則彈出相應提示 結束 判斷 結束事件
事件單選框1.選擇改變() 如果 單選框1.選中 = 真 則 單選框2.選中 = 假 否則 單選框2.選中 = 真 結束 如果 結束事件
事件單選框2.選擇改變() 如果 單選框2.選中 = 真 則 單選框1.選中 = 假 否則 單選框1.選中 = 真 結束 如果 結束事件
事件按鈕1.被單擊() 如果 單選框1.選中 = 真 則 信息框("信息：","感謝您的支持,我們將做得更好！","確定") 結束 如果 結束事件 事件按鈕2.被單擊() 結束 事件
事件主窗口.按下某鍵(鍵代碼為 整數型,傳址 屏蔽 為 邏輯型) 判斷 鍵代碼 分支 返回鍵 彈出提示("你按下了返回鍵！")'如果 鍵代碼=返回鍵 則彈出相應提示 分支 音量增鍵 彈出提示("你按下了音量增鍵！")'如果 鍵代碼=音量增鍵 則彈出相應提示 分支 音量減鍵 彈出提示("你按下了音量減鍵！")'如果 鍵代碼=音量減鍵 則彈出相應提示 分支 中鍵 彈出提示("你按下了中鍵")'如果 鍵代碼=中鍵 則彈出相應提示 結束 判斷 結束事件
事件單選框1.選擇改變() 如果 單選框1.選中 = 真 則 單選框2.選中 = 假 否則 單選框2.選中 = 真 結束 如果 結束事件
事件單選框2.選擇改變() 如果 單選框2.選中 = 真 則 單選框1.選中 = 假 否則 單選框1.選中 = 真 結束 如果 結束事件
事件按鈕1.被單擊() 如果 單選框1.選中 = 真 則 信息框("信息：","感謝您的支持,我們將做得更好！","確定") 結束 如果 結束事件
事件按鈕2.被單擊() 變量 計數 為 整數型 變量 結果 為 整數型 變量循環首 計數 = 1 至 100 步進 1 '變量循環,變量"計數"從1遞增到100,每次遞增值為步進值1,步進值默認為1,這里就可以省略不寫,步進值也可以為負數,表示遞減 結果 = 結果 + 計數 變量循環尾 信息框("信息：","累加結果為："& 結果 ,"確定") 結束事件
事件按鈕3.被單擊() 變量 計次 為 整數型 判斷循環首 計次 < 10 '如果條件滿足就繼續執行循環中的語句,如果條件不滿足時則停止循環 計次 = 計次 + 1 判斷循環尾 彈出提示("共循環"& 計次 & "次") 結束事件
事件按鈕4.被單擊() 變量 文本數組 為 文本型() 變量 當前文本 為 文本型 文本數組=分割文本("項目1|項目2|項目3","|") 枚舉循環首 當前文本 從 文本數組 '將文本數組中的每一個成員枚舉出來,賦值給當前文本變量 調試輸出(當前文本) 編輯框1.內容 = 編輯框1.內容 &"\n" & 當前文本 枚舉循環尾 結束事件
| 
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
