代码搜索:LONG

找到约 10,000 项符合「LONG」的源代码

代码结果 10,000
www.eeworm.com/read/282353/9099691

bas stop.bas

Attribute VB_Name = "MyModule" ' MyModule has the following functions/subs ' Subs: ' OpenApp(FileName as string) ' * Opens an application with the filename specified ' *
www.eeworm.com/read/282353/9099702

frm shellwat.frm

VERSION 5.00 Begin VB.Form Form1 Caption = "用Shell控制别的软件" ClientHeight = 1440 ClientLeft = 1140 ClientTop = 1515 ClientWidth = 5250 LinkTo
www.eeworm.com/read/282353/9099726

bas rgassistant.bas

Attribute VB_Name = "rg" 'Ramon Guerrero 'ZoneCorp@dallas.net 'ZoneCorp@AOL.com 'ZoneCorp@Compuserve.com Public Enum ZoomDirection ZoomFormOpen = 0 ZoomFormClosed = 1 End Enum Public Zoom
www.eeworm.com/read/282353/9099769

bas rtext.bas

Attribute VB_Name = "Rtextbas" Option Explicit #If Win32 Then Type LOGFONT_TYPE lfHeight As Long lfWidth As Long lfEscapement As Long lfOrientation A
www.eeworm.com/read/282353/9099801

bas modmisc.bas

Attribute VB_Name = "modMisc" Option Explicit Declare Function SetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long Declare Function GetPixel
www.eeworm.com/read/282353/9099808

bas submain.bas

Attribute VB_Name = "SubMain" Public NextProcs As Long Public Nodef As Boolean Public Const GWL_WNDPROC = (-4) Public Const WM_NCACTIVATE = &H86 Public Const WM_NCRBUTTONUP = &HA5 Public Const
www.eeworm.com/read/282353/9099875

frm form1.frm

VERSION 5.00 Begin VB.Form Form1 Caption = "Form1" ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 LinkTopic
www.eeworm.com/read/282353/9099884

frm bmp2icon.frm

VERSION 5.00 Begin VB.Form frmBmp2Icon BorderStyle = 1 'Fixed Single Caption = "BMP to ICO, ICO to BMP" ClientHeight = 4410 ClientLeft = 45 ClientTop
www.eeworm.com/read/282353/9099893

frm ficons.frm

VERSION 5.00 Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "COMCTL32.OCX" Begin VB.Form frmDrawState Caption = "图标显示的不同方式" ClientHeight = 5145 ClientLeft
www.eeworm.com/read/282353/9099900

bas subclass.bas

Attribute VB_Name = "mSubClass" Option Explicit Private Const WM_NCDESTROY = &H82 Private Declare Function GetProp Lib "user32" Alias "GetPropA" (ByVal hWnd As Long, ByVal lpString As String)