1樓：楓葉剪影
本想寫出**，由於樓主太小氣不給分，就只寫出思路：用for迴圈至文字長，再用mid擷取，再比較兩個數值差是1即為連續數，呵呵，如果按這思路還寫不出來的話，下次問問題時一定記住要給分。
2樓：中山策
a = split(text1.text, ",")for i = lbound(a) to ubound(a) - 1for j = i + 1 to ubound(a)if val(a(j)) < val(a(i)) thent = a(i)
a(i) = a(j)
a(j) = t
end if
next j
next i
for k = lbound(a) to ubound(a)if a(k) = 0 then
exit for
end if
next k
if ubound(a) - k < 10 thenmsgbox ("沒有從0 到10")
else
n = -1
don = n + 1
loop while a(k + n + 1) - a(k + n) = 1 and a(k + n + 1) <= 9
if n = 9 and a(k + 10) = 10 thenmsgbox ("有從0到10")
else
msgbox ("沒有從0到10")
end if
end if
程式設計判斷數字是否為迴文數。vb語言
private sub mand1 click text1.text trim text1.text if isnumeric text1.text thenif text1.text strreverse text1.text then msgbox text1.text 是迴文數。else ms...
sql判斷是否為數字
sqlserver判斷是來否為數字的函式 isnumeric 確定表示式是源否為一個有效的數字型別。語法isnumeric expression 引數 expression 要計算的表示式。返回型別 int註釋 當輸入表示式得數為一個有效的整數 浮點數 money 或 decimal 型別，那麼 i...
anello書包怎樣判斷是否為正版
判斷正版可以從以下幾個方面出發 1 真假anello揹包的面料及五金不同 真假anello揹包最大的區別就在於所用的面料，anello雙肩包所用的超輕防水面料，使包的整體重量很輕，而假包的面料普遍手感偏硬，整體重量也要大一些。anello包的金屬扣 鉚釘以及拉鍊頭都是金黃色且並非特別的光亮，而假包的...