如果一個(gè)數(shù)從左往右讀和從右往左讀都一樣，那么這個(gè)數(shù)就叫做“回文數(shù)”；如果一個(gè)數(shù)的十進(jìn)制和二進(jìn)制表示都是回文數(shù)，則把這個(gè)數(shù)稱為“雙重回文數(shù)”。例如，十進(jìn)制數(shù)33是回文數(shù)，其二進(jìn)制表示（100001）也是回文數(shù)，所以33是雙重回文數(shù)。編寫(xiě)VB程序，用于查找1000以內(nèi)的雙重回文數(shù)并顯示在列表框List1中。程序運(yùn)行界面如圖所示。
實(shí)現(xiàn)上述功能的VB代碼如下：


加框處代碼有誤，請(qǐng)改正：（1）

sb=dtob（Val（sd））

sb=dtob（Val（sd））

（2）

k=k\2

k=k\2

（3）

Mid（sa,j,1）=Mid（sa,ms-j+1，1）

Mid（sa,j,1）=Mid（sa,ms-j+1，1）