VB 有关鼠标的操作
VB 有关鼠标的操作
假如没有鼠标，电脑的普及率绝对没有目前这么高。在windows下，鼠标的作用不亚于键盘。因此，在VB中设计基于windows下的应用程序，鼠标的操作和设计是非常重要的。
一、鼠标的移动、按键事件
要想在VB程序中自如应用鼠标，先要了解有关鼠标的事件，并学会如何编写这些事件过程。最常见的鼠标事件有：
当在某个对象上移动鼠标、按下鼠标按键、释放鼠标按键时均会触发鼠标事件，它们分别是：MouseMove、MouseDown、MouseUp。
这三个鼠标事件过程均会返回四个参数：Button As Integer, Shift As
具体解释如下：
1、 MouseDown事件
当单击鼠标上的任何一个按键之后，都会引起MouseDown事件。许多对象都有这个事件。如用鼠标在窗体上单击，可以引发这个事件，用鼠标单击“按钮”“标签”“文本框”等对象也可以引发这个事件。该事件还带回来不少参数，下面是鼠标单击窗体任何位置所引发的MouseDown事件，单击其它对象所带回的参数与此相同：
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Integer,Y As Integer)
End Sub
其中：
（1）、Button参数
Button参数带回来的信息是用户按了鼠标上的哪能一个键，左键？右键？还是中间键？
Button=1，说明用户按的是鼠标的左键；
Button=2，说明用户按的是鼠标的右键；
Button=4，说明用户按的是鼠标的中间键；
（2）、Shift参数
Shift参数带回来的是用户按鼠标按键时是否同时按下了键盘上的Shift、Ctrl、Alt键。
Shift=1，说明用户在按下鼠标按键的同时，还按下了键盘上的Shift键；Shift=2，说明用户在按下鼠标按键的同时，还按下了键盘上的Ctrl键；
Shift=3，说明用户在按下鼠标按键的同时，还按下了键盘上的Shift和Ctrl键；
Shift=4，说明用户在按下鼠标按键的同时，还按下了键盘上的Alt键；Shift=5，说明用户在按下鼠标按键的同时，还按下了键盘上的Shift和Alt键；
Shift=6，说明用户在按下鼠标按键的同时，还按下了键盘上的Ctrl和Alt 键；
Shift=7，说明用户在按下鼠标按键的同时，还按下了键盘上的Shift、Ctrl和Alt键；
（3）、X，Y参数
X，Y参数带回来的是鼠标指针在屏幕上的坐标（x,y）。
2、MouseMove事件
当在任何对象上移动鼠标时，会引发MouseMove事件。下面是鼠标在窗体上任何位置移动所引发的MouseMove事件，鼠标在其它对象上移动所带回的参数与此相同：
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
其中所返回的参数Button、Shift、X、Y与MouseDown事件过程返回的参数完全相同，这里不再重复。
3、MouseUp事件
当鼠标单击任何一个对象，松开鼠标按键时，都会引起MouseUp事件，同时还带回来不少参数，下面是鼠标单击窗体上任何一个位置，松开鼠标按钮时所引发的MouseUp事件，对于其它对象所带回的参数与此相同：
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
End Sub
其中所带回的参数Button、Shift、X、Y与MouseDown事件返回的参数完全相同，这里不再重复。
在VB中新建word文件
在Visual Basic 6.0 中创建Word文 档 摘要：分析了Word对象模型的结构，特别是Document对象及其使用方法，提出了在Visual Basic 中创建Word格式文档的方法，并给出了该方法的应用实例。 关键词：Visual Basic，Word对象模型，文档 引言 Word文档是实际工作学习中最为常用的文档格式之一。 随着社会信息化程度的提高，一些传统的由人工完成工作逐渐转向由计算机来处理。计算机自动组卷系统便是一个典型的例子。为了追求更高的效率，一些计算机自动组卷系统的单位用户要求由软件输出Word格式的试卷不需排版直接供印刷使用。 由于Microsoft Office套件的普及，Word文档、电子表格文档、电子幻灯片等文档日渐常用。虽然在Office中各个程序的文档可以方便地转换，但是这种转换是以失去文档原本的格式为代价的。例如，在自动组卷系统中，存储在Access数据库中的试卷可以通过Access提供的导出功能产生Word文档，但产生的文档是无格式的，需花费大量时间重新排版方可符合用户在试卷格式上的要求。 针对这一问题，本文讨论通过研究Word对象模型，提出使用该对象模型创建符合用户所要求的特定格式的Word文档的方法。 Word对象模型
1、Word对象模型层次结构 对象是 Visual Basic的基石，几乎在 Visual Basic 中的每个操作都与修改对象有关。Word 的任何元素（如文档、表格、段落、域、书签等）都可以用 Visual Basic 中的对象来代表。 对象代表一个 Word 的元素，如文档、段落、书签或单个的字符。集合也是一个对象，该对象包含其他数个对象，通常这些对象属于相同的类型，例如，一个集合对象中可包含文档中的所有书签对象。通过使用属性和方法，可以修改单个的对象，也可修改整个的对象集合。 Microsoft Word Visual Basic提供一套完整的Word对象模型，这是一个以Application为顶层对象的对象层次结构。其结构如图-1所示。 对象由两种类型的成员构成，一种是属性，第二种成员是方法。 属性是对象的一个特性或者该对象行为的一个方面。例如，文档属性包含名称、内容、保存状态以及是否启用修订。要更改一个对象的特征，可以修改其属性值。要设置一个属性的值，需在对象的后面紧接一个句点、属性名称、一个等号及新的属性值。下面的示例在"MyDoc.doc"文档中启用修订。
VB编程的键盘控制
V B编程的键盘控制Prepared on 21 November 2021
VB编程的键盘控制 我们利用VisualBASIC编写程序，多数情况只涉及到鼠标操作（如单击、双击、拖动等），但如果程序中需要实现文本编辑、热键激活或利用键盘进行游戏控制等功能时，将不可避免地碰到键盘捕获及处理的问题。下面，我们就来看一看VB编程中如何进行键盘控制。 一、概述 在VB中，很多控件都提供了键盘输入功能（如文本框、组合框等），但它们对键盘的处理较简单，遇到复杂一点的要求即无能为力。因而VB提供了KeyPress、KeyUp、KeyDown三种键盘事件，当用户按键时，会触发这三种事件，而且窗体和接受键盘输入的控件都识别这三种事件。下表对这些事件作了描述。 键盘事件触发原因 KeyPress按下某ASCII字符键 KeyDown按下键盘的任意键 KeyUp释放键盘的任意键 KeyPress事件无法检测到的情况： SHIFT、CTRL和ALT键的特殊组合。 光标控制键。 HOME、END、PAGEUP、PAGEDOWN等。 数字小键盘的数字键与打字键盘数字键的区别。 不仅响应按键操作而且响应释放键操作（KeyPress只响应按键操作）。 键盘事件彼此不相互排斥。按下某键时将生成KeyDown和KeyPress事件，而松开此键时生成KeyUp事件。当用户按下一个KeyPress不能检测的键时将触发KeyDown事件，松开此键时生成KeyUp事件。若使用KeyUp和KeyDown事件应确保KeyPress事件的功能不够用，通常编写KeyPress事件的代码比较容易。 二、KeyPress事件 在按下与ASCII字符对应的键时将触发KeyPress事件。ASCII字符集代表标准键盘的字母、数字和标点符号以及部分控制键（ENTER、TAB、BACKSPACE键等）。KeyDown和KeyUp事件能够检测其它功能键、编辑键和光标定位键。当处理标准ASCII字符时应使用KeyPress事件。例如，如果希望将输入到文本框中的所有字符都强制转换为大写字符，则可在输入时使用此事件转换大小写：PrivateSubText1_KeyPress(KeyAsciiAsInteger) KeyAscii=Asc(Ucase(Chr(KeyAscii))) EndSub KeyAscii参数返回对应所按键的ASCII代码。 也可通过KeyPress事件识别部分控制键。例如，下述事件过程使用KeyPress检测用户是否正在按BACKSPACE键： PrivateSubText1_KeyPress(KeyAsciiAsInteger) IfKeyAscii=8ThenMsgBox"YouPressedtheBACKSPACEkey." EndSub 注：BACKSPACE键的ASCII值为8。 还可用KeyPress事件改变某些键的缺省行为。例如，当在文本框内按ENTER键就会结束当前行输入并将光标转到下一行（Multiline属性设为True）。在KeyPress事件中截断ENTER键（ASCII 值为13）就可避免这种情况：
金文vb教程word文档
第一章vasual basic 程序开发环境 第一节visual basic 的启动与退出 一.启动vb的四种方法： 1.使用“开始”菜单中的“程序”命令 2.使用“我的电脑” 3.使用“开始”菜单中的“运行”命令 4.建立启动visual basic6.0的快捷方式 二.vb启动后的简单设置 1.新建工程···标准exe 2.（1）SDI但文档界面 （2）MDI多文档界面 “工具”—>“选项”—>“高级”—>“SDI开发环境” 3.退出vb：ALT+Q 第二节主窗体的组成 1.标题栏：设计模式运行模式中断模式 2.菜单栏：（12个） （1）菜单的分类：直接执行弹出对话框下一级菜单 （2）进入菜单栏的方法： <1>ALT或F10激活菜单后光标健选择 <2>ALT+激活键 注：如果打开了不适当或不需要的菜单，或者执行菜单命令时打开了不需要的对话框，可以用esc健关闭 <3>快捷键：新建工程ctrl+n 打开工程ctrl+o 保存工程ctrl+s 3.工具栏 （1）工具栏的分类：编辑、标准、窗体编辑器和调试 （2）工具栏的形式：固定、浮动 （3）标准工具栏图标及作用 第三节其他窗体 一.窗体设计器和工程资源管理器 （一）窗体设计器窗口
1.窗体设计器窗口简称窗体（）from，是应用程序最终面向用户的窗口，它对 应于应用程序的运行结果。 2.如果想清楚这些小点或者改变点与点间的距离，则可通过执行“工具”菜单 中的“选项”命令(“通用”选项卡)来调整。 （二）工程资源管理器窗口 1.在工程支援管理器窗口中，含有建立一个应用程序所需要的文件的清单。工程支援管理器窗口中的文件可以分为6类， <1>窗体文件（.frm） <2>程序模块文件（.bas） <3>类模块文件（.cls） <4>工程文件（.vbp） <5>工程组文件（.vbg） <6>资源文件（.res） 2.工程支援管理器窗口中文件的分类： （1）工程文件和工程组文件 工程文件的扩展名为.vbp，每个工程对应一个工程文件。当一个程序包括两个以上的工程时，这些工程构成一个工程组，工程组文件的扩展名为.vbg 用“文件”菜单中的“新建工程”命令可以建立一个新的工程，用“打开工程”命令可以打开一个已有的工程，而用“添加工程”命令可以添加一个工程。（2）窗体文件 窗体文件的扩展名为.frm，每个窗体对应一个窗体文件，窗体及其控件的属性和其他信息（包括代码）都存放在窗体文件中。一个应用程序可以有多个窗体（最多可达255个），因此就可以有多个以.frm为扩展名的窗体文件。 执行“工程”菜单中的“添加窗体”命令或单击工具栏中的“添加窗体”按钮可以增加一个窗体，而执行“工程”菜单中的“移除窗体”命令可删除当前的窗体。每建立一个窗体，工程资源管理器窗口中就增加一个窗体文件，每个窗体都有一个不同的名字，可以通过属性窗口设置（name属性），其默认名字formx （x为1，2，3…..），相应的默认文件名为formx。 （3）标准模块文件 标准模块文件也称程序文件，其扩展名为.bas，它是为合理组织程序而设计的。标准模块是一个纯代码性质的文件，它不属于任何一个窗体，主要在大型应用程序中使用。 标准模块由程序代码组成，主要用来声明全局变量和定义一些通用的过程，可以被不同窗体的程序调用。标准模块通过“工程”菜单中的“添加模块”命令来建立。 （4）类模块 Visual basic 提供了大量预定义的类，同时也允许用户根据需要定义自己 的类，用户通过类模块来定义自己的类，每个类都用一个文件来保存，其扩展名为.cls （5）资源文件 资源文件中存放的是各种“资源”，是一种可以同时存放文本，图片，声 音等多种资源的文件。资源文件由一系列独立的字符串，位图及声音文件（.wav .mid）组成，其扩展名为.res，资源文件是一个纯文本文件，可 以用简单的文字编辑器编辑。
vb操作word详细讲解
vb操作word详解 Visual Basic支持一个对象集合，该集合中的对象直接对应于Microsoft Word 97中的元素，并且通过用户界面，用户熟悉这些元素中的绝大多数。例如，Document 对象代表了一个打开的文档，Bookmark对象代表了一个文档中的书签，而Selection对象则代表了在一个文档窗口窗格中的选定容。在Word中，每一类元素－文档、表格、段落、书签、域等等－都可以用Visual Basic的对象来表示。要在Word中自动执行任务，可以使用这些对象的方法和属性。 关于理解和使用Microsoft Office 97对象模型的一般性容，请参阅本书的第二章“理解对象模型”。在Microsoft Office 97中的对象模型相当丰富，其中包含了大约180个对象。要查看Word对象模型的层次关系图，请参阅“帮助”中的“Microsoft Word 对象”。要获得对某种特定对象的详细描述，可以在此图中单击该对象的名字，或是在“帮助”的索引中对特定对象进行搜索。 怎样显示Word Visual Basic帮助 要使用Word Visual Basic帮助，必须在安装过程中选择“自定义”的安装方式，并且为Word选中“Visual Basic在线帮助”复选框。否则，安装程序不会安装Visual Basic帮助。如果用户已经安装好了Word，那么可以再次运行Setup程序来安装Visual Basic帮助。
要查看Word Visual Basic 帮助，可以在“Visual Basic 编辑器里的“帮助”菜单中点击“目录和索引”一项。在“帮助主题”对话框的“目录”一表中，双击“Microsoft Word Visual Basic 参考”，然后再双击“Visual Basic 参考”。“帮助主题”对话框会重新出现，显示出Microsoft Word Visual Basic的目录和索引。 运用Application 对象 在用户启动一个Word 时段的同时，也创建了一个Application 对象。用户可以使用Application 对象的属性或方法来控制或返回应用程序围的特性、控制应用程序窗口的外观或者调整Word 对象模型的其他方面。可以使用Application属性来返回Word Application 对象。以下的示例从视图状态切换到打印预览状态。 Application. PrintPreview = True Application对象的一些属性控制着应用程序的外观。例如，如果DisplayStatusBar属性为True(真)，那么状态栏是可见的，如果WindowState属性值为wdWindowStateMaximize，那么应用程序窗口处于最大化状态。以下的示例设置了屏幕上应用程序窗口的大小。 With Application .WindowState = wdWindowStateNormal .Height = 450 .Width = 600 End With
利用VB建立鼠标键盘操作回放
利用VB建立鼠标键盘操作回放 很多的教学软件或系统监视软件可以自动记录回放用户的输入文字或点击按钮等操作操作，这个功能的实现是使用了Windows的Hook函数。本文介绍如何通过使用VB来实现鼠标键盘操作的纪录和回放。Windows提供API函数SetwindowsHookEx来建立一个Hook，通过这个函数可以将一个程序添加到Hook链中监视Windows消息，函数语法为： Public Declare Function SetWindowsHookEx Lib "user32" _ Alias "SetWindowsHookExA" _ (ByVal idHook As Long, _ ByVal lpfn As Long, _ ByVal hmod As Long, _ ByVal dwThreadId As Long) As Long 其中参数idHook指定建立的监视函数类型。通过Windows MSDN帮助可以看到，SetwindowsHookEx函数提供15种不同的消息监视类型，在这里我们将使用WH_JOURNALRECORD和WH_JOURNALPLAYBACK来监视键盘和鼠标操作。参数lpfn 指定消 息函数，在相应的消息产生后，系统会调用该函数并将消息值传递给该函数供处理。函数的一般形式为： Hookproc (code: Integer; wparam: WPARAM; lparam: LPARAM): LRESULT stdcall; 其中code为系统指示标记，wParam和lParam为附加参数，根据不同的消息监视类型而不同。只要在程序中建立这样 一个函数再通过SetwindowsHookEx函数将它加入到消息监视链中就可以处理消息了。 在不需要监视系统消息时需要调用提供UnHookWindowsHookEx来解除对消息的监视。WH_JOURNALRECORD和WH_JOURNALPLAYBACK类型是两种相反的Hook类型，前者获得鼠标、键盘动作消息，后者回放鼠 标键盘消息。所以在程序中我们需要建立两个消息函数，一个用于纪录鼠标键盘操作并保存到一个数组中，另一个用于 将保存的操作返给系统回放。 下面是具体的程序实现：首先建立一个新工程，在Form1中加入三个CommandButton控件用于控制消息钩子，另外还 可以增加若干Command或者TextBox控件用于检验操作回放的效果。然后在工程中增加一个模块文件，在模块中加入以下 定义和代码: Option Explicit Public Type EVENTMSG message As Long paramL As Long paramH As Long time As Long hwnd As Long End Type Public Declare Function CallNextHookEx Lib "user32" _ (ByVal hHook As Long, _
VB查找并替换WORD文档中的字符串
基本要求：需安装WORD Function WordReplace(FileName As String, SearchString As String, ReplaceString As String, Optional SaveFile As String = "", Optional MatchCase As Boolean = False) As Integer On Error GoTo ErrorMsg '函数运行时发生遇外或错误,转向错误提示信息 Dim wordApp As New Word.Application Dim wordDoc As New Word.Document Dim wordArange As Word.Range Dim wordSelection As Word.Selection Dim ReplaceSign As Boolean Dim I As Integer '判断将要替换的文件是否存在 If Dir(FileName) = "" Then '替换文件不存在 MsgBox "未找到" amp; FileName amp; "文件" '提示替换文件不存在信息 WordReplace = -2 '返回替换文件不存在的值 Exit Function '退出函数 End If Set wordApp = CreateObject("Word.Application") '建立WORD实例 wordApp.Visible = False '屏蔽WORD实例窗体 Set wordDoc = wordApp.Documents.Open(FileName) '打开文件并赋予文件实例 Set wordSelection = wordApp.Selection '定位文件实例 Set wordArange = wordApp.ActiveDocument.Range(0, 1) '指定文件编辑位置wordArange.Select '激活编辑位置 I = 0 '初始化替换次数值 ReplaceSign = True '初始化是否替换成功标志 Do While ReplaceSign ReplaceSign = wordArange.Find.Execute(SearchString, MatchCase, , , , , , wdFindContinue, , ReplaceString, True) '查找并替换 '判断查找并替换是否成功,如果成功替换次数值递增1 If ReplaceSign = True Then I = I + 1 End If Loop MsgBox "已完成对文档的搜索并完成 " amp; I amp; " 替换。" '提示总替换次数 '如果替换成功，则提示是否保存
vb net操作Word
Private oWordApplic As Word.Application Private oDocument As Word.Document Private oRange As Word.Range Private oSelection As Word.Selection Public Sub Neword() '激活com word接口 oWordApplic = New Word.Application oWordApplic.Visible = True End Sub '设置选定文本 Public Sub SetRange(ByVal para As Integer) oRange = oDocument.Paragraphs(para).Range oRange.Select() End Sub Public Sub SetRange(ByVal para As Integer, ByVal sent As Integer) oRange = oDocument.Paragraphs(para).Range.Sentences(sent) oRange.Select() End Sub Public Sub SetRange(ByVal startpoint As Integer, ByVal endpoint As Integer, ByVal flag As Boolean) If flag = True Then oRange = oDocument.Range(startpoint, endpoint) oRange.Select() Else End If End Sub '生成空的新文档 Public Sub NewDocument() Dim missing = System.Reflection.Missing.Value Dim isVisible As Boolean = True oDocument = oWordApplic.Documents.Add(missing, missing, missing, missing) oDocument.Activate() End Sub '使用模板生成新文档 Public Sub NewDocWithModel(ByVal FileName As String) Dim missing = System.Reflection.Missing.Value Dim isVisible As Boolean = True Dim strName As String strName = FileName
VB编程的键盘控制
VB编程的键盘控制 我们利用Visual BASIC编写程序，多数情况只涉及到鼠标操作（如单击、双击、拖动等），但如果程序中需要实现文本编辑、热键激活或利用键盘进行游戏控制等功能时，将不可避免地碰到键盘捕获及处理的问题。下面，我们就来看一看VB编程中如何进行键盘控制。 一、概述 在VB中，很多控件都提供了键盘输入功能（如文本框、组合框等），但它们对键盘的处理较简单，遇到复杂一点的要求即无能为力。因而VB提供了KeyPress、KeyUp、KeyDown 三种键盘事件，当用户按键时，会触发这三种事件，而且窗体和接受键盘输入的控件都识别这三种事件。下表对这些事件作了描述。 KeyDown和KeyUp事件提供了最低级的键盘响应，可用这些事件检测KeyPress事件无法检测到的情况： ◆SHIFT、CTRL和ALT键的特殊组合。 ◆光标控制键。 ◆HOME、END、PAGEUP、PAGEDOWN等。 ◆数字小键盘的数字键与打字键盘数字键的区别。 ◆不仅响应按键操作而且响应释放键操作（KeyPress只响应按键操作）。 键盘事件彼此不相互排斥。按下某键时将生成KeyDown和KeyPress事件，而松开此键时生成KeyUp事件。当用户按下一个KeyPress不能检测的键时将触发KeyDown事件，松开此键时生成KeyUp事件。若使用KeyUp和KeyDown事件应确保KeyPress事件的功能不够用，通常编写KeyPress事件的代码比较容易。 二、KeyPress事件 在按下与ASCII字符对应的键时将触发KeyPress事件。ASCII字符集代表标准键盘的字母、数字和标点符号以及部分控制键（ENTER、TAB、BACKSPACE键等）。KeyDown 和KeyUp事件能够检测其它功能键、编辑键和光标定位键。当处理标准ASCII字符时应使用KeyPress事件。例如，如果希望将输入到文本框中的所有字符都强制转换为大写字符，则可在输入时使用此事件转换大小写： Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii = Asc(Ucase(Chr(KeyAscii))) End Sub KeyAscii参数返回对应所按键的ASCII代码。 也可通过KeyPress事件识别部分控制键。例如，下述事件过程使用KeyPress检测用户是否正在按BACKSPACE键：
adb shell中模拟键盘鼠标事件
Android自动化测试初探-5:再述模拟键盘鼠标事件（adb shell 实现） 2010-07-28 17:01 上一篇博文中讲述了通过Socket编程从外部向Emulator发送键盘鼠标模拟事件，貌似实现细节有点复杂。其实Android还有一种更简单的模拟键盘鼠标事件的方法，那就是通过使用adb shell 命令。 1. 发送键盘事件： 命令格式1：adb shell input keyevent “value” 其中value以及对应的key code如下表所列： KeyEvent Value KEYCODE Comment KEYCODE_UNKNOWN 1 KEYCODE_MENU 在SDK2.1的模拟器中命令失效，sendevent命令可行 2 KEYCODE_SOFT_RIGHT 3 KEYCODE_HOME 4 KEYCODE_BACK 5 KEYCODE_CALL 6 KEYCODE_ENDCALL
KEYCODE_0 8 KEYCODE_1 9 KEYCODE_2 10 KEYCODE_3 11 KEYCODE_4 12 KEYCODE_5 13 KEYCODE_6 14 KEYCODE_7 15 KEYCODE_8 16 KEYCODE_9 17 KEYCODE_STAR
KEYCODE_POUND 19 KEYCODE_DPAD_UP 20 KEYCODE_DPAD_DOWN 21 KEYCODE_DPAD_LEFT 22 KEYCODE_DPAD_RIGHT 23 KEYCODE_DPAD_CENTER 24 KEYCODE_VOLUME_UP 25 KEYCODE_VOLUME_DOWN 26 KEYCODE_POWER 27 KEYCODE_CAMERA 28 KEYCODE_CLEAR
(完整word版)VB语言基础
V B语言基础 一、数据类型 1、数值型：取值范围：Byte(字节型)━占1字节； 0～255无符号 Integer(整型)━占2字节； -32768～32767 long(长整型)━占4字节； -2147483648～2147483647 single(单精度浮点)━占4字节；略 Double(双精度浮点)━占4字节；略 Currency(货币型)━占8字节小数点左15位，右4位 （精确定点数据类型） 2、逻辑型： Boolean(布尔型)━占2字节； true或false 3、字符串型： String?a?a定长型占字符串长度，变长型再加10 4、日期型： Date(日期型)━占8字节 100-1-1～9999-12-31 5、对象型： Object━占4字节；任何Object引用 6、变体型： Variant━变体型数字占16字节，变体型字符占22字节＋字符串长 注：此类型还包含三种特定值：
Empty；Null；Error； ?7、用户定义的数据类型： ?用户可以利用Type语句定义自己的数据类型。格式如下?Type 数据类型名 ?数据类型元素名As 类型名 ?…… ?End Type ?用Type可定义类似于C语言中的结构体类型。例如：?Type Date_Rec ?RYear As Integer ?RMonth As String*3 ?RDay As Integer ?End Type ?注：记录类型中的元素可以是字符串，但必须是定长字符串，其长度由类型名加上一个星号和常数指明。 ?数据类型转换函数： ?函数名及书写格式转换结果 ?CBool（表达式）布尔型 ?CCur（表达式）货币型 ?CByte（表达式）字节型 ?CDate（表达式）日期型 ?CDbl（表达式）双精度
VC 模拟鼠标和键盘输入
VC 模拟鼠标和键盘输入 - 天下 - 博客频道 - https://www.360docs.net/doc/3c19104925.html, 模拟鼠标点击： 1、这里是鼠标左键按下和松开两个事件的组合即一次单击： mouse_event (MOUSEEVENTF_LEFTDOWN | MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 ) 2、模拟鼠标右键单击事件： mouse_event (MOUSEEVENTF_RIGHTDOWN | MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0 ) 3、两次连续的鼠标左键单击事件构成一次鼠标双击事件： mouse_event (MOUSEEVENTF_LEFTDOWN | MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 ) mouse_event (MOUSEEVENTF_LEFTDOWN | MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 ) 4、使用绝对坐标 MOUSEEVENTF_ABSOLUTE | MOUSEEVENTF_MOVE, 500, 500, 0, 0 需要说明的是，如果没有使用MOUSEEVENTF_ABSOLUTE，函数默认的是相对于鼠标当前位置的点，如果dx，和dy，用0，0表示，这函数认为是当前鼠标所在的点--直接设定绝对坐标并单击 mouse_event(MOUSEEVENTF_LEFTDOWN, X * 65536 / 1024, Y * 65536 / 768, 0, 0); mouse_event(MOUSEEVENTF_LEFTUP, X * 65536 / 1024, Y * 65536 / 768, 0, 0); 其中X，Y分别是你要点击的点的横坐标和纵坐标 模拟键盘输入： [cpp] void EnterString(const char* text) { bool bShift = false; size_t length = strlen(text); for(size_t index = 0;index < length;index++) { int val = text[index]; if(val >= 97 && val <= 122) //小写a-z { val -= 32; bShift = false; } else if(val >= 65 && val <= 90) //大写A-Z { bShift = true;
JAVA模拟键盘鼠标操作
//可以在eclipse下直接运行的示例程序： package key_robot; import java.awt.*; import java.awt.event.*; import javax.swing.JOptionPane; public class key_robot { public key_robot() { } // 鼠标单击,要双击就连续调用 private static void pressMouse(Robot r, int m, int delay) { r.mousePress(m); r.delay(10); r.mouseRelease(m); r.delay(delay); } // 键盘输入方法 private static void pressKeys(Robot r, int[] ks, int delay) { for (int i = 0; i < ks.length; i++) { r.keyPress(ks[i]); r.delay(10); r.keyRelease(ks[i]); r.delay(delay); } } public static void main(String[] args) throws Exception { final Robot rb = new Robot(); new Thread() { public void run() { rb.delay(2000); // 模拟回车 rb.keyPress(KeyEvent.VK_ENTER); rb.keyRelease(KeyEvent.VK_ENTER); } }.start();
VB常用快捷键
VB常用快捷键 窗体设置，控件布局时用: alt+v+x可以快速显示出工具框 Alt+P+N 引用 ctrl+左右键头可以移动控件 shift+左右键头调整控件大小 F7 切换到编辑窗口 Shift+f7 切换代码窗口 开发代码，调试代码都能用的： Ctrl+C复制 Ctrl+V粘贴 Ctrl+X剪贴 Ctrl+F查找 开发代码时用的: Tab 向右推 Shift+Tab 向左推 Ctrl+H 替换 Ctrl+J 呵呵，有点显丑。有几个函数。老要看总是记不住，呵呵（Alt+→）ctrl+home jump to 首行 ctrl+end jump to 末尾 调试时使用的： F5 运行 F8 断点运行 F9 设置/清除断点 Ctrl+G 立即窗口 Shift+F2 到定义处 Ctrl+Shift+F9 清除所有断点 Ctrl+shift+F2 到上次编辑处 Ctrl+PauseBreak 强行暂停程序（专门对付死循环之类的） shift+F9 可以监视表达式 Ctrl+W 编辑监视窗口 Ctrl+n n Enter 偶经常要另开一个程序先做试验，你们可能很少用吧？呵呵以上几个，是我使用中最多的。当然。其它的我也有使用。如:Ctrl+J(所选控件置前),Ctrl+J(所选控件置底),F7，Shift+F4还有那些Windows通用的那些快捷
键:Ctrl+C,Ctrl+V ，哈哈，这二个快捷键，偶好像使用次数。也可以在所有使用快捷中前几名呢!哈哈! 1、F1：显示MSDN帮助。当然你要安装MSDN，否则得不到真正的帮助了 2、F2：显示对象浏览器。这里你可以看到对象的各种属性、方法与事件 3、F3：查找一下个满足条件的内容 4、F4：显示当前选中控件的属性窗体 5、F5：运行程序（https://www.360docs.net/doc/3c19104925.html,则是F8了） 6、F7：由窗体设计切换到对应的代码窗体 7、F8：单步执行程序 8、F9:切换断点 9、Alt+A:打开外接程序菜单 10、Alt+D:打开调试菜单 11、Alt+E:打开编辑菜单 12、Alt+F:打开文件菜单 13、Alt+H:打开帮助菜单 14、Alt+I:打开图表菜单 15、Alt+O:打开格式菜单 16、Alt+T:打开工具菜单 17、Alt+P:打开工程菜单 18、Alt+R:打开运行菜单 19、Alt+U:打开查询菜单 20、Alt+Q:退出 21、Alt+V:打开视图菜单 22、Alt+W:打开窗口菜单 23、Alt+→:根据输入的字符检索出可以使用的关键字 24、Tab:让选中的代码，集休缩进 25、Shift+F2：查看当前光标所在的变量或函数、子过程的定义。这一快捷键很方便，比如程序中有一个 call PubFunction ，你只要将鼠标在PubFunction 任意一处点中，然后按Shift+F2就可以直接转到函数的声明处。 26、Shift+F4:打开属性页窗口，与F4不一样哦 27、Shift+F5:重新启动 28、Shift+F7：由代码窗体切换到对应的窗体设计界面 29、Shift+F8：逐过程单步执行。按过程进行调试 30、Shift+F9:快速监视 31、Shift+Tab:让选中的代码集体凸出
总结Selenium WebDriver中一些鼠标和键盘事件的使用
本文将总结Selenium WebDriver 中的一些鼠标和键盘事件的使用，以及组合键的使用，并且将介绍WebDriver 中没有实现的键盘事件（Keys 枚举中没有列举的按键）的扩展。举例说明扩展Alt+PrtSc 组合键来截取当前活动窗口并将剪切板图像保存到文件。 在使用Selenium WebDriver 做自动化测试的时候，会经常模拟鼠标和键盘的一些行为。比如使用鼠标单击、双击、右击、拖拽等动作；或者键盘输入、快捷键使用、组合键使用等模拟键盘的操作。在WebDeriver 中，有一个专门的类来负责实现这些测试场景，那就是Actions 类，在使用该类的过程中会配合使用到Keys 枚举以及Mouse、Keyboard、CompositeAction 等类。 其次，在实际测试过程中，可能会遇到某些按键没办法使用Actions、Keys 等类来实现的情况。比如通过使用Alt+PrtSc 组合键来实现截取屏幕当前活动窗口的图像，在Keys 枚举中，因为没有枚举出PrtSc 键，所以没办法通过Action 的KeyDown(Keys) 来模拟按下这个动作。 再次是在自动化测试中，可能会遇到一些附件、文件上传的场景，或者是多文件上传，这些在Selenium2.0 之后，可以直接使用WebElement 类的sendKeys() 方法来实现。 下面就分别介绍这些情况的具体使用。 鼠标点击操作 鼠标点击事件有以下几种类型： 清单1. 鼠标左键点击 Actions action = new Actions(driver);action.click();// 鼠标左键在当前停留的位置做单击操作 action.click(driver.findElement(https://www.360docs.net/doc/3c19104925.html,(element)))// 鼠标左键点击指定的元素 清单2. 鼠标右键点击 Actions action = new Actions(driver); action.contextClick();// 鼠标右键在当前停留的位置做单击操作 action.contextClick(driver.findElement(https://www.360docs.net/doc/3c19104925.html,(element)))// 鼠标右键点击指定的元素 清单3. 鼠标双击操作 Actions action = new Actions(driver); action.doubleClick();// 鼠标在当前停留的位置做双击操作
vb操作word详解
vb 操作word 详解 Visual Basic 支持一个对象集合，该集合中的对象直接对应于Microsoft Word 97 中的元素，并且通过用户界面，用户熟悉这些元素中的绝大多数。例如，Document 对象代表了一个打开的文档，Bookmark 对象代表了一个文档中的书签，而Selection 对象则代表了在一个文档窗口窗格中的选定内容。在Word 中，每一类元素－文档、表格、段落、书签、域等等－都可以用Visual Basic 的对象来表示。要在Word中自动执行任务，可以使用这些对象的方法和属性。 关于理解和使用Microsoft Office 97 对象模型的一般性内容，请参阅本书的第二章“理解对象模型” 。在Microsoft Office 97 中的对象模型相当丰富，其中包含了大约180个对象。要查看Word对 象模型的层次关系图，请参阅“帮助”中的“Microsoft Word对象”。要获得对某种特定对象的详细描述，可以在此图中单击该对象的名字，或是在“帮助”的索引中对特定对象进行搜索。 怎样显示Word Visual Basic 帮助 要使用Word Visual Basic 帮助，必须在安装过程中选择“自定义”的安装方式，并且为Word选中“ Visual Basic 在线帮助”复选框。否则，安装程序不会安装Visual Basic 帮助。如果用户已经安装好了Word,那么可以再次运行Setup程序来安装Visual Basic 帮助。 要查看Word Visual Basic 帮助，可以在“ Visual Basic 编辑器里的“帮助”菜单中点击“目录和索引”一项。在“帮助主题”对话框的“目录” 一表中，双击“ Microsoft WordVisual Basic 参考”，然后再双击“ Visual Basic 参考”。“帮助主题”对话框会重新出现，显示出Microsoft Word Visual Basic 的目录和索引。 运用Application 对象 在用户启动一个Word 时段的同时，也创建了一个Application 对象。用户可以使用Application 对象的属性或方法来控制或返回应用程序范围内的特性、控制应用程序窗口的外观或者调整Word 对象模型的其他方面。可以使用Application 属性来返回Word Application 对象。以下的示例从视图状态切换到打印预览状态。 Application. PrintPreview = True Application 对象的一些属性控制着应用程序的外观。例如，如 果DisplayStatusBar 属性为True（真），那么状态栏是可见的，如果
VB 有关鼠标的操作
VB 有关鼠标的操作 假如没有鼠标，电脑的普及率绝对没有目前这么高。在windows下，鼠标的作用不亚于键盘。因此，在VB中设计基于windows下的应用程序，鼠标的操作和设计是非常重要的。 一、鼠标的移动、按键事件 要想在VB程序中自如应用鼠标，先要了解有关鼠标的事件，并学会如何编写这些事件过程。最常见的鼠标事件有： 当在某个对象上移动鼠标、按下鼠标按键、释放鼠标按键时均会触发鼠标事件，它们分别是：MouseMove、MouseDown、MouseUp。 这三个鼠标事件过程均会返回四个参数：Button As Integer, Shift As
具体解释如下： 1、 MouseDown事件 当单击鼠标上的任何一个按键之后，都会引起MouseDown事件。许多对象都有这个事件。如用鼠标在窗体上单击，可以引发这个事件，用鼠标单击“按钮”“标签”“文本框”等对象也可以引发这个事件。该事件还带回来不少参数，下面是鼠标单击窗体任何位置所引发的MouseDown事件，单击其它对象所带回的参数与此相同： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Integer,Y As Integer) End Sub 其中： （1）、Button参数 Button参数带回来的信息是用户按了鼠标上的哪能一个键，左键？右键？还是中间键？ Button=1，说明用户按的是鼠标的左键； Button=2，说明用户按的是鼠标的右键； Button=4，说明用户按的是鼠标的中间键； （2）、Shift参数 Shift参数带回来的是用户按鼠标按键时是否同时按下了键盘上的Shift、Ctrl、Alt键。 Shift=1，说明用户在按下鼠标按键的同时，还按下了键盘上的Shift键；Shift=2，说明用户在按下鼠标按键的同时，还按下了键盘上的Ctrl键；
USB模拟鼠标与键盘使用说明
第一章使用说明 1.1 功能简介 本例程是用实验板来模拟鼠标或键盘，即将相关程序下载到单片机，并将学习板与电脑通过U口连接后，本学习板可以当作U口的鼠标或者键盘来用。 其中能够模拟实现的鼠标功能为：鼠标左移、右移、上移、下移，鼠标左键按下和右键按下。 能够模拟实现的键盘功能为：数字1和2的键入、SHIFT和ALT功能键的键入、大小写切换和小键盘数字键功能的键入。 本例程共用到学习板上的六个按键，位于矩阵键盘左上角的S6、S7、S10、S11、S14和S15。 1.2鼠标的信息说明 将UsbMouse.hex文件下载到单片机中，且之后保证USB1口（位于学习板左上方）与电脑的U口处于连接状态（USB1口即为TX-1C开发板的U口）。 稍等片刻，便会先后在电脑屏幕的右下角出现下面两个提示（此提示只在第一次安装时出现）： 图1.1 系统发现新硬件提示 图1.2安装成功提示 右键单击“我的电脑”，选中“管理”项，点击并进入，在其左侧的项目栏里点击“设备管理器”，便会发现其中多了如下一个设备，也就是我们的TX-1C开发板所模拟的鼠标，如图1.3所示。
图1.3 设备描述显示 双击“USB人体学输入设备”，会弹出如图1.4和图1.5的属性描述 图1.4 属性描述---常规选项卡
图1.5 属性描述---详细信息选项卡 1.3 鼠标的使用说明 在使用USB模拟鼠标与键盘功能之前，请确保将芯片PDIUSBD12左侧的两根插针用跳帽连接起来（这两根跳帽是用于芯片PDIUSBD12向单片机发出中断的连接线）！！！ 总共使用到的矩阵键盘中的六个按键的功能分别如表1.1所示 据此， 面上实验一下，体会自制鼠标的乐趣。 1.4 键盘的相关说明 将文件夹“键盘实例”中的UsbKeyboard.hex文件下载到单片机中，并通过USB 线将TX-1C学习板与电脑U口连接后，同样会出现如图1.1.、图1.2类似的安装信息（也是在第一次安装时提示，以后都不再提示，除非更改程序中的相关设备描述信息，让电脑以为是一个以前从未连接过的设备连接了。）同样的打开设备管理器，也可以找到如图1.3、图1.4、图1.5类似的信息。在此就不再赘述了。下面列出相关按键的功能，如表1.2所示。