Best shuffle: Difference between revisions

Content added Content deleted
No edit summary
mNo edit summary
Line 3,611: Line 3,611:
a a (1)</pre>
a a (1)</pre>


'=={{header|VBA}}==
=={{header|VBA}}==


'<lang vb>
<lang vb>
Option Explicit
Option Explicit


Line 3,706: Line 3,706:
NbLettersDiff = C.Count
NbLettersDiff = C.Count
End Function
End Function
'</lang>
</lang>
{{out}}
{{out}}
<pre>a ==> a (Score : 1)
<pre>a ==> a (Score : 1)