代码搜索：explicit
找到约 10,000 项符合「explicit」的源代码
代码结果 10,000
www.eeworm.com/read/243990/12901355
bas comp_eliminator.bas
Attribute VB_Name = "Comp_Eliminator"
Option Explicit
Private doTillNoCompress As Boolean
'This is a 2 run method and we have to keep the whole contents
'in memory until some variables are s
www.eeworm.com/read/243990/12901384
bas comp_reducerdict16.bas
Attribute VB_Name = "Comp_ReducerDict16"
Option Explicit
'This is a 2 run method
'this reducer works by splitting a 256 chars dictionary into sixteen
'dictionaries of 16 chars each
'it wi
www.eeworm.com/read/243990/12901393
bas comp_lbe.bas
Attribute VB_Name = "Comp_LBE"
Option Explicit
'This is a 1 run method but because it stores some variables at the end of the
'compressed file the decompressor is a 2 run method
Private Di
www.eeworm.com/read/243990/12901425
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/243990/12901426
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/243990/12901428
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/243990/12901440
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/243990/12901442
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/141995/12974391
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Type mytype
father As String
name As String
type As String
number As Integer
renewid As String
drawingno As String
End Ty
www.eeworm.com/read/140633/13071118
bas autocad2000.bas
Attribute VB_Name = "AutoCAD2000"
Option Explicit
Public Const PI = 3.14159265359
Public acadApp As Object
Public ThisDrawing As Object
Public objTextStyle As AcadTextStyle
Sub Main()
On Erro