说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用Visual Basic设计更好的用户界面

HTML文档下载 WORD文档下载 PDF文档下载
用Visual Basic设计更好的用户界面
有时在一个窗口中出现较多的控制件时,如果能向导式地建议用户下一步该做什么,不失为上策。

在Visual Basic的程序设计中,我们可以使用语句:Object.SetFaocus使我们希望的控件得到输入焦点,举个例子:在Form1中我们加入一个按钮Command1和一个文本输入Text1,双击按钮控件,然后键入如下代码:

Text1.SetFocus

再按F5运行程序,您就会看到一单击按钮,文本框会立即取得输入焦点。另外,我们还可以使用语句:Sendkeys "{TAB}"使下一个控件获得焦点,但我们需要在设计时确定各控件的Index值。(在Properties窗口中)让控件自己感知自己的工作已完成,而主动将焦点让出,会使用户觉得应用程序很聪明,也减少了用户出错的机会。

可是当焦点切换的两个控件相隔有一定距离时,上述的方法有时也不足以引起用户的注意,那么一种好的解决方法是将鼠标箭头也移到控件上。可惜,VB并不支持鼠标移动,那我们就求助API函数,API函数SetCursorPos可让我们如愿。

下面是子程序MoveCursorOn,它可让鼠标移动到指定控件上方。

下列代码请放在declarations段中:
 
Type PoinTAPI

x As Integer

y As Integer

End Type

Declare Sub SetCursorPos Lib "User"(Byval x As Integer,Byval y As Integer)

Declare Sub ClientToScreen Lib "User"(Byval hwnd As Integer,IpPoint As PointAPI)

Declare Function GetParent Lib "User"(Byval hwnd As Integer)As Integer

然后建立一个新的子程序(ALT+N→N→键入子程序名MoveCursorOn),下面是子程序的代码:

Sub MoveCursorOn(source As Control)

Dim Pt As PoinTAPI

Dim hparent As Integer

p.x=(Source.Left+Source.Width/2)/Screen.Twipsperpixel)

p.y=(Source.Top+Source.Height/2)/Screen.Twipsperpixel)

hparent=GetParent(source.hwnd)

ClientToScreen hparent pt

SetCursorPos pt.x pt.y

End Sub

使用该子程序很容易,例如我们想把鼠标移动到按钮Command1上,就可使用语句

Move Cursor On Command1

您会看到鼠标箭头已经指着按钮Command1。

需要说明的是,千万不要滥用该子程序。让鼠标自己满屏乱飞,我们的用户会感到失去对应用程序的控制,这是违反我们的初衷的。

在有数个输入框的窗口中(这在数据库应用程序中是很典型的),当用户完成第一个输入框的输入后,总爱习惯性的加一个回车,希望输入焦点落到下一个输入框中(DOS中大多数应用程序是如此),可往往事与愿违,这一回车却触发了拥有Default特性的按钮,结果不是关闭了当前窗口就是又蹦出另一窗口。用户睁大眼睛看着屏幕,“咦?!我到底做了什么?”这是Windows新用户经常遇到的事情。

解决它其实很容易,只需在输入框的KeyPress事件中加入如下代码:

IF KeyASCII=13 Then

KeyASCII=0

Sendkeys "{TAB}"

END IF

