代码搜索:explicit

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

代码结果 10,000
www.eeworm.com/read/146081/12678899

bas 用api根据listbox最长项目的宽度来设置滚动条.bas

Attribute VB_Name = "Module1" Option Explicit Public Const LB_SETHORIZONTALEXTENT = &H194 Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, B
www.eeworm.com/read/146081/12679106

bas 单击文本框获取单击位置.bas

Attribute VB_Name = "Module1" Option Explicit Public Const EM_CHARFROMPOS = &HD7 Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wP
www.eeworm.com/read/146081/12679203

bas clipcursor.bas

Attribute VB_Name = "Module1" Option Explicit Type RECT Left As Long Top As Long Right As Long Bottom As Long End Type Declare Function ClipCursor Lib "user32" (lpRect As A
www.eeworm.com/read/146081/12679219

bas 利用api制作listbox的索引.bas

Attribute VB_Name = "Module1" Option Explicit Public Const LB_SELECTSTRING = &H18C Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wP
www.eeworm.com/read/146081/12679224

bas 在listbox中获取鼠标下的项目.bas

Attribute VB_Name = "Module1" Option Explicit Public Const LB_ITEMFROMPOINT = &H1A9 Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal w
www.eeworm.com/read/146081/12679325

bas 向combobox发送消息.bas

Attribute VB_Name = "Module1" Option Explicit Public Const CB_SHOWDROPDOWN = &H14F Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wP
www.eeworm.com/read/146081/12679350

bas 用api滚动listbox.bas

Attribute VB_Name = "Module1" Option Explicit Public Const EM_LINESCROLL = &HB6 Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wPara
www.eeworm.com/read/146081/12679356

bas getcursorpos.bas

Attribute VB_Name = "Module1" Option Explicit Type POINTAPI x As Long y As Long End Type Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
www.eeworm.com/read/145930/12688864

bas module1.bas

Attribute VB_Name = "Module1" Option Explicit Public Type shes start As String * 8 end As String * 8 stime As Date etime As Date other As String * 100 road As String *
www.eeworm.com/read/140089/13110095

bas module1.bas

Attribute VB_Name = "Module1" Option Explicit Declare Function BitBlt Lib "GDI32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcD