代码搜索结果
找到约 85,229 项符合
Sender 的代码
主窗体.vb
Public Class 主窗体
Private Sub 主窗体_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
登录.Close()
End Sub
Private Sub 主窗体_Load(ByVal sender As Sy
global.asax
Sub Application_Start(ByVal sender As Object,ByVal e As EventArgs)
Application("onlinenum") = 0
Dim objreader As New System
主窗体2.vb
Public Class 主窗体2
Private Sub 主窗体2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub 开户ToolStripMenuItem_Click(ByVal sender
系统信息.vb
Public Class 系统信息
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Timer1.Start()
Timer1.Interval = 100
Timer1.Stop()
End Sub
global.asax
void Application_Start(object sender, EventArgs e)
{
// 在应用程序启动时运行的代码
}
void Application_End(object
unitdll.pas
unit UnitDll;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormClose(Sender: TObject; var Action: T
unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Menus;
type
TMenuNotifyEvent = procedure(Sender: TMenuItem) of object;{
unitfrmmain.pas
unit unitFrmMain;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
pr
child2unit.pas
unit Child2Unit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TChildForm2 = class(TForm)
procedure FormClose(Sender: TObject; var A
child1unit.pas
unit Child1Unit;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TChildForm1 = class(TForm)
procedure FormClose(Sender: TObject; var A