让VB在程序中显示错误行

2016-02-19 16:33 24 1 收藏

今天图老师小编给大家精心推荐个让VB在程序中显示错误行教程,一起来看看过程究竟如何进行吧!喜欢还请点个赞哦~

【 tulaoshi.com - 编程语言 】

以下代码行假设你在文本框中显示错误行,这些代码稍加更改就可以适用其他范围。

  首先,在窗体中建立一个“线”控件,并把它的索引号定为0。接着,添加如下的代码:

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

PrivateSubSetErrorState(ByValErrorStateAsBoolean,_
  ByRefControlAsControl)
  OnErrorResumeNext
  LoadlinError(Control.Index)

WithlinError(Control.Index)
  Set.Container=Control.Container
  .X1=Control.Left
  .X2=Control.Left Control.Width
  .Y1=Control.Top Control.Height 10
  .Y2=Control.Top Control.Height 10
  .BorderColor=vbRed
  .Visible=ErrorState
  EndWith
  EndSub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

  以上程序将会在一个控件数组中建立新的线以匹配引入的控件。然后,设置线的容器以处理标签控件中的文本框。它设置了线的位置和颜色,如果ErrorState为True,线为可见。

在文本框的Validate事件添加以下代码,以调用SetErrorState方法:

IfText1(Index).Text="1"Then
  注释:==Valid
  CallSetErrorState(False,Text1(Index))
  Else
  注释:==Invalid
  CallSetErrorState(True,Text1(Index))
  EndIf

  相比于信息对话框,使用行来显示错误状态很少打断开发人员的编程思路,并且这一方法很容易学会。

->

来源:https://www.tulaoshi.com/n/20160219/1612411.html

延伸阅读
OLE自动化是不同应用程序之间进行通讯的一个标准。OLE自动化的工作方式是:通讯被动方(OLE服务器)应用程序向通讯主动方(OLE客户机)应用程序提供一个以上可供其调用的OLE自动化对象类型,OLE客户机通过引用这些对象实现对OLE服务器的调用,然后通过设置对象的属性和使用对象的方法操纵OLE服务器应用程序,完成两者之间的通讯。 Visu...
由于API过程存在于VisualBasic应用程序之外的文件中,在使用时必须指定过程的位置和调用参数。可以用Declare语句提供这类信息。在声明了API过程之后,可以把它当做VisualBasic自己的过程使用。 如果在VisualBasic中直接调用API,那么VisualBasic环境下固有的安全机制将受到不利影响。这意味着在测试和调试程序时可能会遇到更多的系统故障...
在程序设计过程中,如何轻松地处理众多的随机事件,往往是制作大型系统首先要考虑的问题之一。用C语言开发Windows程序时,可以方便地使用消息机制(Message),但是,设计VB程序时,就没有这样的方便条件了。例如,多个窗口同时打开同一个表(Table),当在一个窗口中对数据进行了修改,而其他的窗口也能够随之进行数据更新,这时就需要有...
尽管Windows的API函数在当今Visual成风的时代正渐渐被人们忘却,但是正如当年开发高技巧的DOS软件离不开汇编语言和DOS系统功能调用一样,无论开发平台高级到什么地步,只要Windows还在最底层运作,就要用到API函数。无论VB的开发手段多么高明,功能多么强大,但是在现实应用中,总有一些功能的实现是VB无能为力的。微软也早意识到这一点,...
----在用VisualBasic编写Win95应用程序时,有时可能希望由程序来控制计算机的启动功能,比如当应用程序对系统注册表作了修改后需要重新启动Win95。 ----那么,如何在应用程序中控制Win95的启动呢?由于VisualBasic自身没有提供相关的命令和函数,我们只好求助于WindowsAPI函数ExitWindowsEx,调用该函数,我们可以完成重新启动、关机、...

经验教程

945

收藏

89
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部