永发信息网

以前的一个VB程序,现在要把它改写成VB.NET的程序,读取文件的命令如何改写

答案:3  悬赏:50  手机版
解决时间 2021-01-24 16:48
VB6.0的原程序如下:
Open Form3.Text1.Text For Input As #11
ReDim rain(1 To n, 1 To nos)
For i = 1 To n
For j = 1 To nos
Input #11, rain(i, j)
Next j
Next i
Close 11

Form3.Text1.Text指向的文件中的数据是一个矩阵,i行j列
最好能说明一下改写之后各个语句的意思。
最佳答案
Dim sw As StreamWriter = New StreamWriter(Form3.Text1.Text, True)
ReDim rain(1 To n, 1 To nos)
For i = 1 To n
For j = 1 To nos
sw.WriteLine(rain(i, j))
Next j
Next i
sw.Flush()
sw.Close()
sw = Nothing
全部回答
System.IO 再看看别人怎么说的。
你的源码不完整的,无法改写。 你把程序复制过去后,visual studio本来也会给你纠错的。 可能的错误如下: 1. open的对象不知还能用否,一般net要用txtstreamer来定义变量 2. redim前没有定义rain的变量,会报错。 3. input语句估计不行,可用inputline命令改写 这些错误你设法自己学习一下,是基本的,否则net程序将来都不会调试。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
掠食者复合弓和龙之传说两款弓相比拿个更好?
停车场(锦葫路)地址好找么,我有些事要过去
五拐村地址有知道的么?有点事想过去
单选题根据热力学定律和分子动理论,下列说法
停车场(创元家园西)地址在哪,我要去那里办事
新屯村地址好找么,我有些事要过去
请问,宝宝感冒发烧吃什么药,一岁了,嗓子发炎
规模以上企业申报时间
女人嫁给谁都后悔,(
魏德深,本巨鹿人也.祖冲,仕周为刑部大夫,
62岁老人整天心的怕怕的,要吃什么补品吗?
粉扑,葫芦海绵,粉底刷各有什么优缺点
动物和人类、和植物的关系十分密切,请你按要
腻诺村怎么去啊,我要去那办事
练瑜伽能减肥吗?
推荐资讯
如何对控件的BackColor设置颜色
下列句子中没有语病的一项是A. 保护并了解我
黑马广告(太平街艾薇教育培训学校旁)地址在什
工行的卡可以直接到自动取款机转账到农行卡里
植物大战僵尸2三阶巨人有多少血?
哪位大哥大姐知道GT-Four啊
58岁,女,糖尿病史15年,数年前因糖尿病肾病
在生病时妈妈对我的爱 作文
年满60岁得老人每年可领多少独生子女费
出售死牛羊肉犯什么法
如何在地表判断岩层走向呢?求指教!
本人是安徽六安的。欲注册一劳务公司,不知以
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?