If Me.ActiveControl.GetType.BaseType.ToString = "System.Windows.Forms.TextBoxBase" Then Windows.Forms.SendKeys.Send("^{X}") End If If Me.ActiveControl.GetType.BaseType.ToString = "System.Windows.Forms.TextBoxBase" Then Windows.Forms.SendKeys.Send("^{C}") End If If Me.ActiveControl.GetType.BaseType.ToString = "System.Windows.Forms.TextBoxBase" Then Windows.Forms.SendKeys.Send("^{V}") End If Clipboard.SetText(‘粘贴文本信息‘) Clipboard.GetText(‘获取文本信息‘)
时间: 2024-11-10 18:17:59