Visual Basic Tutorial 1 - Simple Notepad

Published: 23 August 2010
on channel: 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


On this page of the site you can watch the video online Visual Basic Tutorial 1 - Simple Notepad with a duration of hours minute second in good quality, which was uploaded by the user iloveportals 23 August 2010, share the link with friends and acquaintances, this video has already been watched 1,149 times on youtube and it was liked by 2 viewers. Enjoy your viewing!