[Formula 1]

like the title say

when the button is clicked i want it to send the current date and time to txt file (log file)
also userTextBox.Text, so i can see it in this format

username: HackForumsUser
Date: 28/02/2019
Time: 20:58

And then when i click the button again, i want it to add the new one after the old one for example:


username: HackForumsUser
Date: 28/02/2019
Time: 20:58

username: HackForumsUser2
Date: 29/02/2019
Time: 22:58

username: HackForumsUser3
Date: 22/03/2019
Time: 21:58

[Who Soup]

I gotchu, posting to update later.

EDIT:

Things Needed:

• 2 Textboxes
  


• 2 Buttons
  


• Imports system.IO
  


• Publicly declare: Dim los As New List(Of String)
  

Add Button:

Code

Dim packet As String = "Username: " & TextBox2.Text & vbNewLine & "Date: " & Date.Now & vbNewLine & "Time:" & TimeOfDay
       TextBox1.Text = TextBox1.Text & vbNewLine & packet
       los.Add(packet)

Save Button:

Code

File.WriteAllLines(Environment.CurrentDirectory & "Saved.txt", los)

Full Code:

Code

Imports System.IO

Public Class Form1

   Dim los As New List(Of String)
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim packet As String = "Username: " & TextBox2.Text & vbNewLine & "Date: " & Date.Now & vbNewLine & "Time:" & TimeOfDay
       TextBox1.Text = TextBox1.Text & vbNewLine & packet
       los.Add(packet)

   End Sub

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       File.WriteAllLines(Environment.CurrentDirectory & "Saved.txt", los)
   End Sub
End Class

[Formula 1]

I gotchu, posting to update later.

EDIT:

Things Needed:

• 2 Textboxes
  


• 2 Buttons
  


• Imports system.IO
  


• Publicly declare: Dim los As New List(Of String)
  

Add Button:

Code

Dim packet As String = "Username: " & TextBox2.Text & vbNewLine & "Date: " & Date.Now & vbNewLine & "Time:" & TimeOfDay
       TextBox1.Text = TextBox1.Text & vbNewLine & packet
       los.Add(packet)

Save Button:

Code

File.WriteAllLines(Environment.CurrentDirectory & "Saved.txt", los)

Full Code:

Code

Imports System.IO

Public Class Form1

   Dim los As New List(Of String)
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim packet As String = "Username: " & TextBox2.Text & vbNewLine & "Date: " & Date.Now & vbNewLine & "Time:" & TimeOfDay
       TextBox1.Text = TextBox1.Text & vbNewLine & packet
       los.Add(packet)

   End Sub

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       File.WriteAllLines(Environment.CurrentDirectory & "Saved.txt", los)
   End Sub
End Class

Awesome bro, Thank you!