VB语句详解——End语句
2008-06-13 22:34:17.0

作者:杜勇

描述:结束程序、过程或语句。
一、语法:
End
End语句的语法有以下几种形式:

部分
描述
End 必要的,用于结束程序
End Function 必要的,用于结束一个Function过程
End If 必要的,用于结束一个If…Then…Else语句块
End Property 必要的,用于结束一个PropertyLet、PropertyGet、或PropertySet过程
End Select 必要的,用于结束一个SelectCase语句
End Sub 必要的,用于结束一个Sub过程
End Type 必要的,用于结束一个用户定义类型的定义(Type语句)
End With 必要的,用于结束一个With语句

二、说明:
  End语句提供了一种强迫中止程序的方法,它不调用窗体和类模块中的Unload、QueryUnload、Terminate事件或任何其它VisualBasic代码,只是生硬地终止代码执行。

三、应用举例:
  本示例使用End语句,在用户输入错误密码时结束代码执行。建立一个标准工程,在窗体上添加一个命令按钮和一个文本框,将下面的程序粘贴过去。
Private Sub Command1_Click()
 Static I As Integer
 If Trim(Text1.Text) = "password" Then
  MsgBox "密码正确"
 Else
  MsgBox "密码错误"
  I = I + 1
  If I = 3 Then End
 End If
End Sub
  在文本框键入password,单击命令按钮,MsgBox显示“密码正确”;在文本框键入其他字符,单击命令按钮,MsgBox显示“密码错误”,当第三次键入错误字符,将退出程序。


文章评论
[以下网友留言只代表其个人观点,不代表中华网的观点或立场]
发表评论
昵 称:
主 页:
内 容:
表 情: