Option Explicit Private Sub Command1_Click() Dim strCode As String strCode = strCode & "Private Sub Command1_Click(){ENTER}" strCode = strCode & " Dim strCode As String{ENTER 2}" strCode = strCode & " strCode = ""Some Code""{ENTER 2}" strCode = strCode & " Shell ""Notepad.exe"", vbNormalFocus{ENTER}" strCode = strCode & " SendKeys strCode, True{ENTER}" strCode = strCode & "End Sub{ENTER}" Shell "Notepad.exe", vbNormalFocus SendKeys strCode, True End Sub
Thank's for reading the articelCara Menulis Ke Notepad VB6(Write To Notepad Using VB6) .If You want to copy paste your website please tag my link Cara Menulis Ke Notepad VB6(Write To Notepad Using VB6) Intro My Website.
0 comments:
Post a Comment