我会尽可能简化我的问题。
现在我有了两个按钮和一个文本框的程序。
按钮1=打开文件对话框
按钮2=对加载的文件执行一些代码,然后将其导出到文本框中。
'Button 1'
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button2.Click
OpenFileDialog1.ShowDialog()
End Sub
如何使按钮2按文本框读取数据,并使用它做一些代码,然后导出到textbox1
发布于 2020-04-20 04:09:46
这就是你要找的?
Public Class Form1
Dim textpath As New TextBox
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
OpenFileDialog1.Filter = "TXT|*.txt"
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
textpath.Text = My.Computer.FileSystem.ReadAllText(OpenFileDialog1.FileName)
End If
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
If textpath.Text = Nothing Then
Else
TextBox1.Text = textpath.Text ' all text in .txt
TextBox1.Text = textpath.Lines(0) ' text from lines 0=first line, 1= second line 2.3.4.......
End If
End Sub
End Class
https://stackoverflow.com/questions/61321589
复制相似问题