替换项目文本
#include <GuiListBox.au3>
_GUICtrlListBox_ReplaceString($hWnd, $iIndex, $sText)
$hWnd | 控件的控件ID/句柄 |
$iIndex | 项目的 0 基索引 |
$sText | 用于替换的字符串 |
#include <GuiListBox.au3>
#include <GUIConstantsEx.au3>
$Debug_LB = False ;检查传递给 ListBox 函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $sText, $hListBox
; 创建 GUI
GUICreate("List Box Replace String", 400, 296)
$hListBox = GUICtrlCreateList("", 2, 2, 396, 296, BitOR($LBS_STANDARD, $LBS_EXTENDEDSEL))
GUISetState()
; 添加字符串
_GUICtrlListBox_BeginUpdate($hListBox)
For $iI = 1 To 9
$sText = StringFormat("%03d : Random string ", Random(1, 100, 1))
For $iX = 1 To Random(1, 20, 1)
$sText &= Chr(Random(65, 90, 1))
Next
_GUICtrlListBox_AddString($hListBox, $sText)
Next
_GUICtrlListBox_EndUpdate($hListBox)
; Replace string
MsgBox(4160, "信息", "Replacing String at Index 3")
_GUICtrlListBox_ReplaceString($hListBox, 3, "gone")
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main