1用编辑框控件做个

vb用户控件制作讲解与实例1.定义控件的属性、事件和方法，其中属性是最常使用的。

2.保存和读取中间用户设置的属性值。

3.为达到你的预定目的而调用的各种技术手段。

在用户控件中定义的属性、事件、方法，其性质都必须是公用的，也就是说，只有用Public 来定义，这样你才能在主程序代码中使用这些事件和方法，以及设置或获取这些属性值，也只有公用的属性才会在窗体页面相关控件的属性窗口显示出来。

一、属性属性是用户控件最基本的东东，用户控件可以没有事件，可以没有方法，但不能没有属性（当然，技术上来说是可以没有属性的，但这样的控件使中间用户无法进行任何设置，是没有什么意义的）。

那么，如何定义用户控件的属性呢？为用户控件添加属性有两种办法：1.公用变量法：public 变量名称as 类型这里的变量名称就是属性名称。

这样定义的属性一般不会保存属性值，所以常常用作只读属性，在笔者的用户控件中，用于对主程序返回一个必要的值。

例如“四则运算”控件中的“ComputeAnswer”属性：Public ComputeAnswer As String它返回的是计算结果，而计算结果是不需要保存在控件中的，所以把它用公用变量法定义。

再例如消息框控件中的FeedValue 属性：Public FeedValue As Integer '返回值它返回最终用户选中的消息框按纽的编号，这个编号也只需要在主程序中处理，而无需保存在控件中，所以也用公用变量法定义成只读属性。

2.property 过程法：public property Get 过程名称() as 类型……end propertypublic property Let 过程名称(new值as 类型)……end property这里的过程名称就是属性名称。

而property 过程法又有两种：一种是如上所述的标准过程法，另一种就是枚举法。

㈠标准过程法这是用得最多的一种属性定义方法。

第十章常用的表单控件VFP在面向对象开发环境中，是通过在表单上放置控件来完成信息的输入设计工作的。

在设计表单时可以使用两类控件：与表中数据捆绑的控件和不与数据捆绑的控件。

所谓捆绑控件是指当输入或选择的值要保存或者被引用时，就需为该控件设置一个数据源，数据源可以是表中的字段或变量。

对于数据源是变量或字段的控件，则需要设置控件的ControlSource 属性；若数据源是整个表中的数据，则需要设置RecordSource属性。

而非捆绑控件则不与数据源直接捆绑。

10.1 标签控件（Label）标签控件：它是一个显示文本图形的控件，在设计时可以直接修改其中的文本，标签具有自己的一套属性、事件和方法，能够响应绝大多数鼠标事件，可以在运行时动态地改变标签文本。

可以使用TabIndex属性为标签指定一个Tab次序，但标签并不能获得焦点，而是将焦点传递给Tab 键次序中紧跟着标签的下一个控件。

常用的标签属性：①Caption属性用于指定标签的标题文本，最多可包含的字符数量为256。

标签文本显示在屏幕上以帮助用户识别各个对象。

用户在产生表单或控件对象时，系统给予对象的Caption属性值和Name属性值是相同的，此时用户应特别注意它们的区别。

用户在为控件设置Caption属性时，可以将其中的某个字符作为热键，方法是在该字符前插入一个反斜杠（\）和一个小于号（<）。

②AutoSize属性该属性用于确定是否根据标题的长度来调整标签的大小。

③Alignment属性该属性指定标题文本在控件中显示时的对齐方式。

对于不同的控件，该属性的设置是有区别的。

对于标签，该属性的设置值如下表所示。

设置值说明0（默认值）左对齐，文本显示在区域的左边1右对齐，文本显示在区域的右边2中央对齐，将文本居中排放，使左右两边的空白相等④BackStyle属性该属性用于确定标签是否透明。

当标签控件完全处于另一个控件的上方时，标签将遮住下方的控件，此时若标签控件的BackStyle属性设置为0，则下方的控件将透过标签显示出来。

EXCEL的控件工具箱应用介绍:1）启动窗体视图>>工具>>选窗体>>出现（图1）>>选中一个窗体后，鼠标指针会变成小小的十字叉，按住鼠标左键拖动到恰当位置后松开，即可将窗体插入到EXCEL编辑区中。

图12）窗体作用：窗体分别为:标 签 框:它用于表现静态文本。

分 组 框:可将插入到EXCEL中的窗体进行分组，被它圈起来的窗体域形成一个组。

命 令 按 钮：可将一段宏代码指定给一个命令按钮，今后，只要单击它，宏代码就会运行，完成很复选框和选项按钮：相信大家对此并不陌生，我们在WEB 页面上注册时，经常会遇到这两个东西， 列表框和组合框：单击它能弹出一个下拉菜单，让用户能过简单的操作就可以选择对应的项目。

滚动条和微调项：单击之，能按设定的起、止值和步长（每单击一次的变化量）使某单元格的值增大控制属性和编辑代码：只有在有窗体域被选中时，这两个按钮才可用。

