'open notepad by pressing the up arrow key, silly but works.

by Brandon (46 Submissions)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 18^th September 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate 'open notepad by pressing the up arrow key, silly but works.



Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Dim v_ms As Double
If KeyCode = vbKeyUp Then
MsgBox "Notedpad is now opening, click ok", vbOKOnly, "Notepad"
v_ms = Shell("notepad.exe", vbNormalFocus)
End If
End Sub

Download this snippet Add to My Saved Code

'open notepad by pressing the up arrow key, silly but works. Comments

No comments have been posted about 'open notepad by pressing the up arrow key, silly but works.. Why not be the first to post a comment about 'open notepad by pressing the up arrow key, silly but works..

'open notepad by pressing the up arrow key, silly but works.

'open notepad by pressing the up arrow key, silly but works. Comments

Post your comment

Difficulty