回覆列表
  • 1 # liu5646

    這個很簡單,寫了兩種方法

    1,標籤標記法,程式碼少,但前期要給要操作的每個標籤進行標記。沒有標記的不予處理

    2,尋找元件法,只要是標籤都可以改標題,程式碼稍多幾行。

    如果標籤很多,還可以用複製元件的方法,動態新增,在新增的時候就可以順便更改標題了,自己摸索一下,也很簡單

    原始碼直接複製

    .版本 2

    .程式集 視窗程式集1

    .子程式 __啟動視窗_建立完畢

    " 友情提示:元件的標記可以在左邊的屬性欄直接修改,這裡做演示就動態新增一下

    標籤1.標記 = “1”

    標籤2.標記 = “2”

    標籤3.標記 = “3”

    標籤4.標記 = “4”

    標籤5.標記 = “5”

    標籤6.標記 = “6”

    標籤7.標記 = “7”

    標籤8.標記 = “8”

    .區域性變數 a, 整數型

    .區域性變數 標籤, 標籤

    .計次迴圈首 (8, a) " 8個標籤迴圈8次。n個標籤迴圈n次

    標籤 = 取標記元件 (a)

    標籤.標題 = “標籤” + 到文字 (a) " 沒有標記的標籤不予處理

    .計次迴圈尾 ()

    .區域性變數 標籤尋找控制代碼, 整數型

    .區域性變數 a, 整數型

    .區域性變數 標籤, 標籤

    .區域性變數 標籤名稱, 文字型

    .區域性變數 數字, 文字型

    標籤尋找控制代碼 = 尋找元件 (_啟動視窗, “標籤”, “標籤”, , )

    .計次迴圈首 (取找到元件數目 (標籤尋找控制代碼), a)

    標籤 = 取所找到元件 (標籤尋找控制代碼, a - 1) " 索引從0開始

    標籤名稱 = 取元件名稱 (標籤)

    數字 = 取文字右邊 (標籤名稱, 取文字長度 (標籤名稱) - 4)

    數字 = 到文字 (到整數 (數字)) " 標籤名稱不是“標籤+數字”的,標題都會賦值為“標籤0”

    標籤.標題 = “標籤” + 數字

    .計次迴圈尾 ()

  • 中秋節和大豐收的關聯?
  • 如果要你以失去雙臂為代價,給你一雙翅膀,你願意嗎?