大神们看过来

吉飞

Dim m(),sxs() as Double
Dim s2 as Double
s2=replace(listen.text," ","")
s2=replace(s2,vb RLF ," ")
sxs=split(s2," ")
程序运行后在这一段的sxs=split(s2," ")显示类型不匹配
请教各位大神，为什么会出现类型不匹配，我感觉没有错误

吉飞

s2定义的也是数组

bruly

Dim s2 as Double 改为 Dim s2 即可

吉飞

bruly 发表于 2021-12-5 21:54
Dim s2 as Double 改为 Dim s2 即可

不行，还是在sxs=split（s2，" "）这一行显示类型不匹配，我就想知道，就算s2是字符串类型，就不能放在数组里面吗

jy4977596491

可以改为这样：
Dim s2 as string
sxs() as string
既然操作是字符串，怎么会用Double型，Dim s2 和 Dim sxs()也是可行的(缺省是Variant型)，但尽量改成String，减少转化

vb RLF 是什么，应该是vbCrlf

吉飞

我是把一组数据放在数组里面，而且数组不是可以放数值和字符串类型吗

JuncoJet

VB是脚本语言，就按Python那么用就行，不要去关心什么类型

吉飞

JuncoJet 发表于 2021-12-15 09:56
VB是脚本语言，就按Python那么用就行，不要去关心什么类型

解决了，在数组sxs后面加上字符型数据类型

bruly

吉飞 发表于 2021-12-11 20:43
不行，还是在sxs=split（s2，" "）这一行显示类型不匹配，我就想知道，就算s2是字符串类型，就不能放 ...

    Dim sxs$(), s2$
    s2 = Replace("123 456 789", " ", "")
    sxs = Split(s2, " ")