クリーンアップ

yas78 · Jan 7, 2022 · 121a238 · 121a238
1 parent 0b1f8a0
commit 121a238
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 4 deletions.
diff --git a/bin/QRCodeLib.xlam b/bin/QRCodeLib.xlam
diff --git a/src/QRCodeLib/Symbol.cls b/src/QRCodeLib/Symbol.cls
@@ -1234,8 +1234,6 @@ Public Function GetGIF(Optional ByVal moduleSize As Long = DEFAULT_MODULE_SIZE,
     Dim offset As Long
     offset = 0
 
-    Dim bs As New BitSequence
-
     Dim paletteIndex As Long
     Dim bitmapRow()  As Byte
     Dim idx          As Long
@@ -1298,8 +1296,6 @@ Public Sub SaveAs(ByVal filePath As String, _
         fmt = fmt + ImageFormat.fmtBMP
     End If
 
-    Dim bpp As Long
-
     Select Case fmt And &HF0&
         Case ImageFormat.fmtBMP
             Select Case fmt And &HF