.版本 2
.DLL命令 ShellExecuteA, 整數型, "shell32.dll", "ShellExecuteA", , 查找與指定文件關聯(lián)在一起的程序的文件名,并執(zhí)行相關操作，成功則返一個大于31的值。
  .參數 hwnd, 整數型, , 用來指定被執(zhí)行文件顯示的窗口所屬的父窗口句柄，可以為NULL
  .參數 lpOperation, 文本型, , 指向一個表示執(zhí)行方式的字符串
  .參數 lpFile, 文本型, , 用來指定文件名,文件名既可以是可執(zhí)行文件也可以是數據文件,或可執(zhí)行文件．
  .參數 lpParameters, 文本型, , 當lpFile參數指定了一個可執(zhí)行文件(open),本參數用來指定命令行參數.如果lpFile參數指定是數據文件或其它,那么本參數必須是NULL
  .參數 lpDirectoy, 文本型, , 執(zhí)行或打開文件時使用的默認目錄，如果lpFile同時指定了文件名(夾)的目錄，此參數無效．
  .參數 nShowCmd, 整數型, , 如果函數執(zhí)行了一個可執(zhí)行文件,這個參數是指定窗口的打開方式,這個參數定義同ShowWindow函數中的dwCmdShow參數

QQ資料查看

.版本 2
.支持庫 shell
.支持庫 internet
.支持庫 spec
.程序集 窗口程序集1
.子程序 __啟動窗口_創(chuàng)建完畢
.子程序 _查看空間按鈕_被單擊
執(zhí)行 (, “http://” ＋ QQ號編輯框.內容 ＋ “.qzone.qq.com/”, , , )
.子程序 _Q形象按鈕_被單擊
Q形象圖片框.圖片 ＝ HTTP讀文件 (“http://qqshow-user.tencent.com/” ＋ QQ號編輯框.內容 ＋ “/10/00”)
.子程序 _加好友按鈕_被單擊
執(zhí)行 (, “http://shang.qq.com/open_webaio.html?sigt=baeb4e0bf232f744dfd1c0a55bb3c114812cc40a49a6ef76a3dc16deda258edd024c6571172cffad951b270489225809&sigu=b3f92d604d2f014c82b012149884f6ce7370285779bc03a0a4e0bbf500a54ac327b2e470ca5e550c&tuin=” ＋ QQ號編輯框.內容, , , )
.子程序 _刷新按鈕_被單擊
調試輸出 (到文本 (HTTP讀文件 (“http://webpresence.qq.com/getonline?Type=1&” ＋ QQ號編輯框.內容 ＋ “:”)))
.如果 (到文本 (HTTP讀文件 (“http://webpresence.qq.com/getonline?Type=1&” ＋ QQ號編輯框.內容 ＋ “:”)) ＝ “online[0]=1;”)
  _啟動窗口.標題 ＝ “QQ:” ＋ QQ號編輯框.內容 ＋ “ [在線]”
  _啟動窗口.標題 ＝ “QQ:” ＋ QQ號編輯框.內容 ＋ “ [不在線或隱身]”
.否則
.如果結束
信息框 (“請注意窗口題標！”, 0, )
.子程序 _資料按鈕_被單擊
網頁_打開指定網址 (“tencent://ContactInfo/?subcmd=ViewInfo&puin=0&uin=” ＋ QQ號編輯框.內容)
.子程序 網頁_打開指定網址, 邏輯型, , 使用系統(tǒng)默認的瀏覽器打開一個網址
.參數 網址, 文本型, , 要打開的網頁地址
返回 (選擇 (ShellExecuteA (0, “open”, 網址, “”, “”, 1) ＝ 0, 假, 真))
.子程序 _QQ頭像按鈕_被單擊
Q頭像圖片框.圖片 ＝ HTTP讀文件 (“http://q.qlogo.cn/headimg_dl?dst_uin=” ＋ QQ號編輯框.內容 ＋ “&spec=640&img_type=jpg”)

運行結果：