vb中的下列代码,如何用vb.net实现
刚刚接触vb.net,又很多东西不会,特来csdn获取帮助,谢谢各位大侠了!
CommonDialog1.InitDir = App.Path
CommonDialog1.Filter = "数据文件(*.mj)|*.mj"
CommonDialog1.FilterIndex = 1
CommonDialog1.FileName = ""
CommonDialog1.Action = 1
datafilename = CommonDialog1.FileName
If datafilename = "" Then Exit Sub
Open datafilename For Input As #1
Input #1, JingXing
Input #1, Ti, MR, Ht, Lanme
Input #1, Ps, G, Tinj, Xh
Close #1
Open datafilename For Output As #1
Print #1, JingXing
Print #1, Ti, MR, Ht, Lanme
Print #1, Ps, G, Tinj, Xh
Close #1
希望能详细一点的。