im begginner进入vb.net并且我阻止了我想让我的软件接受文本并逐行将ID写入网站上的ID
这是我使用的代码
Public Class Form1
Dim streamer As IO.File
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.ShowDialog()
TextBox5.Text = OpenFileDialog1.FileName
Dim R As New IO.StreamReader("C:\" & TheFileName.text & ".txt")
TheText.Text = R.ReadToEnd
R.Close()
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
WebBrowser1.Document.GetElementById("u_0_1").SetAttribute("value", TextBox5.Text)
End Sub
End Class
按钮5是其开始按钮,button1是其上传的txt文件按钮 和textbox1,它来源于txt的来源
答案 0 :(得分:0)
为防止混淆,您应该为控件提供有意义的名称,而不是vb默认名称。所以TextBox5应该是tbFilename,button1应该是buttReadFile等。
我修改了你的例子。希望这有效。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.ShowDialog()
Textbox5.Text = OpenFileDialog1.FileName
TheText.Text = IO.File.ReadAllText(OpenFileDialog1.FileName)
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
WebBrowser1.Document.GetElementById("u_0_1").SetAttribute("value", TheText.Text)
End Sub
End Class
OpenFileDialog1.FileName
应该是文件的完整路径,因此我们只需使用Io.File.ReadAllText
阅读它。当您将其写入webbrowser时,我们使用文件名文本框而不是TheText文本框。