Läsa in textfil med vb.net
Jun 4
Först så skriver vi detta längst upp av allt:
Imports System.IO
Denna rad öppnar textfilen:
Dim ioFile as new StreamReader(“TextFile.txt”)
Dessa rader loopar igenom hela filen:
Dim ioLine as string ‘ Going to hold one line at a time
Dim ioLines as string ‘ Going to hold whole file
ioLine = ioFile.ReadLine
ioLines = ioLine
While not ioLine = “”
ioLine = ioFile.ReadLine
ioLines = ioLines & vbcrlf & ioLine
End While
Detta skriver ut filen i en msgbox:
MsgBox(ioLines)
Filed under: VB.net
jag använde den här koden till att läsa ett filnamn som sedan öppnas med hjälp av ett wmp “addon” i vb.net men när den lägger in filnamnet så kommer det 2 konstiga tecken om ser ut som streck efter filnamnet och då går det inte öppna filmen, du vet inte vad felet är? såhär ser koden ut:
Imports System.IO
Public Class Form1
Dim ioFile As New StreamReader(“C:\Documents and Settings\nkpitg07psfr\Desktop\hej.txt”)
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim ioLine As String
Dim ioLines As String
ioLine = ioFile.ReadLine
ioLines = ioLine
While Not ioLine = “”
ioLine = ioFile.ReadLine
ioLines = ioLines & vbCrLf & ioLine
End While
TextBox1.Text = ioLines
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim j As String = TextBox1.Text
AxWindowsMediaPlayer1.URL = j
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
End Class
Svår fråga, jag är allt annat än duktig på att programmera i vb.net. Men har du kollat så denna linje verkligen är rätt?
ioLines = ioLines & vbCrLf & ioLine
Ska det verkligen vara en variabel med en radbrytning som ska användas av wmp-prylen?
Kolla upp “&” om vet verkligen är rätt också, annars vet jag tyvärr inte.