字符串处理

#include <FileConstants.au3>
#include <MsgBoxConstants.au3>
#include <WinAPIFiles.au3>
#include <String.au3>
Example()

Func Example()
    ; Open the file for reading and store the handle to a variable.
    Local $hFileOpen = FileOpen("log.txt")
    If $hFileOpen = -1 Then
        MsgBox($MB_SYSTEMMODAL, "", "An error occurred when reading the file.")
        Return False
    EndIf

    ; Read the contents of the file using the handle returned by FileOpen.
    Local $sFileRead = FileRead($hFileOpen)

    ; Close the handle returned by FileOpen.
    FileClose($hFileOpen)

    ; Display the contents of the file.
   ; MsgBox($MB_SYSTEMMODAL, "", $sFileRead)

 

Local $sString = StringRight($sFileRead,20) ; The expression passed to String will return a string representation, currently 10 is a number.
$sString = StringLeft($sString,17)

Local $sString01 =  StringLeft($sString,2)
$sString = StringTrimLeft ( $sString, 3 )

Local $sString02 =  StringLeft($sString,2)
$sString = StringTrimLeft ( $sString, 3 )

Local $sString03 =  StringLeft($sString,2)
$sString = StringTrimLeft ( $sString, 3 )

Local $sString04 =  StringLeft($sString,2)
$sString = StringTrimLeft ( $sString, 3 )

Local $sString05 =  StringLeft($sString,2)
$sString = StringTrimLeft ( $sString, 3 )

Local $sString06 =  StringLeft($sString,2)

$sString = _StringInsert($sString01, $sString02,2)
$sString = _StringInsert($sString, $sString03, 4)
$sString = _StringInsert($sString, $sString04, 6)
$sString = _StringInsert($sString, $sString05, 8)
$sString = _StringInsert($sString, $sString06, 10)

MsgBox($MB_SYSTEMMODAL, "", $sString  )

 

 

EndFunc   ;==>Example