μήνυμα επιβλαβή για το PC

[ΚΩΣΤΑΣ2]

Γεια σε όλο το forum.
Στο κουμπί μίας φόρμας έχω το εξής κώδικά

Private Sub Εντολή0_Click()
Dim Apath As String
Apath = "C:\Windows\system32\osk.exe"
FollowHyperlink Apath
End Sub

Μου βγαίνει το μήνυμα στο συνημμένο

Μπορεί να παρακάμπτω το μήνυμα ;
Ευχαριστώ