代码搜索:explicit
找到约 10,000 项符合「explicit」的源代码
代码结果 10,000
www.eeworm.com/read/305667/13763651
bas comp_vbcreorderble.bas
Attribute VB_Name = "Comp_VBCReorderble"
Option Explicit
'This is a 2 run method
Private Type Bitset
LowValue As Integer
Needed As Integer
End Type
Private Type MinMax
Mi
www.eeworm.com/read/305667/13763652
bas cod_valdownshift.bas
Attribute VB_Name = "Cod_ValDownShift"
Option Explicit
Private Dictionary As String
'This coder work with a dictionary of all ascii codes
'but don't keep track of the counts
'every time a
www.eeworm.com/read/305667/13763654
bas comp_huffman_dynamic.bas
Attribute VB_Name = "Comp_Huffman_Dynamic"
Option Explicit
Private Type BytePos
Data() As Byte
Position As Long
Buffer As Integer
BitPos As Integer
End Type
Private Strea
www.eeworm.com/read/305667/13763663
bas comp_vbc1.bas
Attribute VB_Name = "Comp_VBC1"
Option Explicit
'This is a 2 run method
Private OutPos As Long
Private OutByteBuf As Integer
Private OutBitCount As Integer
Private ReadBitPos As Integer
www.eeworm.com/read/305667/13763664
bas cod_valuetwister.bas
Attribute VB_Name = "Cod_ValueTwister"
Option Explicit
Private TwistPos As Integer
Private Dictionary As String
'This coder work with a dictionary of all ascii codes
'but don't keep track
www.eeworm.com/read/305299/13774541
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public color As Integer
Public Sub ShowNum(source As PictureBox, Target As PictureBox, Digit As Integer, color As Integer, position As Integer)
www.eeworm.com/read/304671/13789405
bas modchangedisplay.bas
Attribute VB_Name = "ModChangeDisplay"
Option Explicit
Public OldX As Long
Public OldY As Long
Public OldColor As Long
Public Sub GetOldScreen()
Dim DevM As DEVMODE
Dim nDC As Long
www.eeworm.com/read/304408/13794912
bas huffman.bas
Attribute VB_Name = "Module1"
Option Explicit
Private Const EscapeCode As Integer = 256
Private Type BytePos
Data() As Byte
Position As Long
Buffer As Integer
BitPos As Inte
www.eeworm.com/read/302972/13824190
bas midmif.bas
Attribute VB_Name = "Module6"
Option Explicit
Dim ColumnsN As Integer, ColumnsType() As String
Dim PenWidth As Integer, PenPattern As Integer, PenColor As Long
Dim FillPattern As Integer, FillFore