VB 读取data.txt文件中2列数据到数组a（i），b（i）.....e(i)，急，在线等！！！_百度知道
VB 读取data.txt文件中2列数据到数组a（i），b（i）.....e(i)，急，在线等！！！
164 5，在线等.e(i).000 0.763 38.txt文件中2列数据到数组a（i）.000.868 43.364.436 2.000.000 0.097 1.519 3.396 3.617 130.027 1.000 0.796.688 1.000 0.441 1.766！数据为，急..000 0.000 0.0001189，b（i）.000 0.909 5.170 0.958 47.000 0.000.170 0.VB 读取data.000 0.170 0.000 0.170 0.000.170 0.170 0.170 0.117 5.128主要把第一列赋值给a(i)..686 11.000 0.000 0.000 0..415 5.784.219.625.170 0！.438 1！：.000 0,第二列赋值给b（i）依次下去道e（i）请问高手如何做.000 0.170 0.170 4.170 0.856 9.170 0
Open & & D(Num) & &quot，题目上写错了 请高手们 帮解决一下 答案Dim A() As VariantDim B() As VariantDim C() As VariantDim D() As VariantDim E() As VariantDim Num As IntegerOpen A For Input As #1Do While Not EOF(1)Num = Num + 1ReDim Preserve A(Num)ReDim Preserve B(Num)ReDim Preserve C(Num)ReDim Preserve D(Num)ReDim Preserve E(Num)Input #1是用vb6, D(Num).0读取text中的4列数据 赋值给数组.txt&quot, C(Num).OU2DAT&|& For Input As #1'D; & B(Num) & & & C(Num) & &quot, B(Num):&#92.Path & &quot, A(Num);D|&|&|& & E(Num);&#92, E(Num) MsgBox A(Num) & &quot
提问者采纳
清楚OK文件操作, E(Num)LoopClose #1Print Num &#39。, D(Num)。:&#92, B(Num); For Input As #1Do While Not EOF(1)Num = Num + 1ReDim Preserve A(Num)ReDim Preserve B(Num)ReDim Preserve C(Num)ReDim Preserve D(Num)ReDim Preserve E(Num)Input #1;data。 Option ExplicitDim A() As VariantDim B() As VariantDim C() As VariantDim D() As VariantDim E() As VariantDim Num As IntegerPrivate Sub Command1_Click()Open &D, A(Num).txt&这里是用来看录入的行数, C(Num)
提问者评价
十分感谢 高手
其他类似问题
为您推荐：
txt文件的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁您的举报已经提交成功，我们将尽快处理，谢谢！
你是在网上操作的？　确认操作成功了的吗？
　　　转帐是马上能看见的，，就算是异地也一样，，异行可能慢点
你马上银行查询！越快越好，，，查下收款银行先，确...
大家还关注孩子才几岁无知，误食一玩具里的钮扣电池，不知会不会造成身体伤害，小地方，医生也没招，很是焦急，急盼有经历的或知情的人指点一二，在线等，急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急
楼主发言：1次 发图：0张
　　要就蒜~
　　明天早上就拉出来啦
　　当然很危险,赶快想办法!不过这种电池应该可以被小孩子便出来!不过为了安全起见,还是送去医院吧!
　　给他吃大量的韭菜,应该拉得出,没事!　　以前吞金自杀的用这个方法救得回.
　　楼上的见过这事吗
　　洗...胃
　　据说电池里有水银，遇胃液受腐蚀，担心泄漏出来
　　危险，胃酸会腐蚀电池外壳的，里面有汞的，还有其他重金属
　　送医院，别在这浪费时间了。
　　帮顶，我不懂，不过我感觉纽扣电池外边有很硬实的包皮不会有毒，外包的皮还很光滑应该能自然排出去，如果来不急去医院，是不是给孩子吃点有排泄功能的药，给孩子少喝点油是不是能润滑的排出来呢，这些都是建议啊我不是医生不懂。
　　有亲历的吗？麻烦告诉我一下
　　喝牛奶，催吐
　　孩子已在医院，地方偏，小医院，医生没招，有没有亲历的，且能自己排出未对身体造成伤害的
　　多喝点食用油，直接跑肚子最快
　　洗胃吧。我觉得胃酸会腐蚀电池表面，如果电池漏液可能就会有麻烦。洗胃减低胃酸浓度，然后吃点什么泻药，尽快排除体外。　　　　----我不是医生。
　　如果来不急去医院，我想就得尽快给孩子吃泄药，让孩子尽快把电池排泄出来，要不象上边朋友说的，时间长了胃酸把电池皮腐蚀漏水就有毒了。
　　在这儿耗什么? 别听什么等拉出来.　　　　有镍,汞, 假如腐蚀了,会有有毒气体的,最后别进肠道.　　　　赶快去医院吧, 要催吐的...!
　　对了喝水能稀释胃酸。吃饭的时候喝水就影响消化的。
　　如果时间短想办法吐,时间长了进入肠道,马上去开刀!
　　恩　　你这个我不懂　　可能很严重吧　　记得我弟弟以前不小心把一个钉子掉进肚子里去了　　我妈让我弟吃了好多的韭菜　　拉出来了　　阿弥驼佛　　上帝保佑你孩子没事
　　洗胃小医院是不是就可以啊？
　　没大事，叫想办法很快拉出来就行了。
　　下边是我在百度知道里搜到的看对你有借鉴没有：　　　　如果在给小儿测体温时，不慎咬断口表将水银吞入，家长不要慌忙给小孩喂牛奶、豆浆鸡蛋清，以期使水银与这些食物中的蛋白结合，防止水银被吸收而中毒。而应立刻让小孩用清水漱口，清除口内的碎玻璃，只要没有大块碎玻璃被吞下就不会有任何危险。因为水银是一种重金属，化学性质很不活泼，所以根本不会与蛋清、牛奶中的蛋白结合，更不会在胃肠道内被吸收而中毒。只有离子状态的水银可以在肠道内被吸收，误食后可引起中毒。通常情况下，误咽口表内的水银后，少则几小时，多则十几小时，即可从粪便中安然排出。当然，水银在常温下即可蒸发成气态汞，被吸入呼吸道后可引起中毒。所以，对于散落在地的水银要及时清除，以防吸入中毒。如果患儿吞入钉子、回形针、碎玻璃等光锐的、带尖带钩的异物，很难像一般异物那样顺利排出。必须火速去医院检查处置。因为这些异物随时可能钩住或穿透消化道造成损伤。 　　
　　SB。。。。。还在线等。你应该还年轻，死掉还可以再生一个了
　　这也是我在百度帮你找到的：据医疗急救专家介绍，一旦发现孩子把异物吞进肚子内，家长不必惊慌，应根据吞进去的东西大小、性质不同而区别对待，大体可分以下几种情况： 　　1、不足2.5厘米的小异物和不尖锐并且没有毒性不会融化的东西如小耳环、玻璃球、围棋子、小钮扣、小硬币等，一般都能自行排出。家长每天应仔细检查大便看异物是否排出体外。在最初透视时如果异物已有2-3天还呆在胃内不能进入肠，就得请医生通过胃镜将异物取出。如果已进入肠道，一周做一次X线检查就可以了。一般有2-3天，最长3-4周都能排出体外。 　　2、直径大于2.5厘米的较大异物，如大一点的硬币、瓶盖等，或虽体积不大但很尖锐的图钉之类异物，一般很难由胃进入肠道自行排出，应立即请医生取出异物，因为停留时间越长，越可能压迫和刺激胃肠粘膜，引发溃疡或穿孔等并发症。 　　3、若吞入电池等有毒有害物品时，应请医生尽早取出。 　　4、如果异物进入孩子的气管内，在医生未介入之前，家长可采用“倒立位拍打背部”法进行急救或进行口对口吸取。因为一旦窒息达3分钟，将会危及孩子的生命。
　　孩子没啥大危险，是你有危险。　　你家孩子吞了电池你居然在这里上网问网友？　　怀疑孩子是不是你亲生的。　　如果我家孩子我会立刻送医院的。　　恶毒的父母　　你危险了，去看看心理医生吧
　　还在线等个P啊,赶紧送医院!!!!!!
　　已吞下二个小时左右了，应该进肠道了，有亲历过的吗，开刀太可怕了，非得开刀吗，不开刀会有危险吗
　　孩子已在医院了，是我亲戚家的孩子，但小地方，医院医生没招，去大医院太远
　　孩子是我亲戚家的，已在医院了，地方偏，小医院医生也没招，去大医院太远了
　　一般钮扣电池的外层是用薄钢制的，应该没事胃酸溶不了。还是想想怎么多吃点拉出来吧……
　　如果不方便去医院，你看上边我给你在百度找的答案啊。那里说去医院是用胃镜取出来。
　　用胃鏡 把食道撐開
然後夾出　　　　小醫院估計沒有
　　　　洗胃吧
　　 　　　　作者：给点建议谢谢啊　回复日期：　19:13:09　
　　　　这也是我在百度帮你找到的：据医疗急救专家介绍，一旦发现孩子把异物吞进肚子内，家长不必惊慌，应根据吞进去的东西大小、性质不同而区别对待，大体可分以下几种情况： 　　　　1、不足2.5厘米的小异物和不尖锐并且没有毒性不会融化的东西如小耳环、玻璃球、围棋子、小钮扣、小硬币等，一般都能自行排出。家长每天应仔细检查大便看异物是否排出体外。在最初透视时如果异物已有2-3天还呆在胃内不能进入肠，就得请医生通过胃镜将异物取出。如果已进入肠道，一周做一次X线检查就可以了。一般有2-3天，最长3-4周都能排出体外。 　　　　2、直径大于2.5厘米的较大异物，如大一点的硬币、瓶盖等，或虽体积不大但很尖锐的图钉之类异物，一般很难由胃进入肠道自行排出，应立即请医生取出异物，因为停留时间越长，越可能压迫和刺激胃肠粘膜，引发溃疡或穿孔等并发症。 　　　　3、若吞入电池等有毒有害物品时，应请医生尽早取出。 　　　　4、如果异物进入孩子的气管内，在医生未介入之前，家长可采用“倒立位拍打背部”法进行急救或进行口对口吸取。因为一旦窒息达3分钟，将会危及孩子的生命。　　
　　有亲历的吗
　　拉出来吧
　　远 也要去大医院
　　没有亲历，也不是专业人士，只能帮顶！　　小医院太小，大医院太远，哪有没有稍微近一点的中等医院呀！最好还是请专业人士处理为妥，这种事谁也不能包票，天涯精英也不行的。
　　在百度里输入：医生在线，那里边有医生在线回答患者提问。
　　　　电池里的化学物质很毒的，电池表面破损后，里面的物质就会流出来。电池经过人的胃、肠等消化器官后，表面肯定会有破损。你还是别在网上磨了，以防万一，赶紧找家好医院吧，孩子的身体最重要啊～　　　　　　　　
　　1.x光拍片或透视，看异物位于食道，胃还是肠道。　　2.明确后可电子胃镜下取出异物。　　　　＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝　　　　近年来，钮扣电池也成为上消化道常见的异物，体积虽小，但在胃内被消化液破坏电池外壳后碱性物质外泄，直接腐蚀损害消化道粘膜，引起穿孔。 　　　　
明确的上消化道异物绝大多数可以在胃镜下直接取出，少数因异物刺破食管壁、或造成消化道嵌顿等无法取出的，需外科手术取出。只要大人留心，教育儿童注意，孩子消化道异物事件是完全可预防的。（作者单位：复旦大学附属中山医院内镜中心。姚礼庆为教授、博士生导师） 　　
　　等死吧
　　废话 赶紧送医院 还有时间发帖子？　　不是你们家孩子吧　　
　　作者：带头大叔888　回复日期：　19:24:07　
　　　　有亲历的吗　　－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－　　这种事情亲历过的很少的，等你找到亲历的，你孩子说不定早就中毒了！　　　　而且每个人的体质不一样，电池的质量也不一样。人家没事，不等于你孩子也一定会没事。别在这里磨了，赶紧去大医院吧！！　　　　
　　作者：新马甲甲　回复日期：　19:01:56　
　　　　洗胃吧。我觉得胃酸会腐蚀电池表面，如果电池漏液可能就会有麻烦。洗胃减低胃酸浓度，然后吃点什么泻药，尽快排除体外。　　==================================================　　不要进食,不停喝大量的牛奶,顺便吃点泻药.　　不进食是方便电池排出.　　喝牛奶是阻止汞的吸收.　　泻药,^_^,促进排出.　　
　　作者：陈玄礼　回复日期：　19:31:45　
　　　　等死吧　　　　
此消息发自掌中天涯 ，我也要用手机发表留言！　　--------------------------　　你他吗就是一畜生
　　第一时间送医院!!　　不要再耽误时间
　　某纽扣电池厂的说明　　安全指引(注意事项)　　　　1.电池请保存在婴幼儿手碰不到的地方，以免误食，误吞电池者应立即去医院诊治。　　　　2.请勿将电池浸在海水，腐蚀性液体中，否则会使电池发热，使电池端子等处生锈。　　　　3.电池使用后请切断机器的电源，以免电池漏夜。　　　　4.若电池的端子臟了，会使电池与机器接触不良而断电，导致不能正常使用，请用于布擦净端子后再使用。
　　没啥事,别紧张!　　吃点韭菜,两天之内就拉出来了!　　严重鄙视那些什么送大医院,什么胃镜,开刀什么的.　　我就是医生,见得多了.　　小纽扣电池根本不要紧张.
　　是亲戚家的孩子，孩子已在县人民医院了，医生说没有好的办法，有没有亲历这事的，能自己排出来的
　　吃韭菜就可以让小孩子拉出来了,楼主别太紧张了.
　　再吃块手表下去就没事了。
　　这还用等吗?网络里没人可以对你负责的,你必须去问医生,小医院不行就去大医院啊.
　　作者：陈玄礼　回复日期：　19:31:45　
　　　　等死吧　　　　　　绝对的蓄生　　　　　　　　　　感谢善意助答的　　　　
　　 　　　　作者：不醒的梦　回复日期：　19:16:13　
　　　　还在线等个P啊,赶紧送医院!!!!!!　　===========================================　　还等个P啊，直接埋了算了
　　孩子家长真JB SB　　有了孩子不知道把所有的危险品收掉，先问问这电池是怎么来的。
　　没事的，泻出来就没事了，放心，不过还得到大型点的医院检查有没损伤肠胃。
　　作者：眨眼睛的鱼　回复日期：　19:51:56　
　　　　 　　　　　　　　作者：不醒的梦　回复日期：　19:16:13　 　　　　　　还在线等个P啊,赶紧送医院!!!!!!　　　　===========================================　　　　还等个P啊，直接埋了算了　　　　　　　　连个蓄生都算上不　　
　　建议发到医生版块去
　　本人某大学附属医院医生,请放心,会从大便中排出的,无影响,因是金属外壳,不会破,不会对小孩造成影响
　　应该电不死...
　　没事 ，我以前吞过一个钢笔上类似戒指样的圈圈 ，吃了1斤没剥毛的荸荠拉出来了。　　
　　给孩子吃点催泻的就好了，千万不要泻立停 ，那是止泻的
　　我那个比你这个还恼火些，那个圈圈边上很锋利的，并不圆滑，只是直径不大，但纽扣电池更小嘛　　　　　　　　　　
　　牛鞭，荸荠有毛啊？毛栗子才有毛吧？
　　如果家庭殷实，不担心被医院开个天价药费，就送医院吧　　　　如果条件不允许送医院，那就买一斤二锅头叫小孩喝，喝了就吐出来了．　　　　中国人嘛！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！
　　可怜的楼主
　　　　　　作者：带头大叔888　回复日期：　20:05:14　
　　　　作者：眨眼睛的鱼　回复日期：　19:51:56　 　　　　　　 　　　　　　　　　　　　作者：不醒的梦　回复日期：　19:16:13　 　　　　　　　　还在线等个P啊,赶紧送医院!!!!!!　　　　　　===========================================　　　　　　还等个P啊，直接埋了算了　　　　　　　　　　　　　　　　连个蓄生都算上不　　　　　　你自己又是什么东西？你自己都不着急，说什么慢慢等？　　还不如直接埋了算了
　　　　 　　　　作者：首席牛鞭　回复日期：　20:14:43　
　　　　没事 ，我以前吞过一个钢笔上类似戒指样的圈圈 ，吃了1斤没剥毛的荸荠拉出来了。　　　　　　电池里的东西一般都是剧毒的
　　1.如果吃到胃里应该没什么事情,只要不是呛到气管就好.　　2.至于电池里面的水银,胃酸跟电池接触的时间还是比较短的，大概1个到2个小时就可以胃排空.其他肠道里的碱性肠液不会对电池行成腐蚀.电池会随大便排出.　　3.有条件还是去医院监护一下,以防万一.　　
　　没救了,晚上赶快再做爱一次,另外再生一个不就可以了
　　作者：Y蚊子　回复日期：　20:29:45　
　　　　　　　　　　　　作者：带头大叔888　回复日期：　20:05:14　 　　　　　　作者：眨眼睛的鱼　回复日期：　19:51:56　 　　　　　　　　 　　　　　　　　　　　　　　　　作者：不醒的梦　回复日期：　19:16:13　 　　　　　　　　　　还在线等个P啊,赶紧送医院!!!!!!　　　　　　　　===========================================　　　　　　　　还等个P啊，直接埋了算了　　　　　　　　　　　　　　　　　　　　　　　　连个蓄生都算上不　　　　　　　　　　　　你自己又是什么东西？你自己都不着急，说什么慢慢等？　　　　还不如直接埋了算了　　　　　　　　又遇到一个蓄生，我说过慢慢等吗　　我已经说过了，是我亲戚家的孩子，孩子已经在县人民医院了，只是我们这地方偏，县人民医院都算是大医院了，医院说没好办法，亲戚担心电池在消化道会不会有危险，所以我在网上发贴了解一下，有没有亲历这些而没有危险的，心中好有个数，请那些蓄生闭上你们的恶嘴，当心你的恶毒会伤及你们的子孙，同时也要感谢那些善意的助答者
　　纽扣电池含有氧化汞，剧毒，楼主~~~~怎么说你呢，感觉送去医院啊　　　　电池的外壳很快会被胃液腐蚀掉的，一个小时都不用就可以腐蚀掉　　　　重金属是会遗留人体内的
　　这里边有几个畜生 小心你们生孩子没屁眼 什么玩意
　　这孩子上辈子做了什么孽，碰到你这样的家长
　　又是一个来忽悠大众的　　　　像以前那个说 在火车上内裤掉了怎么办　　　　有急事怎么可能还在网上在线等　　　　好心人提了办法了
LZ还要解释自己的所处条件来反驳，以示自己无力办到，要楼下继续提供好笑的办法。　　　　麻烦类似的LZ，想要创造出好玩的帖子，标题里面注明一下。不要让那么多的善良的好心人无辜替你着急。
　　催吐,如果孩子误食时间不长,应该采取措施让孩子把东西吐出来.　　加快排出体外,可以使用咖叮啉一类药物,加快肠胃蠕动,把东西排出来.　　不知道大量饮水和服食小苏打溶液是否能稀释胃酸?会不会与电池反应.胃内溶液是否导电,会不会造成短路,引发电池发热,并最终导致电池破裂?
　　以前听一个网友说，她女儿吞了电池，第二天是排出来的。当时她也是很担心。我刚刚QQ联系她了，她不在线。　　　　本来想帮LZ问问的
　　这不是废话?/ 还不赶紧送医院 还在这里墨迹什么.....
　　催吐　　牛奶　　牛奶蛋白质去毒
　　有毒，很危险，请速带孩子去就医！！
　　去正规医院　　　　　　不正规的医院里面的大夫都靠不住，也许会让小孩再吞个灯泡来看电池走到哪了。。。
　　孩儿现在怎样了？　　　　是不是没事了？　　　　为孩子祈祷，希望平安无事。
　　　　　　作者：那里的叶子黄了　回复日期：　19:09:59　
　　　　SB。。。。。还在线等。你应该还年轻，死掉还可以再生一个了　　　　作者：陈玄礼　回复日期：　19:31:45　
　　　　等死吧　　　　
此消息发自掌中天涯 ，我也要用手机发表留言！ 　　　　　　　　作者：眨眼睛的鱼　回复日期：　19:51:56　
　　　　 　　　　　　　　作者：不醒的梦　回复日期：　19:16:13　 　　　　　　还在线等个P啊,赶紧送医院!!!!!!　　　　===========================================　　　　还等个P啊，直接埋了算了　　　　作者：newng　回复日期：　20:11:27　
　　　　应该电不死...　　 　　 　　---------------------------------------------　　为什么我们的国人对自己同胞这么刻薄？　　
　　不懂　　　　不过钮扣电池的两极是银和锌，锌和胃酸很容易反应
　　不用紧张　　首先，24小时内会排出体外，在排出体外前胃酸不会腐蚀坏电池外壳。　　立即给孩子服用食油，以利于排泄。注意检查排泄物，以确定是否排出体外。近快送孩子去医院，以防万一。
　　不知到大医院需要多久的路程？建议立即送大医院，可能到现在为止已经耽误很长时间了，好像说已经有两个小时了吧？有这功夫都到大医院了，关系孩子一生的健康，可不是小事情啊！
　　不要催吐，没用的，早以进入肠道了，可以多进食蔬菜，利于排泄。
　　网友的小孩拍片确认位置，发现已经过了胃，所以只能等待排出。　　有的孩子确实因为在胃里或者食管停滞时间太长　　 　　而腐蚀后氧化氢中毒而S。当时沈阳医大说需要带去观察确认　　过了胃就只能等。只要经过盲肠瓣就安全　　不要让孩子过分哭闹　　 注意排便。这个，医院很多大夫都没法子　　只能说让留院观察，密切注意。网友的小孩子是是第二天的晚上排出的，第一天的中午吃的，晚上发现的。　　多吃粗纤维　　　　　　　　　　
　　要看是那种纽扣电池 了,有锂离子的 ,还有银和锌的,基本没什么大碍,为了安全还是去医院吧,要不然孩子会喜欢上吃电池的 ,难道你要你的孩子长大后上CCTV的 其人其事
　　楼主，发站内短信给你了。希望对你有帮助
　　纽扣电池种类太多了，碳性，碱性，锌-氧化银，锂-二氧化锰，镍镉充电纽扣电池，镍氢充电纽扣电池等。　　一般情况下家里用的应该是碳性或者碱性，如果是这些问题不大，没有楼上某些人说的那么夸张，还汞呢...多少年没用汞了。　　不过如果是镍镉电池的话，还是小心点吧，毕竟镉是重金属　　　　
请遵守言论规则，不得违反国家法律法规