题目
vb split 用法
For i = 1 To AllNum1(LineNum1)
NumberNum1(LineNum1,i) = Split(Split(s,",")(i),",")(0)
Next i
尤其是Split(Split(s,",")(i),",")(0)怎么理解?特别是Split(Split(s,",")(i),",")后面的那个(0)什么意思啊?split函数后面加个(0)怎么理解,
我把代码发全一点,代码没问题,测试过了
Open PathIn1 For Input As #1
Do Until EOF(1) = True
Line Input #1,s
s = "," & s & ","
LineNum1 = LineNum1 + 1
Nnum = 0
For i = 1 To Len(s)
If Mid(s,i,1) = "," Then Nnum = Nnum + 1
Next i
AllNum1(LineNum1) = Nnum - 1
For i = 1 To AllNum1(LineNum1)
NumberNum1(LineNum1,i) = Split(Split(s,",")(i),",")(0)
Next i
Loop
Close #1
For i = 1 To AllNum1(LineNum1)
NumberNum1(LineNum1,i) = Split(Split(s,",")(i),",")(0)
Next i
尤其是Split(Split(s,",")(i),",")(0)怎么理解?特别是Split(Split(s,",")(i),",")后面的那个(0)什么意思啊?split函数后面加个(0)怎么理解,
我把代码发全一点,代码没问题,测试过了
Open PathIn1 For Input As #1
Do Until EOF(1) = True
Line Input #1,s
s = "," & s & ","
LineNum1 = LineNum1 + 1
Nnum = 0
For i = 1 To Len(s)
If Mid(s,i,1) = "," Then Nnum = Nnum + 1
Next i
AllNum1(LineNum1) = Nnum - 1
For i = 1 To AllNum1(LineNum1)
NumberNum1(LineNum1,i) = Split(Split(s,",")(i),",")(0)
Next i
Loop
Close #1
提问时间:2021-01-10
答案
Split(Split(s, ",")(i), ",")(0)输出是s字符串通过","分割后的第i个数组内的字符再次使用","分割后的第0个数组内的字符比如s=",1,2,3,4,5,"此时AllNum1(LineNum1)=5,LineNum1=1For i = 1 To AllNum1(LineNum1) ...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 15.5x-3等于5x的解
- 2简算 如下
- 3给25(a+b)²-9(a-b)²和-27x²+18x-3 和 a²—b²—2b-1分解因式
- 4They spent _________money on the house
- 5乃俱窃听的乃
- 6请问 hot carrier cells是什么意思
- 7今年姐姐20岁,哥哥18岁,弟弟12岁,妹妹8岁,_年后,姐姐、哥哥年龄和的2倍等于弟弟、妹妹年龄和的3倍.
- 8为了探究影响液体压强大小的因素,小明采用了如图所示的实验装置.其中微小压强计可以反映液体内部压强大小的变化.小明将微小压强计的探头放在烧杯内固定,不断向烧杯中注入水,
- 9what can you do?翻译成汉语
- 10tanα=1/3,则1/2sin2α+cos^2α 倍角和半角公式这部分的 刚学 不太会运用 麻烦
热门考点
- 1张怡宁英文简介,有中文翻译
- 2英语作文的题目格式
- 3一道数学题~求解答~在线等~~
- 4I live in a big house _____ three rooms .
- 5“撇”字的笔顺
- 6大地怎样报复人类
- 7(2x3-3x2y-2xy2)-(x3-2xy2+y3)+(-x3+3x2y-y3)
- 8将123479这六个数填在方框内每个数字恰好出现一次,组成一个整数算式.()÷()=()÷()
- 9进位制的问题 若10b1(2)=a02(3),求数字a、b的值及此两数的等值十进制数.
- 10在需要的地方填most:The ____ annoying thing is that I have wasted ____ of the day on this job.