Codes :
New :
textbox1.text = ""
Copy :
textbox1.copy()
Paste :
textbox1.Paste()
Cut :
textbox1.cut()
Select All :
textbox1.selectAll()
open :
Dim Open As New OpenFileDialog
Open.Filter = "ScrapPad Text File(*.stf).stf|ALLFILE(*.*)|*.*"
Open.Title = "Open ScrapPad Text File"
Open.CheckPathExists = True
Open.ShowDialog(Me)
On Error Resume Next
Dim RT As New System.IO.StreamReader(Open.FileName)
On Error Resume Next
TextBox1.Text = RT.ReadToEnd
Save :
Dim Save As New SaveFileDialog
Save.Filter = "ScrapPad Text File (*.stf)|*.stf|ALL FILES (*.*)|*.*"
Save.Title = "Save File"
Save.CheckPathExists = True
Save.ShowDialog(Me)
Try
My.Computer.FileSystem.WriteAllText(Save.FileName, TextBox1.Text, False)
Catch ex As Exception
End Try
Font :
Dim Font as new FontDialog
Font.ShowDialog()
textbox1.font = font.Font
Colour :
Dim c as New ColorDialog
c.showDialog()
textbox1.forecolor = c.color
Alignment LEFT :
TextBox1.TextAlign = HorizontalAlignment.Left
Alignment CENTER :
TextBox1.TextAlign = HorizontalAlignment.Center
Alignment RIGHT :
TextBox1.TextAlign = HorizontalAlignment.Right
Auf dieser Seite können Sie das Online-Video Visual Basic Tutorial 1 - Simple Notepad mit der Dauer stunde minuten sekunde in guter Qualität ansehen, das der Benutzer iloveportals 23 August 2010 hochgeladen hat, den Link mit Freunden und Bekannten teilen, dieses Video wurde auf Youtube bereits 1,149 Mal angesehen und es wurde von 2 den Zuschauern gefallen. Viel Spaß beim Betrachtenden Zuschauern gefallen!