sjs

来源：学生作业帮助网 编辑：作业帮 时间：2024/07/28 10:22:29
xՎ] @ ?zK=L())D16㝙Bz9.RN_WVmjMfeR]`SiJSd=/94&-`8S Χ"_0sW" 8b؁` wkUFQʧܡ EQ
sjs 请用通俗易懂的语言解释该代码的意思Function SJS() As String Application.Volatile Randomize Dim i,j As Integer Dim iFlag As Boolean SJS = Int(Rnd() * 10) For i = 1 To 5 iFlag = True Do While iFlag j = Int(Rnd() * 10) If InStr(SJS,j) =