江蘇省高校計算機等級考試命題研究院 江蘇省高校計算機等級考試輔導
2012秋江蘇省計算機二級VB上機真題1




改錯題共三個錯誤

(1)s=str(i)修改為  s=cstr(i)

(2)If  Mid(s,i+1,1)-Mid(s,i,1)<1  then 修改為:If  Mid(s,i+1,1)-Mid(s,i,1)<=1 

(3)倒數第三行的Exit For 修改為Exit Function

彩票30选5开奖结果