Очень благодарен помогло :)
Добавил в ссылках dll. Пространство имён увидел и подключил:
using ASoft.IRBIS.IRBISScanControl.VB;
Файл называется "KeyboardClass.vb".
Код таков:
|
Namespace ASoft.IRBIS.IRBISScanControl.VB Public Class KeyboardClass
Public Sub InsertClip(ByVal name As String)
Dim ProcID As Integer ' Start the Calculator application, and store the process id. ProcID = Shell("CALC.EXE", AppWinStyle.NormalFocus) ' Activate the Calculator application. AppActivate(ProcID) ' Send the keystrokes to the Calculator application. My.Computer.Keyboard.SendKeys("22", True) My.Computer.Keyboard.SendKeys("*", True) My.Computer.Keyboard.SendKeys("44", True) My.Computer.Keyboard.SendKeys("=", True) ' The result is 22 * 44 = 968.
End Sub
End Class
End Namespace |
Подскажите почему класса не вижу?
Спасибо.