这样,当用户在这个输入框中键入Enter时,就象键入TAB键时,焦点被移到下一控件上。但需注意,这种方法不适用于多行的TextBox,即TextBox的MultiLine特性设为True时,因为这时的回车键是起换行的作用。
APK文件格式分析,Android反编译入门(一) ApiDemos中的Android Widget例子解析 APK签名导出向导 - Use the Export Wizard 剖析Android自带Widget - Music播放器 剖析Android自带Widget - Clock指针钟表 C#取得Excel工作簿工作表名称 C#中用Automation自动化方式对Excel的操作 VB如何打开或保存为有密码保护的Excel sheets工作表 VB在Excel表格文件中搜索指定内容 VB复制Excel表到另外一个Excel中 Java实现生成网站快照缩略图片 php实现生成网站快照缩略图片 C#实现生成网站快照缩略图片 VB比较两个Excel表格的内容 VB实现Excel按列或行排序 VB删除EXCEL表格指定行 用vb.net写的验证码识别代码 VB删除EXCEL表格指定列 Oracle数据库Windows 2003环境自动备份批处理 VB通过ADODB连接EXCEL表格文件读取数据 使用VBScript卸载软件 Discuz X2用户注册过程SQL Android手机参数表 用jQuery改变图片(image src) 用std::atomic實現簡單的讀寫鎖 ChinaPay网上支付网关.NET开发 VOB生成IFO文件用nero刻录DVD详解 15款开源Android游戏引擎(安卓免费游戏引擎) 将MVC ASPX转换到Razor视图 Word设置目录简明教程 asp.net mvc页面javascript代码中如何使用razor 不难的问题,请帮忙!! 如何改变ASP.NET Web应用程序生成的项目的位置?? 如何在JBuilder7中连接远程MS SQL2k数据库? 为什么在x-win32的窗口中,不能使用KDevelop,创建QT工程?? 数据源的连接问题?急!急!急!急!急!急!急!急!在线等待! paradox7表有没有最大记录数或最大容量?! 请问safety-critical systems是什么系统? 为什么<textarea>会有字数限制,我写了超过330个字符就不能提交表单了。 看看吧,想改變這种現象!!<marquee>能移動內容,但它移動時有空白(要等全移完后才又重新移)能否不要這中間的空隙。 那里有 netapi32.dll 中所有的函数及结构体的Delphi版定义? 在ASP里怎么能才让字符的ASC2码值加一。比如a加一之后等于b 谁有ehlib和fastreport的使用资料,哪下载??? 有关排序的问题? 高分相送!,求地税信息化方案 一个java程序,怎么写不进去?等待…… SOS!!! 是显卡的问题吗? 挂接的Fat32文件系统文件名为乱码 Linux 下的 中文输入法 十分奇怪的问题,win2000下编辑框粘贴文本出错。 为什么我的iis打不开了?(在线等待) win2000下 “内存指令不能读” 的错误怎么解决???? 问用ASP+SQL SERVER的朋友一个问题。在线等待。。 Web Services 的客户端和服务器能不能双向通信 98里的IIS服务在哪里停掉! 怎样在同一系统中既做服务器又作客户端?谢谢! 喜欢的女孩,交往半年后才知道大我2岁,郁闷!大家说该怎么办??? 怎么样用create函数创建一个窗口,用来显示提示信息 有两天没加可用分了,大家是没感觉,还是无所谓?我要饿死了,救命……来者有分! 用PHP如何在取得了属性drwxrwxrwx之后,判断是否为可删除? 在VC中,用quickwatch看vector变量时,怎么只能看到装在容器里的第一个变量 状态栏问题 如何使鼠标移到输入框上,输入框里面的字就会成 被选择 状态? 五百里加急(分不够另给) 与 硬件 有关 怎样配置root启动菜单~???~ [求助][急]关于SQL语句优化 高分求IBM WebSphere Application Server 高级版! 经常上csdn上的哥们把照片亮出来啊:) 在asp.net(用vb)中怎么连接ORACLE数据库? 从页面A转到页面B后,再从B转到A,怎样使A中控件的显示仍保持?即类似注册失败时返回,其他资料仍存在,仅密码需重输。 关于调色板管理器和动画的问题 请问如何使文本框处于选择状态(蓝底白字) J2EE 1.4 beat发布了。 找沈阳教VB的老师 MDI框架中如何判断是否有已经打开的窗口? 怎么给分呀? CString 问题 www.linuxforum.net怎么上不去了? 急!!!!在COM中的初级数据类型问题! oracle数据库连接问题!!! 有没有DirectX 8.1 SDK可下载! 公共英语三级考的内容是全国统一吗 they come from Canada同义句they ( ) ( ) Canada还有一题,你还想买其它的什么蔬菜吗?()()vegetables do you want to buy 可乐鸡翅怎么做啊 【改写同义句】1.We can change the ice into water.We can ____ the ice ___ water.【改写同义句】1.We can change the ice into water.We can ____ the ice ___ water.2.The book contians many interesting stories.The book ___ many interesting sto 公共英语三级,有用吗?有什么用哦? 公共英语三级试题 water can change是什么意思water is _____0摄氏度 water is_______100摄氏度.water can also change into雪花 雾 雨_____ ____ ________There is water in the水潭 小溪 大海_____ _____ _____Water is usefulPeople uae water to:倒水________ 动词在什么时候加ing?我是初一上册的 最好讲得简单点,易懂点 可乐鸡翅怎么做最好吃?听说可乐鸡翅,很好吃, The boy( )a strong young man three years later A.grewup B.change into C.made into D.grew into Mike comes from America.He is twelve.His father,Mr Brown,works in a big factory in Beijing.Hismother,Mrs Brown, 2014年报考公共英语三级需要什么证件 they can change water into ice怎么改为被动句? A Happy Family Mike comes from America.He is twelce .His father Mr.Brown works in a big shop in bA Happy FamilyMike comes from America.He is twelce .His father Mr.Brown works in a big shop in beijing.Mike has a sister.her name is Kate.she is only fou 如何做可乐鸡翅用哪种可乐,有哪种材料,怎样做. Put four different letters into three postboxes,How many different ways are there? they only knew 的地址 take a class 怎么翻译 英国工业革命开始和完成的主要标志是1改良蒸气机的制成2珍妮纺纱机的发明3蒸汽机的问世4机器制造业的建立和发展A12B34C24D13 the boy is from America同意句改写 跪求If They Only Knew-The 3Rd Storee歌曲链接 你的男朋友帅吗?用英语怎么说 Is the boy from America?(同义句改写)__________ the boy ________from America? Mr.Lee,who won in a lottery,earned 1 million dollars from a lottery after payment of individual income tax for this event.With the amount of money,he purchased a grocery at a price $600,000 on January 1,2002,the grocery,which including inventories am 英语翻译世界上有一种最美丽的声音,那便是母亲的呼唤.(但丁)母爱是世间最伟大的力量.(米尔)世界上的一切光荣和骄傲,都来自母亲——高尔基慈母的胳膊是慈爱构成的,孩子睡在里面 the boy is from america什么意思 Income statement and retained earnings statement.Malone Corporation's capital structure consists of 50,000 shares of common stock.At December 31,2007 an analysis of the accounts and discussions with company officials revealed the following informatio 高尔基名句 没有任何力量比知识更强大,用知识武装起的人不可战胜 英文翻译 Amy comes from America对划线部分(America)提问 B.H.Marina rents one hundred slips in a large dock to owners of small boats in the area.The trial balance of B.H.Marina on December 31,the end of the current fiscal year,is presented below:[Trial Balance] 如图:Required:1) Enter the trial balance ac they come from (English )对括号词语提问 全国公共英语三级怎么考呀? Mini-CaseVictoria Getz,a college sophomore ,has been seeking ways to earn extra spending money.As an active sports enthusiast,Victoria plays tennis regularly at the Georgetown Golf and Tennis Club,where her father has a family membership.The presiden 英语选择:------come from------------.They speak-------------.A.German,Germany,GermanB.Germans,Germany,GermanC.Germany,German,GermanD.Germans,Germany,Germans求解题原因 2010全国公共英语三级什么时候可以考 懂英文的请进来帮帮忙!I give face , , But you can’t face 中文什么意思女友写QQ签名上的 英语填空:They come from Germany._______Germans 评价1832年英国议会改革 英语翻译“某某(名称)”科学研究会所应该怎么翻译? Look ,here ____ the famous football player .A.is coming B.comes这道题为什么选B? There______ a poster and four pictures on the wall ________ my bedroom.A is;in B is;of 懂英语的请进来.~~~~~~英语的语法是怎样的形式..能指点下我吗?还有一些介词的用法,in,on,for,of...详细的用法,请指点下 make up one's mind mind 是可数的吗? He comes from America.换一种说法He comes from America.He is a -------- --------America.The boy is very young and he can't carry the heavy box.The box is --------heavy for the boy ------- carry. 懂英语请进来帮帮忙1.They found someone ____(fish)on the lake when they passed.2.We has a lot of fun ____(sing)Beijing Opera.(用所给动词的正确形式填空) i ’ d like three ( ),plesse.a是water b是glasses of water c是glass of water.Mrs.green would like to buy ( a是three pieces papers b是 three pieces paper baby,snore,be,have,wife1、listen!the man is( ).2、what lovely ( )they are!3 Jim comes from America,does not he? 懂英语的请进来帮忙!Danny 【daeni】 中间那个元音ae不是念“唉”吗那么这个名字Danny ,中文翻译过来是丹尼,用英文念是呆尼,还是丹尼,英文发音比较接近“丹”还是“呆”?我念起来怪怪的, “最后我们胜利了”怎么用in the end造句啊 如题 he comes from America 哪个是谓语 She sits ____ a quiet place and watch what Beijing is___ 用正确的介词填空. hold a meeting 和run a meeting有什么区别如题 Maybe he comes from America.He___ ___from America.我填的是may be. hearing what she said,i sighed_______ relief and brightened up at once.空格填介词 hold a meeting 和run a meeting有什么区别 I don't know that he comes from America.是什么句型?虽然没有悬赏,但求求你了谢谢 What is Han Mei doing?She__(talk) to her grandfather on the phone Don't call me __now.I'm having a meeting 全国英语三级(PETS)重要吗?难吗?想报三级,听说考出来的证不是很重要,想问下? 请问公共英语三级 考哪些内容、题型.怎么样才能通过
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