您好,登錄后才能下訂單哦!
小編給大家分享一下易語言如何實現局域網控制系統,相信大部分人都還不怎么了解,因此分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后大有收獲,下面讓我們一起去了解一下吧!
局域網控制系統
.版本 2 .程序集 窗口程序集_啟動窗口 .子程序 __啟動窗口_創建完畢 .子程序 _按鈕_單發送_被單擊 .判斷開始 (單選框2.選中 = 真) .判斷開始 (運行 (“shutdown -s -m \\” + 編輯框_目標IP.內容 + “ -t ” + 編輯框_倒數秒.內容, 假, 1) = 真) 信息框 (“發送成功”, #信息圖標, ) .默認 信息框 (“發送失敗”, #警告圖標, ) .判斷結束 .默認 .判斷結束 .子程序 _按鈕_發送_被單擊 .局部變量 個數, 文本型 .局部變量 r, 文本型, , "4" .局部變量 t, 文本型, , "4" .局部變量 s, 整數型 r = 分割文本 (編輯框_起始IP.內容, “.”, ) t = 分割文本 (編輯框_結束IP.內容, “.”, ) 個數 = 到文本 (到整數 (t [4]) - 到整數 (r [4])) .判斷開始 (r [1] ≠ t [1] 且 r [2] ≠ t [2] 且 r [3] ≠ t [3]) 信息框 (“IP范圍設置有誤”, #警告圖標, ) .默認 .判斷開始 (選擇框_確認.選中 = 真) 按鈕_發送.禁止 = 真 s = 到整數 (r [4]) .計次循環首 (到整數 (個數), s) 運行 (“shutdown -s -m \\” + r [1] + “.” + r [2] + “.” + r [3] + “.” + 到文本 (s) + “ -t ” + 編輯框_秒數.內容, 假, 1) .計次循環尾 () 信息框 (“全部發送完成,總計發送了[” + 個數 + “]個目標!”, #信息圖標, ) 按鈕_發送.禁止 = 假 .默認 信息框 (“為了防止誤操作導致的各種后果,請先確定你要這么做,然后再次發送!”, #警告圖標, ) .判斷結束 .判斷結束
運行結果:
以上是“易語言如何實現局域網控制系統”這篇文章的所有內容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內容對大家有所幫助,如果還想學習更多知識,歡迎關注億速云行業資訊頻道!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。