• <dd id="iwhyx"><track id="iwhyx"><video id="iwhyx"></video></track></dd>

    <th id="iwhyx"></th>
  • <progress id="iwhyx"></progress>
    <tbody id="iwhyx"><noscript id="iwhyx"></noscript></tbody>

    當前位置: 主頁 > 百科 > 計算機編程 > 易語言源碼 >
    0 Comments

    源碼—取磁盤信息

    發布于:2016-07-05  |   作者:http://www.omfeel.com  |   已聚集:人圍觀

    .支持庫 iext

    .局部變量 計次, 整數型

    .局部變量 磁盤, 文本型

    .局部變量 卷標, 文本型

    .局部變量 序列號, 整數型

    .局部變量 文件系統, 文本型


    .計次循環首 (26, 計次)

        磁盤 = 字符 (64 + 計次)

        .如果真 (文件是否存在 (磁盤 + “:\nul”))

            卷標 = 取空白文本 (255)

            文件系統 = 取空白文本 (255)

            取磁盤信息 (磁盤 + “:\”, 卷標, 255, 序列號, 255, 0, 文件系統, 255)

            超級列表框.插入表項 (, 磁盤 + “:”, , , , )

            超級列表框.置標題 (超級列表框.取表項數 () - 1, 1, 選擇 (卷標 = “”, “本地磁盤”, 卷標))

            超級列表框.置標題 (超級列表框.取表項數 () - 1, 2, 格式化大小 (取磁盤總空間 (磁盤) × 1024))

            超級列表框.置標題 (超級列表框.取表項數 () - 1, 3, 格式化大小 (取磁盤剩余空間 (磁盤) × 1024))

            超級列表框.置標題 (超級列表框.取表項數 () - 1, 4, 到文本 (序列號))

            超級列表框.置標題 (超級列表框.取表項數 () - 1, 5, 文件系統)

        .如果真結束


    .計次循環尾 ()


    .子程序 格式化大小, 文本型

    .參數 大小, 雙精度小數型

    .局部變量 次數, 整數型


    次數 = 1

    .判斷循環首 (大小 ≥ 1024)

        次數 = 次數 + 1

        大小 = 大小 ÷ 1024

    .判斷循環尾 ()

    返回 (到文本 (四舍五入 (大小, 2)) + “ ” + 多項選擇 (次數, “Byte”, “KB”, “MB”, “GB”, “TB”, “PB”, “EB”, “ZB”, “YB”, “NB”, “DB”, “CB”))


    標簽:                   喜歡:收藏
    亚洲五月天天综合色情|成人av弹堂|99久久热视频只有精品5|熟女人妻无码亚洲

  • <dd id="iwhyx"><track id="iwhyx"><video id="iwhyx"></video></track></dd>

    <th id="iwhyx"></th>
  • <progress id="iwhyx"></progress>
    <tbody id="iwhyx"><noscript id="iwhyx"></noscript></tbody>