概要
キーボード入力用クラス。。主にSendKeysメソッドを利用して、キーボードを入力します。修飾キー (Control、Alt、Shift) も利用できます。
オブジェクト設定
・変数宣言
Dim KeyCls As KeyCls
・親クラス:WebDriver
文法
Set KeyCls = driver.Keyboard
KeyCls.[メソッド]
メソッド・プロパティ
メソッド
スクロールできます
Name | 解説 | ShortExample |
---|---|---|
KeyDown | 修飾キー (Control、Alt、Shift) の押下保持 | driver.Keyboard.KeyDown Keys.Control |
KeyUp | 修飾キー (Control、Alt、Shift) の押下保持解除 | driver.Keyboard.KeyUp Keys.Control |
SendKeys | アクティブ状態の要素にキーボード入力 | KeyCls.SendKeys "hoge" |
※Short Exampleは、動作確認ができたコードを記載しています。
プロパティ
スクロールできます
Name | 解説 | ShortExample |
---|---|---|
Keys | Keysクラスのキーボードリストを取得 | KeyCls.KeyDown KeyCls.Keys.Control |
※Short Exampleは、動作確認ができたコードを記載しています。
Example
Use_keyboardCls
Private Sub Use_keyboardCls()
Dim driver As New ChromeDriver
Dim KeyCls As Keyboard
driver.Get "https://www.google.co.jp"
Set KeyCls = driver.Keyboard
KeyCls.SendKeys "hoge"
driver.Wait 2000
driver.Quit
End Sub
Use_Keboard_KeyDownUp
Private Sub Use_Keboard_KeyDownUp()
Dim driver As New ChromeDriver
Dim Keys As New Keys
driver.Get "https://ja.wikipedia.org/wiki/Main_Page"
driver.Keyboard.KeyDown Keys.Control
driver.SendKeys "a"
driver.Keyboard.KeyUp Keys.Control
Stop
driver.Quit
End Sub
Use_Keboard_Keys
Private Sub Use_Keboard_Keys()
Dim driver As New ChromeDriver
Dim KeyCls As selenium.Keyboard
driver.Get "https://www.google.co.jp"
driver.SetClipBoard "testtext"
Set KeyCls = driver.Keyboard
KeyCls.KeyDown KeyCls.Keys.Control
driver.FindElementByName("q").SendKeys "v"
driver.Wait 2000
Stop
driver.Quit
End Sub
SeleniumBasic KeysClass 特殊キーのキーボード操作
概要 テキスト以外の特殊キーのキーボード操作用クラス オブジェクト設定 ・変数宣言 Dim Keys As New Keys ・親クラス:WebDriver 文法 Keys.[メソッド] メソッド・プ...