Visual Basic Tutorial 1 - Simple Notepad
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
Nesta página do site você pode assistir ao vídeo on-line Visual Basic Tutorial 1 - Simple Notepad duração hora minuto segundo em boa qualidade , que foi baixado pelo usuário iloveportals 23 Agosto 2010, compartilhe o link com seus amigos e conhecidos, no youtube este vídeo já foi visto 1,149 vezes e gostou 2 espectadores. Boa visualização!
