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
Sur cette page du site, vous pouvez voir la vidéo en ligne Visual Basic Tutorial 1 - Simple Notepad durée heure minute seconde en bonne qualité , qui a été Téléchargé par l'utilisateur iloveportals 23 août 2010, Partagez le lien avec vos amis et connaissances, sur youtube cette vidéo a déjà été regardée 1,149 fois et il a aimé 2 téléspectateurs. Bon visionnage!
