yhjfirst 发表于 2024-2-27 21:27:07

请教关于GUICtrlListBox列表框数据读取后为正行的方法




Case $Button7
                        If _IsChecked($Checkbox1) Then $File1 = " /min:" & GUICtrlRead($Input5)
                        If _IsChecked($Checkbox2) Then $File2 = " /max:" & GUICtrlRead($Input6)
;~                         $Roboload = @SystemDir & "\Robocopy.exe" & " " & Chr(34) & GUICtrlRead($Input1) & Chr(34) & " " & Chr(34) & GUICtrlRead($Input2) & Chr(34) & " /S /mir " & _
;~                                         $File1 & $File2 & "/R:" & GUICtrlRead($Input3) & " /W:" & GUICtrlRead($Input4) & " /XD " & Chr(34) & "System Volume Information" & Chr(34) & " " & Chr(34) & _
;~                                         "$RECYCLE.BIN" & Chr(34) & " " & $Strdir & " /XF " & Chr(34) & "desktop.ini" & Chr(34) & " " & $Strfile
                        If Not ProcessExists("Robocopy.exe") Then Run($Roboload, @SystemDir, @SW_SHOW)
                        DirSize(GUICtrlRead($Input2), GUICtrlRead($Input1))
                        _GUICtrlListBox_BeginUpdate($List1)
                        Dim $listcount = _GUICtrlListBox_GetListBoxInfo($List1)
                        _GUICtrlListBox_EndUpdate($List1)
                        For $i = 0 to $listcount
                                Dim$listGetCurSel =_GUICtrlListBox_GetText($List1,$i)
                                ;If $listGetCurSel Then $listGetCurSel &= $listGetCurSel
                       
                                If $listGetCurSel Then MsgBox(0,$listcount,$listGetCurSel)
                        Next
                        If $listGetCurSel Then MsgBox(0,"aaaa",$listGetCurSel)


这段AU3我不知道咋操作了,忘大神指导下
在VisualFreeBasic里可以这样赋值Strfile = Strfile & Chr(34) & List2.List(x) & Chr(34) & " "。出现效果是"AAAA" "bbbba" "cccc"一类的合并为一行

yhjfirst 发表于 2024-2-27 21:46:23

                        For $i = 0 To $listcount
                                Dim $listGetCurSel = _GUICtrlListBox_GetText($List1, $i)
                                If $listGetCurSel Then $Strdir= " " & $Strdir & Chr(34) & $listGetCurSel & Chr(34)
                        Next
                        If $listGetCurSel Then MsgBox(0, "aaaa", $Strdir)
                        但是按照VisualFreeBasic方式里去操作。循环里到最后一步可以出现要的结果。但是AU3循环结束后却读不出值了

afan 发表于 2024-2-27 21:58:01

For $i = 0 to $listcount - 1

yhjfirst 发表于 2024-2-28 13:14:51

谢谢大神
页: [1]
查看完整版本: 请教关于GUICtrlListBox列表框数据读取后为正行的方法