怎样将添加的文本文件读入到文本框——续,另一有关问题
怎样将添加的文本文件读入到文本框——续,另一问题!
今天下午的时候发了“怎样将添加的文本文件读入到文本框”一贴,不过所给的回复都没能解决我的问题,现另开一贴,详细的阐述我所遇到的问题,希望得到你们到帮助,不甚感激。
环境:
现在有2个窗体,Form1和Form2
Form1中的控件有文本框txt1、txt2、txt3和一个按钮btn1,如下图

Form2中的控件有文本框txt_dialog,如下图

目的:在txt1、txt2、txt3三个文本框中分别输入数据70,80、90,点击btn1按钮时,弹出Form2窗体,并将以下字符串显示在文本框中
“A同学的成绩为70”
“B同学的成绩为80”
“C同学的成绩为90”
现在说说我的思路,我本来是想通过新建一个文本文件,如下图所示

然后将Form1中三个文本框的数据写入到该文本文件中,在写入之前先写入字符串
“A同学的成绩为”
“B同学的成绩为”
“C同学的成绩为”
然后再各个字符串的后面分别加上Form1文本框中的数据,当点击按钮btn1的时候将该该文本文件读入到Form2中文本框中。
现在如果按照我的这个思路的话又几个问题
1、如何将三学生的成绩前面加上字符串并逐行写入到文本文件中还没有解决。
2、假设第一个问题解决了,那么又该如何将该文件读入到窗体2的文本框中
3、将文本文件读入到文本框中,如何去定位该文本文件的位置,即路径,在Vb.net中添加的文本文件是放在所保存的项目文件夹里的,如下图

如果我部署该应用程序,其他用户拿去用的时候,安装的盘符跟我现在在写程序的时候所在盘符不一致,那么我的这个思路就有问题。
能不能在读文本文件的时候,通过代码能够自动找到我所添加的文本文件,我想这个应该是可以的,无奈对VB不熟悉,找不到解决的方法。
我的思路说得有点乱,如果有其他方法能更好解决我的问题那最好不过了。
------解决方案--------------------
单纯就你这个程序,下面应该更好
因为,用了text文件后,关闭程序时,会弹出个框框。。。。
今天下午的时候发了“怎样将添加的文本文件读入到文本框”一贴,不过所给的回复都没能解决我的问题,现另开一贴,详细的阐述我所遇到的问题,希望得到你们到帮助,不甚感激。
环境:
现在有2个窗体,Form1和Form2
Form1中的控件有文本框txt1、txt2、txt3和一个按钮btn1,如下图
Form2中的控件有文本框txt_dialog,如下图
目的:在txt1、txt2、txt3三个文本框中分别输入数据70,80、90,点击btn1按钮时,弹出Form2窗体,并将以下字符串显示在文本框中
“A同学的成绩为70”
“B同学的成绩为80”
“C同学的成绩为90”
现在说说我的思路,我本来是想通过新建一个文本文件,如下图所示
然后将Form1中三个文本框的数据写入到该文本文件中,在写入之前先写入字符串
“A同学的成绩为”
“B同学的成绩为”
“C同学的成绩为”
然后再各个字符串的后面分别加上Form1文本框中的数据,当点击按钮btn1的时候将该该文本文件读入到Form2中文本框中。
现在如果按照我的这个思路的话又几个问题
1、如何将三学生的成绩前面加上字符串并逐行写入到文本文件中还没有解决。
2、假设第一个问题解决了,那么又该如何将该文件读入到窗体2的文本框中
3、将文本文件读入到文本框中,如何去定位该文本文件的位置,即路径,在Vb.net中添加的文本文件是放在所保存的项目文件夹里的,如下图
如果我部署该应用程序,其他用户拿去用的时候,安装的盘符跟我现在在写程序的时候所在盘符不一致,那么我的这个思路就有问题。
能不能在读文本文件的时候,通过代码能够自动找到我所添加的文本文件,我想这个应该是可以的,无奈对VB不熟悉,找不到解决的方法。
我的思路说得有点乱,如果有其他方法能更好解决我的问题那最好不过了。
文本文件
读写
------解决方案--------------------
单纯就你这个程序,下面应该更好
Public Class Form1
Public fileContent As String
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
fileContent = "A同学的成绩为: " & TextBox1.Text.ToString() & vbCrLf & "B同学的成绩为: " & TextBox2.Text.ToString() & vbCrLf & "C同学的成绩为: " & TextBox3.Text.ToString()
Form2.ShowDialog()
End Sub
End Class
Public Class Form2
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
TextBox1.Text = Form1.fileContent
End Sub
End Class
因为,用了text文件后,关闭程序时,会弹出个框框。。。。