当前位置：首页 -> 技术开发 -> 程序开发 -> 用Visual Basic设计更好的用户界面

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

时间： 2021-07-31 作者：daque

有时更多的控件出现在窗口中，如果可以推荐用户应该下一步的内容，它不会丢失。在visual basic的编程中，我们可以使用语句：object.setfaocus允许我们获取对输入焦点的控制，例如：我们将按钮命令1和文本加入text1，双击按钮控件，然后键入以下内容代码：text1.setfocus按f5再次运行，您将看到一个单击按钮，文本框将立即获取输入焦点。此外，我们还可以使用语句：sendkeys“{{jab}”以使下一个控制焦点，但我们需要在设计时确定每个控件的索引值。（在“属性”窗口中）让控制您已完成，并且活动将使焦点使用户感到智能，并且还可以减少出错的机会。但是，当焦点开关的两个控件被一定距离分开时，上述方法有时不足以导致用户的注意力，那么一个好的解决方案是将鼠标箭头移动到控制。不幸的是，vb不支持鼠标移动，然后我们将帮助api函数，api函数setcursorpos允许我们愿意。这是subroutine movecursoron，它允许鼠标移动到指定的控制上方。以下代码放在声明部分中：键入pointapi x作为整数y作为整数末端类型声明子setcursorpos lib“用户”利用yval x为整数，byvalÿ作为整数）申报子clienttoscreen库“用户”（byval hwnd作为整数，ippoint作为pointapi）声明函数的getparent库“用户”（byval hwnd作为整数）作为整数，并创建一个新的子程序（alt + ñ→ñ→类型子程序movecursoron，下面是子程序的代码：sub movecursoron（源as控制）昏暗pt作为pointapi昏暗设定hparent as整数px =（source.t + source.width / 2）/screen.twipspixel）py = （source.top + source.height / 2）/screen.twipsperpixel）设定hparent =的getparent（source.hwnd）clienttoscreen设定hparent铂setcursorpos pt.x pt.y end sub使用该子程序是容易的，例如，我们想要移动鼠标按键command上，您将使用command上的发言移动光标，你会看到鼠标箭头已经指向按钮逗号nd1。应该指出的是，不滥用子程序。让鼠标爆炸上面，我们的用户将失去对应用程序的控制，这违反了我们原始的意图。在一个带有多个输入框的窗口中（在数据库应用程序中非常典型），当用户完成第一个输入框输入时，总爱习惯性地增加了回程，我希望进入下一个焦点。在输入框（大多数在dos中的应用程序）中，它通常需要违反，这个总线触发了一个默认功能的按钮，结果未关闭，它也是一个窗口。用户用大眼睛看屏幕，“嘿？我做了什么？”这是窗户经常遇到的东西。解决它实际上是简单的，只需在输入框的按键事件中添加以下代码：如果keyascii = 13那么keyascii = 0 sendkeys“{tab}”结束如果此，当用户在此输入框中键入时，它是就像键入选项卡键时，将焦点移动到下一个控件。但是，重要的是要注意，此方法不适合多行文本框，即当textbox的multiline功能设置为true时，由于返回按钮是线的角色。

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

相关推荐

推荐下载

热门阅览

最新排行