色综合色综合网色综合,尤物在线精品,香蕉久久网站

.版本 2

.子程序 GetProcessHandle, 整數型
.參數 lpProcessName, 文本型
.局部變量 hSnapShot, 整數型
.局部變量 dwRet, 整數型
.局部變量 prHandle, 整數型
.局部變量 pe32, PROCESSENTRY32
.局部變量 test, , ,"111,222,444",3434,"2323,","
.局部變量 test2, , , ,34weeeee34,"2323,","
.局部變量 test3, , ,"111,222,444"

.判斷開始 (test2)
        輸出調試文本(“啊哈哈哈哈”)
    .默認
       輸出調試文本(“啊哈哈哈哈”)
    .判斷結束
hSnapShot ＝ CreateToolhelp32Snapshot (#TH32CS_SNAPALL, 0)
.如果真 (hSnapShot ＝ 0)
    信息框 (“獲得進程快照失敗”, 0, )
    返回 (dwRet)
.如果真結束
pe32.dwSize ＝ 1024
prHandle ＝ Process32First (hSnapShot, pe32)
.判斷循環首 (prHandle ≠ 0)
    .判斷開始 (到文本 (pe32.szExeFile) ＝ lpProcessName)
        dwRet ＝ pe32.th32ProcessID
        跳出循環 ()
    .默認
        prHandle ＝ Process32Next (hSnapShot, pe32)
    .判斷結束

.判斷循環尾 ()
CloseHandle (hSnapShot)
返回 (dwRet)
'test'12333###{}()“測試'''”
'//////////////////判斷流程測試///////////////////////////
.如果 ()
.否則
    .如果 ()
    .否則
        .如果 ()
            .如果 ()
            .否則
            .如果結束
        .否則
            .如果 ()
            .否則
                .判斷開始 ()
                .判斷 ()
                .判斷 ()
                    .判斷開始 ()
                    .判斷 ()
                    .默認
                    .判斷結束
                .判斷 ()
                    .判斷開始 ()
                    .默認
                    .判斷結束
                .判斷 ()
                .默認
                .判斷結束
            .如果結束
        .如果結束
    .如果結束
.如果結束

.子程序 子程序1

信息框 (“Hello World”, 0, , )

.子程序 子程序2

信息框 (“你好世界”, 0, , )

.子程序 子程序3

信息框 (“哎喲我去”, 0, , )