05-06-2025, 09:19 AM
Glitch in your code is here:
Function FillString2 (Size As Long, Bases As String, S As String)
FillString2 = 0
Dim posi As Long
S = Space$(Size)
posi = 0
Starting position should be 1, not 0. Change that and it should fix the issue with return strings not matching.
Function FillString2 (Size As Long, Bases As String, S As String)
FillString2 = 0
Dim posi As Long
S = Space$(Size)
posi = 0
Starting position should be 1, not 0. Change that and it should fix the issue with return strings not matching.