• <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  |   已聚集:人圍觀

    .子程序 _啟動子程序, 整數型, , 本子程序在程序啟動后最先執行

    .局部變量 input, CHAR_INFO, , "11"

    .局部變量 size, 整數型

    .局部變量 csbi, CONSOLE_SCREEN_BUFFER_INFO

    .局部變量 region, SMALL_RECT

    .局部變量 hstdout, 整數型

    .局部變量 writestart


    input [1].Attributes = 位或 (#FOREGROUND_RED, #FOREGROUND_INTENSITY)

    input [1].Char = 取代碼 (“h”, )  ' h';

    input [2].Attributes = 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

    input [2].Char = 取代碼 (“e”, )  ' 'e';

    input [3].Attributes = 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

    input [3].Char = 取代碼 (“l”, )  ' l';

    input [4].Attributes = 位或 (#FOREGROUND_RED, #FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

    input [4].Char = 取代碼 (“l”, )  ' l';

    input [5].Attributes = 位或 (#FOREGROUND_GREEN, #FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

    input [5].Char = 取代碼 (“o”, )  ' o';

    input [6].Attributes = 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

    input [6].Char = 取代碼 (“,”, )

    input [7].Attributes = 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

    input [7].Char = 取代碼 (“w”, )

    input [8].Attributes = 位或 (#FOREGROUND_RED, #FOREGROUND_INTENSITY)

    input [8].Char = 取代碼 (“o”, )

    input [9].Attributes = 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

    input [9].Char = 取代碼 (“r”, )

    input [10].Attributes = 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

    input [10].Char = 取代碼 (“l”, )

    input [11].Attributes = 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

    input [11].Char = 取代碼 (“d”, )


    size = 位或 (65536, 11, 1)

    hstdout = GetStdHandle (#STD_OUTPUT_HANDLE)

    GetConsoleScreenBufferInfo (hstdout, csbi)

    ' //要寫入的字符緩沖區相對于控制臺緩沖區的位置

    region.Left = (csbi.srWindow.Right + csbi.srWindow.Left - 11) ÷ 2

    region.Top = (csbi.srWindow.Top + csbi.srWindow.Bottom) ÷ 2

    region.Right = region.Left + 11

    region.Bottom = region.Top + 1


    WriteConsoleOutput (hstdout, input, size, writestart, region)


    SetConsoleTitle (“你好,世界!”)

    標準輸入 ()

    返回 (0)  ' 可以根據您的需要返回任意數值


    標簽:                   喜歡:收藏
    亚洲五月天天综合色情|成人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>