help me plese

I created a form with a DateTimePicker named DateTimePicker1 and a RichTextBox named RichTextBox1.

VB.NET:
Private Sub DateTimePicker1_ValueChanged(ByVal sender As Object, _
  ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
    RichTextBox1.Text = DateTimePicker1.Value.ToString
End Sub
 
error fond

Okey thanks i need more help!
I'm tring to save a task under each individual date under a one Un txt file!
I have the save dialog
With sfd1

.Title = "Select Save File (.txt)"

.Filter = "ITasked Text Files|*;*.txt;"

.OverwritePrompt =
True

If .ShowDialog = Windows.Forms.DialogResult.OK Then

VB.NET:
[QUOTE]selectcase system.10.path.getextension(.fileName).ToUpper[/QUOTE]


Case ""

VB.NET:
[QUOTE]Text.save(.FileName, textformat)[/QUOTE]


CaseElse

'msg box styles error

MsgBox("Invalid File Name or extension! File name can not contain spaces ,<>()-=+! please correct!", MsgBoxStyle.Critical, "saving")

EndSelect

EndIf

EndWith
'qute is the error
 
Last edited:
Back
Top