Visual Basic Tutorial 1 - Simple Notepad

Veröffentlicht am: 23 August 2010
auf dem Kanal: iloveportals
1,149
2

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!