Write a Multiplication table in notepad

SystemUtil.Run"notepad"
Window("text:=Untitled - Notepad").Active
for i= 1 to 10
x=5*i
Window("text:=Untitled - Notepad").type "5*' & i & "=" &x
Window(text:=Untitled - Notepad").type micReturn
Next