论坛 › 『 谈天说地 』 › codetest

haijie1223 发表于 2023-11-25 11:50:28

codetest

Local $a = 5
MsgBox


Local $a = 5
MsgBox

haijie1223 发表于 2023-11-25 12:40:22

Func _ArrayAdd(ByRef $aArray, $vValue, $iStart = 0, $sDelim_Item = "|", $sDelim_Row = @CRLF, $iForce = $ARRAYFILL_FORCE_DEFAULT)

        If $iStart = Default Then $iStart = 0
        If $sDelim_Item = Default Then $sDelim_Item = "|"
        If $sDelim_Row = Default Then $sDelim_Row = @CRLF
        If $iForce = Default Then $iForce = $ARRAYFILL_FORCE_DEFAULT
        If Not IsArray($aArray) Then Return SetError(1, 0, -1)
        Local $iDim_1 = UBound($aArray, $UBOUND_ROWS)
        Local $hDataType = 0
        Switch $iForce
                Case $ARRAYFILL_FORCE_INT
                        $hDataType = Int
                Case $ARRAYFILL_FORCE_NUMBER
                        $hDataType = Number
                Case $ARRAYFILL_FORCE_PTR
                        $hDataType = Ptr
                Case $ARRAYFILL_FORCE_HWND
                        $hDataType = Hwnd
                Case $ARRAYFILL_FORCE_STRING
                        $hDataType = String
                Case $ARRAYFILL_FORCE_BOOLEAN
                        $hDataType = "Boolean"
        EndSwitch

haijie1223 发表于 2023-11-25 13:06:36

显示IP测试

haijie1223 发表于 2023-11-25 13:07:51

测试22222

haijie1223 发表于 2023-11-25 14:22:23

Func _ArrayAdd(ByRef $aArray, $vValue, $iStart = 0, $sDelim_Item = "|", $sDelim_Row = @CRLF, $iForce = $ARRAYFILL_FORCE_DEFAULT)

        If $iStart = Default Then $iStart = 0
        If $sDelim_Item = Default Then $sDelim_Item = "|"
        If $sDelim_Row = Default Then $sDelim_Row = @CRLF
        If $iForce = Default Then $iForce = $ARRAYFILL_FORCE_DEFAULT
        If Not IsArray($aArray) Then Return SetError(1, 0, -1)
        Local $iDim_1 = UBound($aArray, $UBOUND_ROWS)
        Local $hDataType = 0
        Switch $iForce
                Case $ARRAYFILL_FORCE_INT
                        $hDataType = Int
                Case $ARRAYFILL_FORCE_NUMBER
                        $hDataType = Number
                Case $ARRAYFILL_FORCE_PTR
                        $hDataType = Ptr
                Case $ARRAYFILL_FORCE_HWND
                        $hDataType = Hwnd
                Case $ARRAYFILL_FORCE_STRING
                        $hDataType = String
                Case $ARRAYFILL_FORCE_BOOLEAN
                        $hDataType = "Boolean"
        EndSwitch

xuanniao110 发表于 2023-11-25 17:41:53

新论坛，访问速度真快啊！

haijie1223 发表于 2023-11-25 17:47:16

xuanniao110 发表于 2023-11-25 17:41
新论坛，访问速度真快啊！

速度快点，但流量有限，不知道够用不，且用且珍惜。

邪恶海盗 发表于 2023-11-25 19:19:03

haijie1223 发表于 2023-11-25 17:47
速度快点，但流量有限，不知道够用不，且用且珍惜。

CDN啊,CloudFlare免费的够用了...

haijie1223 发表于 2023-11-26 18:25:22

"\"
'        '

查看完整版本: codetest