vba 换行 _ 在赋值的时候无效  ？？

dim straa$, strb$, strc$, strd$
dim arra$（), arrb$（), arrc$（), arrd$（)

straa = "1732.55,1834.45,1936.36,2038.27,2140.19,2240.1,2344.02,2445.95,2547.88,2649.82,2751.76,2853.71,2955.66,3057.62,3159.58,3261.55,3363.53,3465.5,3567.48,3669.46,3771.43,3873.41,3975.39,4077.37,4179.35,4281.33,4383.31"
strbb = "1.01906,1.01908,1.01911,1.01914,1.01917,1.01922,1.01927,1.01931,1.01936,1.01941,1.01947,1.01953,1.01959,1.01963,1.01969,1.01973,1.01975,1.01977,1.01978,1.01979,1.01979,1.01979,1.0198,1.01979,1.01978,1.01976,1.01975"
strcc = "0,102.018,204.028,306.028,408.019,510.006,611.986,713.962,815.933,917.899,1019.861,1121.819,1223.776,1325.733,1427.69,1529.648,1631.609,1733.572,1835.538,1937.506,2039.477,2141.451,2243.429,2356.411,2447.397,2549.388,2651.384,2753.385,2855.392,2957.405,3059.425,3161.449,3263.478,3365.511,3467.547,3569.585,3671.624,3773.664,3875.704,3977.745,4079.787,4181.828,4283.868,4385.907,4487.944,4589.978,4692.009,4794.036,4896.058,4998.076,5100.088,5202.094,5304.092,5406.083,5508.064,5610.033,5711.99,5813.935,5915.865,6017.781,6119.681,6221.562,6323.42,6425.256,6527.068,6628.854,6730.612,6832.344,6934.047,7035.72"
strdd = "1.02018,1.0201,1.02,1.01991,1.01987,1.0198,1.01976,1.01971,1.01966,1.01962,1.01958,1.01957,1.01957,1.01957,1.01958,1.01961,1.01963,1.01966,1.01968,1.01971,1.01974,1.01977,1.01982,1.01987,1.01991,1.01996,1.02001,1.02007,1.02013,1.0202,1.02024,1.02029,1.02033,1.02036,1.02038,1.02039,1.0204,1.0204,1.02041,1.02042,1.02041,1.0204,1.02039,1.02037,1.02034,1.02031,1.02027,1.02022,1.02018,1.02012,1.02006,1.01998,1.01991,1.01981,1.01969,1.01957,1.01945,1.0193,1.01916,1.019,1.01881,1.01858,1.01836,1.01812,1.01785,1.01759,1.01732,1.01703,1.01674,1.01642"

arra = split（stra, ",")
arrb = split（strb, ",")
arrc = split（strc, ",")
arrd = split（strd, ",")

dim stra$, strb$, strc$, strd$
dim arra$（), arrb$（), arrc$（), arrd$（)

stra = "1732.55,1834.45,1936.36,2038.27,2140.19,2240.1,2344.02,2445.95,2547.88,2649.82,2751.76,2853.71,2955.66,3057.62,3159.58,3261.55,3363.53,3465.5,3567.48,3669.46,3771.43,3873.41,3975.39,4077.37,4179.35,4281.33,4383.31"
strb = "1.01906,1.01908,1.01911,1.01914,1.01917,1.01922,1.01927,1.01931,1.01936,1.01941,1.01947,1.01953,1.01959,1.01963,1.01969,1.01973,1.01975,1.01977,1.01978,1.01979,1.01979,1.01979,1.0198,1.01979,1.01978,1.01976,1.01975"
strc = "0,102.018,204.028,306.028,408.019,510.006,611.986,713.962,815.933,917.899,1019.861,1121.819,1223.776,1325.733,1427.69,1529.648,1631.609,1733.572,1835.538,1937.506,2039.477,2141.451,2243.429,2356.411,2447.397,2549.388,2651.384,2753.385,2855.392,2957.405,3059.425,3161.449,3263.478,3365.511,3467.547,3569.585,3671.624,3773.664,3875.704,3977.745,4079.787,4181.828,4283.868,4385.907,4487.944,4589.978,4692.009,4794.036,4896.058,4998.076,5100.088,5202.094,5304.092,5406.083,5508.064,5610.033,5711.99,5813.935,5915.865,6017.781,6119.681,6221.562,6323.42,6425.256,6527.068,6628.854,6730.612,6832.344,6934.047,7035.72"
strd = "1.02018,1.0201,1.02,1.01991,1.01987,1.0198,1.01976,1.01971,1.01966,1.01962,1.01958,1.01957,1.01957,1.01957,1.01958,1.01961,1.01963,1.01966,1.01968,1.01971,1.01974,1.01977,1.01982,1.01987,1.01991,1.01996,1.02001,1.02007,1.02013,1.0202,1.02024,1.02029,1.02033,1.02036,1.02038,1.02039,1.0204,1.0204,1.02041,1.02042,1.02041,1.0204,1.02039,1.02037,1.02034,1.02031,1.02027,1.02022,1.02018,1.02012,1.02006,1.01998,1.01991,1.01981,1.01969,1.01957,1.01945,1.0193,1.01916,1.019,1.01881,1.01858,1.01836,1.01812,1.01785,1.01759,1.01732,1.01703,1.01674,1.01642"

arra = split（stra, ",")
arrb = split（strb, ",")
arrc = split（strc, ",")
arrd = split（strd, ",")

function newdoublearray（paramarray args（)) as double（)
    dim a（) as double, lcount as long, i as long
    lcount = ubound（args)+1
    redim a（lcount-1)
    for i=0 to lcount-1
        a（i) = args（i)
    next
    newdoublearray = a
end function

'使用
dim aa（) as double
aa = newdoublearray（1732.55,1834.45,1936.36,2038.27,2140.19,2240.1,2344.02,2445.95,2547.88,2649.82, _
                    2751.76,2853.71,2955.66,3057.62,3159.58,3261.55,3363.53,3465.5,3567.48,3669.46, _
                    3771.43, 3873.41,3975.39,4077.37,4179.35,4281.33,4383.31)