顾名思义，利用它可对前面的3）：应用窗体复选框实例(a).在B50、51、52、53单元格中插入一个复选框，插入后，它的默认名称为“复选框XX”（XX 表示插EXCEL编辑区中的第几个复选框），右击，选择“编辑文字”可对默认名进行更改。

A、B、C、D。

（见：图2）(b).右击该复选框，选择“设置控件格式”，在打开的对话框中选择“控制”选项卡。

在“单元格链”后输入$B$50，确定后退出。

今后，我们只要选中该复选框，D3单元格就会自动填入“TRUE”；取对该复选框的选择，D3单元格中就自动填入“FALSE”。

换言之：选中B50与否从E50可以知B51、B52、B53输入按B50方法。

欢迎转载,请注明出处.由于本人水平有限,难免有错,错误之处希各位给予指正.EXCEL 看电视很有娱乐性,推荐各位试一试,有意想不到的收获!多项选题实例图2选项资料输入答案总分得分1、少于10的数是3119FALSE 9FALSE 3FALSE 7FALSE单项选题实例图3选项资料输入答案总分得分2、9加9的和是4DB2191816134):日历控件实例(EXCEL自带)视图>工具栏>控件工具箱>其它控件>选日历适用于office2003,其它版本未测试过.5):文本框控件应用实例(数值累加)制作方法:视图>工具栏>控件工具箱>选ab文本框,双击Private Sub TextBox1_DblClick(ByVal Canc '获取原始数值oldvalue = Val(TextBox1.Value)点击则可以进行累加!A B DA B C DC 262728293031123456789101112131415161718192021222324252627282930123456'获取新出库数量inputvalue = InputBox("请输入金额,按ENTER '累加结果TextBox1.Value = oldvalue + inputvalue End Sub6):组合框控件应用实例方法一选择省份方法二选择省份:7):用EXCEL看电视应用实例EXCEL播放电视的方法如下:1.插入对象>选windows Media Player>双击屏幕>属性>在URL输入:mms:///live1即可!2.立即试一试,工作之余看一看电视轻松一下不失为一个好33.如果你要看其它台,请输入该台的地址即可了!4.在启动电视播放过程中要耐心等候,快慢要视乎网络未完待续变成小小的十字叉，按住鼠标左体域形成一个组。

今天跟大家说的是绑定窗口的各种方法及适用类型.(以下所有的大漠命令函数名都为dm,大漠调用命令为#import "dm.dmsoft" dm)大漠绑定窗口命令BindWindow(窗口句柄,display,mouse,keypad,mode)(详细的大漠绑定窗口命令函数定义请自行参考大漠帮助文档)首先我们要知道一个窗口的后台操作就一定需要绑定窗口,而绑定窗口就一定需要获取窗口句柄,那么我们应该怎么获取游戏窗口的窗口句柄呢?方法有很多种,大家就要根据需要去选择一种最适合的.(注:每一次打开窗口,窗口句柄都是不同的,并不是窗口标题相同窗口句柄就相同)下面我给大家列举几种最常用的方法并简单分析一下利弊.//绑定窗口方法一:用编辑框来获取窗口标题绑定窗口整型文本长度,窗口句柄,是否成功字符型编辑框内容编辑框内容=编辑框.获得文本("编辑框0")文本长度=字符串.长度(编辑框内容)如果(文本长度==0)辅助.消息框("请输入窗口标题!")否则//窗口句柄=窗口.找到窗口(编辑框内容) //TC命令窗口句柄=dm.FindWindow("",编辑框内容)是否成功=dm.BindWindow(窗口句柄,"normal","normal","dx",0)如果(是否成功==0)辅助.消息框("窗口绑定失败!")否则辅助.消息框("窗口绑定成功!")如果结束如果结束//方法一结束方法一首先要在界面上设置一个编辑框的控件.而当我们要获得一个游戏窗口的窗口句柄就需要把该游戏窗口的完整标题输入到编辑框里(游戏窗口标题可以用AB抓抓获取)比如我们要获取名为1.TXT的记事本窗口的窗口句柄方法一优点:准确率高方法一弊端:一般只适用于单开,不智能,需要手动输入//绑定窗口方法二:用鼠标所在窗口句柄命令获得窗口句柄整型窗口句柄,是否成功//窗口句柄=窗口.鼠标所在窗口句柄() //TC命令窗口句柄=dm.GetMousePointWindow()如果(窗口句柄==0)辅助.消息框("没有找到!")否则是否成功=dm.BindWindow(窗口句柄,"normal","normal","dx",0)如果(是否成功==0)辅助.消息框("窗口绑定失败!")否则辅助.消息框("窗口绑定成功!")如果结束如果结束//方法二结束从命令我们就可以知道,该命令获取的是鼠标所在窗口的窗口句柄.通俗点来说就是鼠标点击在哪个窗口我们获取的就是哪个窗口的窗口句柄.方法二优点:比较智能,可以自动获取窗口句柄,算是最常用的方法方法二弊端:只适用于单开,易出错,比如只绑定子窗口.必须要进入游戏后使用热键开启脚本//绑定窗口方法三:用顶层窗口命令获得窗口句柄整型窗口句柄,是否成功//窗口句柄=窗口.顶层窗口句柄() //TC命令窗口句柄=dm.GetForegroundWindow()如果(窗口句柄==0)辅助.消息框("没有找到!")否则是否成功=dm.BindWindow(窗口句柄,"normal","normal","dx",0)如果(是否成功==0)辅助.消息框("窗口绑定失败!")否则辅助.消息框("窗口绑定成功!")如果结束如果结束//方法三结束方法三类似于方法二,顶层窗口通俗来说就是置顶的窗口,激活的窗口.方法三优点:准确率高,比较智能,可自动获取窗口句柄方法三弊端:只适用于单开,必须要进入游戏后使用热键开启脚本//绑定窗口方法四:用枚举命令获得窗口句柄整型长度,是否成功,窗口句柄,下标,大小字符型[] 数组=字符型[100]//定义一维数组,长度100,我想100开够了吧下标=0//下标起始值为0//字符型句柄=系统.枚举("记事本",0) //TC命令字符型句柄=dm.EnumWindow(0,"记事本","",1+4+8+16)//这句是获取到所有标题栏中有"记事本"这个字符串的窗口句柄集长度=字符串.长度(句柄)//得到窗口句柄集的长度如果(长度==0)//判断如果窗口句柄集的长度为0说明没有找到窗口辅助.消息框("没有找到窗口")否则//如果窗口句柄集的长度不为0说明找到窗口了辅助.消息框(句柄)//从弹出的消息框我们可以看到窗口句柄集的格式为以逗号分隔的数字组// 冷月无痕原创,转载请注明出处,谢谢!联系QQ:305289669字符串.分割(句柄,",",数组)//那么我们用分割命令把窗口句柄集分割并赋值到数组里数组.大小(数组,大小)//得到数组的大小循环(下标< 大小)//使用循环来分别绑定每一个枚举出来的窗口,并定义循环的条件为下标小于数组大小,当下标大于等于数组大小时停止循环)辅助.消息框(数组[下标])//从弹出的消息框我们可以看到数组里的窗口句柄值窗口句柄=转换.字符型转整型(数组[下标],0)//因为数组里的窗口句柄值是字符型的所以这里要转换为整型是否成功=dm.BindWindow(窗口句柄,"normal","normal","dx",0)//绑定窗口,如果(是否成功==0)辅助.消息框("窗口绑定失败!")否则辅助.消息框("窗口绑定成功!")如果结束下标=下标+ 1//这里给下标加一,递增循环结束如果结束//方法四结束方法四优点:比较智能,可以自动获取窗口句柄,多窗口绑定,适用于多开多线程方法四弊端::并不是万能的,也有枚举不出的窗口以上绑定窗口命令图色获取模式为前台,鼠标模拟模式为前台,键盘模拟模式后台当然,获取窗口的方法还有很多,比如类名,进程等,这里就不一一举例了,相信大家可以举一反三灵活运用.注意事项:绑定之后,所有的坐标都相对于窗口的客户区坐标(不包含窗口边框)另外,绑定窗口后,退出脚本前,必须加以下代码,以保证所有资源正常释放,也就是解绑窗口dm.UnBindWindow()另外绑定dx会比较耗时间,请不要频繁调用此函数.另外如果绑定的是dx,要注意不可连续操作dx,中间至少加个10MS的延时,否则可能会导致操作失败.比如绑定图色DX,那么不要连续取色等,键鼠也是一样.注意,图色dx,鼠标windows2 dx dx2以及键盘dx都需要管理员权限才能运行,所以对于WIN7和VISTA用户,在启动目标窗口时,必须用管理员方式启动,否则无法绑定成功！还有一点特别要注意的是,有些窗口绑定之后必须加一定的延时,否则后台也无效.一般1秒到2秒的延时就足够.发现绑定失败的几种可能(一般是需要管理员权限的模式才有可能会失败)1. 系统登录的帐号必须有Administrators权限2. 如果是vista和win7系统，启动窗口进程必须用管理员模式启动，脚本也必须用管理员模式启动.3. 一些防火墙会防止插件注入窗口所在进程，比如360防火墙等，必须把dm.dll设置为信任.4. 还有一个比较弱智的可能性，那就是插件没有注册到系统中，这时CreateObject压根就是失败的. 检测对象是否创建成功很简单，如下代码逻辑型是否成功是否成功=辅助.是否注册("dm.dmsoft")如果(是否成功)辅助.消息框("插件已注册")否则辅助.消息框("创建对象失败,检查系统是否禁用了vbs脚本权限")如果结束5. 在沙盘中开的窗口进程，绑定一些需要管理员权限的模式，会失败。