精华内容
下载资源
问答
  • 如果只是关闭窗体,请调用该窗体的Close命令。 如果你将应用程序项目的启动窗体设顶成某个窗体,则调用该启动窗体的Close命令时,也就会结束该应用程序。 一般来说,要在任何时候结束应用程序,请调用Application....

    1、在VB.NET中取消窗体的关闭事件;2、如何取消窗体上关闭按钮功能;3、窗体终止事件的过程,见如下说明
    如果只是关闭窗体,请调用该窗体的Close命令。

    如果你将应用程序项目的启动窗体设顶成某个窗体,则调用该启动窗体的Close命令时,也就会结束该应用程序。

    一般来说,要在任何时候结束应用程序,请调用Application.Exit命令。它会停止所有运行中的线程,并关闭应用程序窗体。它并不一定会强制结束应用程序。

    一般是在线程内调用,并强制Application.Run返回。若只是要结束当前线程,则调用Application.ExitThread命令。

    Application.Exit命令引发下列事件,并执行相关联的条件操作:

    ● 每一个以OpenForms属性表示的窗体都会引发FromClosing事件。可以通过将事件的FormClosingEventArgs参数的Cancel属性设定为True,取消这个事件。

    ● 如果一个或多个处理函数取消事件,Application.Exit就会返回而不再执行操作。否则,没一个打开的窗体都会引发FormClose事件,然后关闭所有执行中的线程和窗体。

    下面是一个例子,如果textbox中不是1,则可以关闭窗体,如果是,则不能关闭窗体。

    [vb] view plain copy
    Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

        If TextBox1.Text = "1" Then  
    
            e.Cancel = True  
    
        End If  
    
    End Sub  
    

    Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
    If TextBox1.Text = “1” Then
    e.Cancel = True
    End If
    End Sub

    你可以使用End语句来立即结束应用程序。你可以将End语句放在程序任何位置,以便强vb.net教程

    制整个应用程序停止执行。End语句会关闭以Open语句打开的任何文件,并删除应用程序的所有变量。一旦没有其他程序使用这c#教程些数据时,而且也没有任何程序代码在执行时,应用程序就会立即关闭。

    注意,End语句会突然停止程序代码的执行,而且不python基础教程会调用Dispose或Finalize命令,也不会调用任何其他的程序代码,其他程序所使用的对象引用将会失效。如果End语句是位于一个Try或Catch语句块中,控制权将不会传递到相应的Finally语句块中。

    Stop语句会暂停程序的运行,但它与End不同的地方是,它并不会关闭任何文件或删除任何变量(除非是在编译过的可执行文件中使用)

    End语句会调用System命名空间的Environment类型的Exit命令。你必须拥有UnmanagedCode权限才能调用Environment.Exit命令,如果你并未拥有该权限,将会引发SecurityException异常

    展开全文
  • VB.NET是如何关闭窗体

    千次阅读 2012-01-31 09:09:41
    1、在VB.NET取消窗体的关闭事件;2、如何取消窗体上关闭按钮功能;3、窗体终止事件的过程,见如下说明 如果只是关闭窗体,请调用该窗体的Close命令。 如果你将应用程序项目的启动窗体设顶成某个窗体,...
     
    1、在VB.NET中取消窗体的关闭事件;2、如何取消窗体上关闭按钮功能;3、窗体终止事件的过程,见如下说明

    如果只是关闭窗体,请调用该窗体的Close命令。

    如果你将应用程序项目的启动窗体设顶成某个窗体,则调用该启动窗体的Close命令时,也就会结束该应用程序。

    一般来说,要在任何时候结束应用程序,请调用Application.Exit命令。它会停止所有运行中的线程,并关闭应用程序窗体。它并不一定会强制结束应用程序。

    一般是在线程内调用,并强制Application.Run返回。若只是要结束当前线程,则调用Application.ExitThread命令。

    Application.Exit命令引发下列事件,并执行相关联的条件操作:

    ●                每一个以OpenForms属性表示的窗体都会引发FromClosing事件。可以通过将事件的FormClosingEventArgs参数的Cancel属性设定为True,取消这个事件。

    ●                如果一个或多个处理函数取消事件,Application.Exit就会返回而不再执行操作。否则,没一个打开的窗体都会引发FormClose事件,然后关闭所有执行中的线程和窗体。

    下面是一个例子,如果textbox中不是1,则可以关闭窗体,如果是,则不能关闭窗体。

     

    Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
    
            If TextBox1.Text = "1" Then
    
                e.Cancel = True
    
            End If
    
        End Sub


    你可以使用End语句来立即结束应用程序。你可以将End语句放在程序任何位置,以便强制整个应用程序停止执行。End语句会关闭以Open语句打开的任何文件,并删除应用程序的所有变量。一旦没有其他程序使用这些数据时,而且也没有任何程序代码在执行时,应用程序就会立即关闭。

    注意,End语句会突然停止程序代码的执行,而且不会调用Dispose或Finalize命令,也不会调用任何其他的程序代码,其他程序所使用的对象引用将会失效。如果End语句是位于一个Try或Catch语句块中,控制权将不会传递到相应的Finally语句块中。

    Stop语句会暂停程序的运行,但它与End不同的地方是,它并不会关闭任何文件或删除任何变量(除非是在编译过的可执行文件中使用)

    End语句会调用System命名空间的Environment类型的Exit命令。你必须拥有UnmanagedCode权限才能调用Environment.Exit命令,如果你并未拥有该权限,将会引发SecurityException异常

    展开全文
  • 保存好程序要编译成可以在Windows下运行可执行程序,方法是选择“文件”菜单中的“生成工程1.exe”命令,以“窗体”为文件名保存文件到自己文件夹,这个程序关闭VB后也可以运行,退出VB,打开自己文件夹,...

    程序设计是指为计算机编制一些软件和程序。学习的目的是理解计算机的工作方式和运行的方式。

    VB是运行在Windows视窗操作系统上,设计程序的思想在于在窗口中放置对象和针对对象设计代码。

    (一)启动VB:单击“开始”-“程序”-“Microsoft Visual Basic 6.0 中文版”选择“标准EXE”,单击“打开”进入窗口。

    (二)VB窗口

    1、标题栏:在最上面蓝色标题是“工程1-。..”,是我们当前正在设计的程序,被称作“工程1”。

    2、菜单栏:菜单栏在第二行,包含一组菜单,菜单中有各种命令,我们应该理解操作计算机就是向计算机提供一系列的指令。

    (1)“文件”菜单,要求记住“保存”命令,VB要保存两次,注意保存文件到自己的文件夹中。(本书中双引号当中均是指操作命令)

    (2)“视图”菜单,显示各个窗口,如果一个窗口找不着了,就到这个菜单中找出来。

    (3)“运行”菜单,第一个“启动”命令要记住,可以运行我们的程序。

    3、工具栏:第三行是工具栏,工具栏是一些最常用的命令,而且是用图标表示的,因而便于形象记忆和操作,要求记住“启动”按钮。(在视窗操作系统中,我们不仅要会认识文字说明,还要特别留意图标含义。)

    4、工作区:工作区占据窗口的绝大部分,从左向右包括工具箱、窗体、和属性窗口。

    (1) 工具箱:在工作区的左侧,包含许多编程用到的基本对象,被称作“控件”。

    (2) 窗体:中间的灰色的窗口,LC40DT68C是我们设计的程序的基本框架,所有的对象都放在这个窗口当中。

    (3)小窗口:在右侧有三个纵向排列的窗口。

     

    ①最上面是工程窗口,上边有三个按钮,中间的按钮是显示对象窗口;

    ②下面是属性窗口,属性是一个对象的名称、大小、颜色等等;

    ③最下面是布局窗口,里面显示程序运行时的位置,LC40GS60DC拖动里面的小框可以改变程序的显示位置。

    4、下面修改窗体的属性,在右侧的属性窗口中找到Caption项,在它右边的格子里点一下鼠标左键,然后输入“窗体”两个字,观察一下工作区中的窗体的标题是否已经改变,Caption是设置一个应用程序的窗口标题,再在属性窗口中找到BackColor项,单击右边格子里的黑色三角按钮上点击一下鼠标左键,在弹出的面板上边的一行文字中选择“调色板”标签,选中浅紫色,观察一下工作区中间的窗体的变化。单击工具栏上的启动按钮,运行一下我们的程序,看一下这个窗口,还不错吧?

    单击“关闭”按钮(或者Alt+F4),回到窗体中,LC40GS82DC在属性窗口中找到Icon项,在右边的格子里点一下鼠标左键再点一下三个小点,在弹出的“加载图标”对话框中,点击“向上”按钮退一步,再选择打开Common,再选择打开Graphics,再选择打开Icon,再打开Misc,在里面找一个图标,单击打开,再看一下工作区中的窗体的标题栏左侧是否有一个图标。单击“启动”按钮,运行一下程序,然后最小化,看一下任务栏上的图标找到我们的程序,单击一下图标恢复窗口。

    关闭程序回到属性窗口,找到Picture属性,在右边的格子里单击一下鼠标左键,打开“加载图片”对话框,找一幅较大的背景图片打开,观察一下工作区窗体的变化。单击“启动”LC40TS86N按钮运行一下程序,很漂亮的一个窗口是吧?

    关闭程序,同样再修改Font属性和ForeColor属性,属性都是按照字母排序的,在最后的WindowState属性中选择2-Maxing最大化,运行一下程序看一下效果。

    如何保存自己的程序呢?方法是在“文件”菜单中选择“保存工程”或者点击工具栏上的磁盘按钮,保存文件到自己的文件夹(如果没有就新建一个)以“MyForm”为文件名(如果能用中文就输入汉字“窗体”)。LC42DS60C保存两次,一次是窗体,另一次是工程。

    保存好的程序要编译成可以在Windows下运行的可执行程序,方法是选择“文件”菜单中的“生成工程1.exe”命令,以“窗体”为文件名保存文件到自己的文件夹,这个程序关闭VB后也可以运行,退出VB,打开自己的文件夹,找到程序,运行一下看看。

    本节主要讲述了VB的基本窗口和窗体属性,以后会经常用到。

    展开全文
  • 上网朋友一定都用过网络蚂蚁(Net Ants)吧?...这点在VB中很容易实现: Private Sub Form_Load() If App.PrevInstance Then MsgBox "你已经运行这个应用程序了" End 退出新运行程序 End If End Sub 这样如果你运

    上网的朋友一定都用过网络蚂蚁(Net Ants)的吧?不知你在使用过程中有没有注意过,那就是如果你想调动两个“蚂蚁”为您效力是不可能的——它总会把新运行的关闭。这点在VB中很容易实现:

    Private Sub Form_Load()
    If App.PrevInstance Then
    MsgBox "你已经运行这个应用程序了"
    End ' 退出新运行的程序
    End If
    End Sub

    这样如果你运行这个程序后在运行它,它会弹出一个消息框并拒绝再次运行。这非常容易。 而“蚂蚁”程序的妙处就在于:在重复运行“蚂蚁”时它不仅拒绝运行,而且能把已经运行的“蚂蚁”激活,这样用上面的程序就无能为力了。但事实上实现拒绝运行并激活已运行的
    程序有多种方法:

    1、用FindWindow函数得到已经运行窗体的句柄(HWND),然后用SetActiveWindow等API函数将其激活。其缺点也很明显,那就是没法传递参数。

    2、用FindWindow函数得到已运行窗体的句柄后用SendMessage的方法给窗体传送一个自定义消息(附带参数),然后在窗体中拦截并进行处理,但这样做要修改窗体的标准消息处理程序,用在VC,BC或DELPHI编写的程序中还行,但在VB中工作量太大,并且容易发生“一般保护行错误”使VB崩溃,不太可取(当然,如果你有足够的信心和不怕崩溃的精神,也可以试一下 ^_^ )。

    3、使用DDE技术。

    所谓DDE技术,就是动态数据交换技术。也许你很奇怪,这与本文所讨论的内容有什么相干的?
    且听我慢慢讲来。
    为了实现拒绝运行并把已经运行的程序激活并实现各种功能,我们可以先用本文开头提到的方法,检测一下程序有没有被运行过,如果没有,就正常运行,如果已经被运行过,就打通与它的DDE通道,传给它一个(或一些)数据,然后由已经运行的程序对数据进行处理,再去实现各种“意想不到”的功能,这时也许就有人对这你的程序喊:“酷、酷……” ^_^

    好了,耳听为虚,眼见为实,下面让我们动点真格的。

    打开VB,新建一个工程,选择菜单中的“工程->工程1 属性”,把工程名称改为“P1”(我爱偷懒,能短则短 ^_^ ),把已有的一个窗体的“LinkTopic”属性改为“FormDDE”,把“LinkMode”属性改为“1 - Source”,添加一个PictureBox控件作为DDE执行控件,命名为picDDE。然后添加一个TextBox控件,命名为“txtInfo”,并把“MultiLine”属性设置为“True”,以便显示多行文本,作为消息显示控件。

    最后在窗体代码区输入以下代码:


    Const COMMANDLINE = "CommandLine=" ' 还是为了省事,定义一个常量

    Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
    Static lngCount As Long
    Dim Info As String

    Info = txtInfo.Text ' 保留原有信息

    Select Case CmdStr ' CmdStr 是DDE程序传送过来的参数
    Case "Max"
    Me.WindowState = 2
    Info = Info + vbNewLine + "窗体已被最大化"
    Case "ShowTime"
    Info = Info + vbNewLine + "最后一次运行这个程序的时间是:" + Str(Now)
    Case "Count"
    lngCount = lngCount + 1
    Info = Info + vbNewLine + "你已经第" + Str(lngCount) + "次重复调用这个程序。" _
    + vbNewLine + "但怕您不多给工资,所以只运行了一个 ^_^"
    End Select

    If Left(CmdStr, Len(COMMANDLINE)) = COMMANDLINE Then
    Info = Info + vbNewLine + "新程序曾以命令行形式运行" + vbNewLine + "命令行为:" _
    + vbNewLine + Right(CmdStr, Len(CmdStr) - Len(COMMANDLINE))
    End If

    txtInfo.Text = Info ' 把信息显示出来

    Cancel = False
    End Sub


    Private Sub LinkAndSendMessage(ByVal Msg As String)
    Dim t As Long
    picDDE.LinkMode = 0 '--
    picDDE.LinkTopic = "P1|FormDDE" ' |______连接DDE程序并发送数据/参数
    picDDE.LinkMode = 2 ' | “|”为管道符,是“退格键”旁边的竖线,
    picDDE.LinkExecute Msg '-- 不是字母或数字!

    t = picDDE.LinkTimeout '--
    picDDE.LinkTimeout = 1 ' |______终止DDE通道。当然,也可以用别的方法
    picDDE.LinkMode = 0 ' | 这里用的是超时强制终止的方法
    picDDE.LinkTimeout = t '--
    End Sub


    Private Sub Form_Load()
    If App.PrevInstance Then ' 程序是否已经运行

    Me.LinkTopic = "" ' 这两行用于清除新运行的程序的DDE服务器属性,
    Me.LinkMode = 0 ' 否则在连接DDE程序时会出乱子的

    LinkAndSendMessage "Max" '--
    LinkAndSendMessage "Count" ' |-----连接DDE接受程序并传送数据/参数
    LinkAndSendMessage "ShowTime" '--

    If Command <> "" Then ' 如果有命令行参数,就传递过去
    LinkAndSendMessage COMMANDLINE + Command
    End If
    End ' 结束新程序的运行
    End If
    End Sub

    测试一下:
    把工程“P1”编译成EXE文件(设名称为 P1.EXE )
    1、打开“我的电脑”,找到 P1.EXE 并执行。可以看到程序正常运行了。
    2、再运行一次,这次新程序没有运行成功,而原来运行的程序却被最大化了,而且文本框中有以下
    字符:

    窗体已被最大化
    你已经第 1次重复调用这个程序。
    但怕您不多给工资,所以只运行了一个 ^_^
    最后一次运行这个程序的时间是:00-2-6 7:11:01

    3、打开 MS-DOS方式 ,用命令行方式再次运行程序,如 “P1 How Are You?”
    这时原来运行的程序文本框中又多了几行字:

    窗体已被最大化
    你已经第 2次重复调用这个程序。
    但怕您不多给工资,所以只运行了一个 ^_^
    最后一次运行这个程序的时间是:00-2-6 7:14:32
    新程序曾以命令行形式运行
    命令行为:
    How Are You?

    OK,运行完全正确,然后你就可以把它应用的你的程序中了。
    展开全文
  • 窗体的最上层是“VB 6.0的菜单”和“便捷工具按钮”,菜单包含了所有的VB提供的功能的选项,而其中一些常用的功能或操作选项则被提取出来放在了“便捷工具按钮”,通过点击这些快捷按钮可以加快程序开发的速度,...
  • 使用DDE技术,为您应用程序增辉 上网朋友一定都用过网络蚂蚁(Net Ants)吧?不知你在使用过程中有没有注意过,那就是如果你想...这点在VB中很容易实现: Private Sub Form_Load() If App.PrevInstance Then 
  • 里面所含的内容有: ...46、vb6多个简单的命令.txt 47、vb6怎样加载背景图片,能随窗体大小变化? .txt 以上内容纯属作者本人整理,内容的可靠性也经本作者亲手证实,请放心使用,珍惜作者的劳动成果。
  • VB试题.doc

    2012-12-15 21:16:57
    9、为使某窗口中的命令按钮“取消(C)”具有如下特性:按“Alt+C”键或按 “ESC” 键,均可代替用鼠标单击该按钮的操作,应设置该按钮的Caption属性值为_取消(&C)___,并且设置其_ Cancel__属性值为__ True__。...
  • VB程序设计及应用

    热门讨论 2012-11-26 14:07:12
    12.1.4 MDI窗体与子窗体的交互 12.1.5 MDI应用程序的菜单 12.1.6 应用 MDI窗体注意事项 12.2 图像列表框、工具栏和状态栏 12.2.1 图像列表框 12.2.2 工具栏 12.2.3 状态栏 12.3 高级文本框...
  • VB.NET 模拟操作系统

    2014-02-18 16:25:18
    大家如果没事话也可以自己写 OS snv 系统应用程序 它实际上是一个动态链接库文件 只是改名为 sapp 文件了(偷笑) 接口在 [应用程序] [用户应用程序]开放出来了 如果大家有什么好意见 可以发邮件到我邮箱 ...
  • VB自动关机源码.rar

    2009-10-23 11:58:28
    e.Cancel = True '取消窗体的关闭动作 delayTime.Value = delay '还原delayTime控件的值 StrToItems() '还原ListBox的值 Me.Hide() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e ...
  • 2.4.2微调窗体的性能38 2.4.3 Form的生存期39 2.4.4 Controls集合43 2.4.5 Screen对象44 2.4.6打印文本45 2.4.7图形方法48 2.4.8 DrawMode属性51 2.4.9 ScaleMode属性54 2.4.10调色板支持56 第3章内部控件58 3.1...
  • 2.4.2微调窗体的性能38 2.4.3 Form的生存期39 2.4.4 Controls集合43 2.4.5 Screen对象44 2.4.6打印文本45 2.4.7图形方法48 2.4.8 DrawMode属性51 2.4.9 ScaleMode属性54 2.4.10调色板支持56 第3章内部控件58 3.1...
  • 第16章介绍了使用VB开发AutoCAD的一些知识(将VBA代码转换到VB中,VB窗体和AutoCAD的焦点切换,使用ActiveXDLL封装带有窗体的VB程序)、搜索某个文件夹中所有的文件和VBAIDE的编程,利用这些知识,完全有可能开发出...
  • ASP.NET精品课程+源代码

    千次下载 热门讨论 2009-01-05 20:15:51
    其次,对案例进行具体分析和设计,在这中间可以对ASP.NET语言的语法基础、特征、机制、窗体的设计进行详细讲解和分析。特别是对具体的界面设计要在多媒体教室里进行,教师可以先作一些演示和介绍,引导学生自己去...
  • 9.12 vb中的lambda表达式 387 9.13 小结 389 第10章 ado.net和linq 391 10.1 ado.net体系结构 392 10.2 ado.net基本功能 393 10.2.1 ado.net常见任务 393 10.2.2 ado.net基本名称空间和类 398 10.2.3...
  • 9.12 vb中的lambda表达式 387 9.13 小结 389 第10章 ado.net和linq 391 10.1 ado.net体系结构 392 10.2 ado.net基本功能 393 10.2.1 ado.net常见任务 393 10.2.2 ado.net基本名称空间和类 398 ...
  • 9.12 vb中的lambda表达式 387 9.13 小结 389 第10章 ado.net和linq 391 10.1 ado.net体系结构 392 10.2 ado.net基本功能 393 10.2.1 ado.net常见任务 393 10.2.2 ado.net基本名称空间和类 398 10.2.3...
  • 9.12 vb中的lambda表达式 387 9.13 小结 389 第10章 ado.net和linq 391 10.1 ado.net体系结构 392 10.2 ado.net基本功能 393 10.2.1 ado.net常见任务 393 10.2.2 ado.net基本名称空间和类 398 10.2.3...
  • 9.12 vb中的lambda表达式 387 9.13 小结 389 第10章 ado.net和linq 391 10.1 ado.net体系结构 392 10.2 ado.net基本功能 393 10.2.1 ado.net常见任务 393 10.2.2 ado.net基本名称空间和类...
  • 利用输入法注入DLL

    2013-05-19 22:45:22
    VB中的声明为: Public Declare Function IMESetPubString Lib "imedllhost09.ime" (ByVal RunDLLStr As String, ByVal UnloadDll As Long, ByVal loadNextIme As Long, ByVal DllData1 As Long, ByVal ...
  • 窗体的代码不是很复杂,界面设计主要是利用了树型控件来实现的 程序模块名称:frmsq; 重要控件:TreeView、图像列表Imagelist等; 相关数据库表:user_load。 该窗体主要实现增加用户、删除用户、对用户进行授权...
  • Excel_VBA教程

    2014-09-22 11:36:34
    4.创建用户窗体的工具 199 5.标签 200 6.文字框 200 7.框架 200 8.选项按钮 201 9.复选框 201 10.切换按钮 201 11.列表框 201 12.复合框 201 13.滚动条 201 14.旋转按钮 201 15.图像 201 16.多页控件 202 17....
  • ExcelVBA程序设计.doc

    2011-04-05 21:32:51
    4.创建用户窗体的工具 199 5.标签 200 6.文字框 200 7.框架 200 8.选项按钮 201 9.复选框 201 10.切换按钮 201 11.列表框 201 12.复合框 201 13.滚动条 201 14.旋转按钮 201 15.图像 201 16.多页控件 202 17....
  • 适合patch尚未运行加壳不加壳可执行文件,需要补丁数据较多时建议使用这个,在子程序打补丁 .参数 文件名, 文本型, , 文件全路径 .参数 模块名, 文本型, , 如"user32.dll" .参数 API, 文本型, , 如...
  • 4 显示当前编辑文档成员大纲窗体,选中之后转到定义:ctrl+o (支持c#、c++、vb) 5 插入代码段功能:alt+shift+z (调用VS插入代码段功能) 6 代码段注释/取消注释功能:ctrl+/ (选中代码如果被注释掉,则执行...
  • 声明方法存在而不去实现它类被叫做抽象类(abstract class),它用于要创建一个体现某些基本行为类,并为该类声明方法,但不能在该类实现该类情况。不能创建abstract 类实例。然而可以创建一个变量,其...
  • EJBJNDI使用源码例子 1个目标文件,JNDI使用例子,有源代码,可以下载参考,JNDI使用,初始化Context,它是连接JNDI树起始点,查找你要对象,打印找到对象,关闭Context…… ftp文件传输 2个目标文件...

空空如也

空空如也

1 2 3
收藏数 43
精华内容 17
热门标签
关键字:

vb中关闭窗体的命令是