VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 1829|回复: 8

[求助] 大神们看过来

[复制链接]
发表于 2021-12-3 20:25:32 | 显示全部楼层 |阅读模式
Dim m(),sxs() as Double
Dim s2 as Double
s2=replace(listen.text," ","")
s2=replace(s2,vb RLF ," ")
sxs=split(s2," ")
程序运行后在这一段的sxs=split(s2," ")显示类型不匹配
请教各位大神,为什么会出现类型不匹配,我感觉没有错误
 楼主| 发表于 2021-12-3 20:26:55 | 显示全部楼层
s2定义的也是数组
回复 支持 反对

使用道具 举报

发表于 2021-12-5 21:54:06 | 显示全部楼层
Dim s2 as Double 改为 Dim s2 即可
回复 支持 反对

使用道具 举报

 楼主| 发表于 2021-12-11 20:43:08 | 显示全部楼层
bruly 发表于 2021-12-5 21:54
Dim s2 as Double 改为 Dim s2 即可

不行,还是在sxs=split(s2," ")这一行显示类型不匹配,我就想知道,就算s2是字符串类型,就不能放在数组里面吗
回复 支持 反对

使用道具 举报

发表于 2021-12-12 09:34:21 | 显示全部楼层
本帖最后由 jy4977596491 于 2021-12-12 09:36 编辑

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

vb RLF 是什么,应该是vbCrlf
回复 支持 反对

使用道具 举报

 楼主| 发表于 2021-12-13 15:23:13 | 显示全部楼层
我是把一组数据放在数组里面,而且数组不是可以放数值和字符串类型吗
回复 支持 反对

使用道具 举报

发表于 2021-12-15 09:56:58 | 显示全部楼层
VB是脚本语言,就按Python那么用就行,不要去关心什么类型
回复 支持 反对

使用道具 举报

 楼主| 发表于 2021-12-15 11:28:42 | 显示全部楼层
JuncoJet 发表于 2021-12-15 09:56
VB是脚本语言,就按Python那么用就行,不要去关心什么类型

解决了,在数组sxs后面加上字符型数据类型
回复 支持 反对

使用道具 举报

发表于 2021-12-18 14:24:47 | 显示全部楼层
吉飞 发表于 2021-12-11 20:43
不行,还是在sxs=split(s2," ")这一行显示类型不匹配,我就想知道,就算s2是字符串类型,就不能放 ...


    Dim sxs$(), s2$
    s2 = Replace("123 456 789", " ", "")
    sxs = Split(s2, " ")
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2022-7-7 15:54

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表