匿名使用者 1級 2013-06-17 回答

。版本 2

。支援庫 shell

。子程式 _按鈕1_被單擊

。區域性變數 p， 整數型

。計次迴圈首 （列表框1。取專案數 （）， p）

p ＝ p － 1

。如果真 （尋找文字 （列表框1。取專案文字 （p）， “發射”， ， 假） ≠ -1）

執行 （#開啟檔案， “F：\12\sex。swf”， ， ， ）

返回 （）

。如果真結束

。計次迴圈尾 （）

‘ 資訊框 （“找不到關鍵字‘發射’！”， 0， ）

時間詮釋一切 1級 2016-11-13 回答

計次迴圈首（超級列表框1。取表項數（），i）

如果真（-1！=尋找文字（超級列表框1。取標題（i-1，0），關鍵字））

這裡表示尋找到了，內容自己寫

計次迴圈尾（）

匿名使用者 1級 2013-06-17 回答

呼叫格式： 〈整數型〉 尋找文字 （文字型 被搜尋的文字，文字型 欲尋找的文字，〔整數型 起始搜尋位置〕，邏輯型 是否不區分大小寫） - 系統核心支援庫->文字操作

英文名稱：InStr

返回一個整數值，指定一文字在另一文字中最先出現的位置，位置值從 1 開始。如果未找到，返回-1。本命令為初級命令。

引數<1>的名稱為“被搜尋的文字”，型別為“文字型（text）”。

引數<2>的名稱為“欲尋找的文字”，型別為“文字型（text）”。

引數<3>的名稱為“起始搜尋位置”，型別為“整數型（int）”，可以被省略。位置值從 1 開始。如果本引數被省略，預設為 1 。

引數<4>的名稱為“是否不區分大小寫”，型別為“邏輯型（bool）”，初始值為“假”。為真不區分大小寫，為假區分。

作業系統需求： Windows、Linux

呼叫格式： 〈文字型〉 物件．取專案文字 （整數型 專案索引） - 系統核心支援庫->列表框

英文名稱：GetItemText

返回指定專案的文字。如果指定專案不存在，將返回空文字。本命令為初級物件成員命令。

引數<1>的名稱為“專案索引”，型別為“整數型（int）”。0 為專案一，1 為專案二，如此類推。