1樓:匿名使用者
字串中有一個mid函式,我們就使用這個函式mid(引數1,引數2,引數3)
引數1為一個字串
引數2為起始第幾位
引數3為長度
具體方法:
dim i,j as integer
dim b(1 to 7) as booleanfor i = 1 to 7
a(i)=cstr(i)
b(i)=false
next i
for i = 1 to 5
for j = 1 to 7
if mid(arr,i,1)=j thenb(i)=true
end if
next j
next i
dim result1 as stringresult1=""
for i = 1 to 7
if b(i)=false then
result1=result1 & i
end if
next i
寫的匆忙,應該可以簡化的。
2樓:曦者
private sub command1_click()dim a as string
for i = 1 to 7
if instr(text1.text, i) thenelse
a = a + cstr(i)
end if
next
text2.text = a
end sub
請高手分析下圖電子數字鐘的起鬧原理。謝謝
1 當q端為零時,兩個與非閘電路都輸出1,與非門輸出電壓與電源電壓相等,此時兩個電容充電,此時變壓器中無電流,所以喇叭不會響。2 當q端為1時,兩個與非門都輸出為0 兩個與非門上的電容會有一個電容放電,具體誰先放的快,理論上講是隨即的,但是實際元件肯定有容量大小的微差,這個不作為討論點,放電快的會拉...
出生的幸運數字,個人幸運數字查詢
仉樂山鎖荌 1969年己酉年,大驛土命,五行為土 五行中土代表的數字為0 5,土代表的顏色為黃色 灰色和咖啡色 所以你的幸運數字為0 5,你的幸運顏色為黃色 灰色和咖啡色 18989年09月3日幸運數字是多少 我1983年9月3日陰曆出生幸運數字是多少 春天的故事 屬豬的人 五行屬水 屬豬的人幸運數...
EXCEL連續的數字怎麼分開,EXCEL連續的數字怎麼分開
直接在a1輸入1890503 a2輸入 1890504 將a1,a2選擇用滑鼠向下拉.等差複製 把問題看反過來了。用mid函式 如果是比較固定1890503 1890504 1890505 都是七位那就比較好辦 直接 mid a1,1,7 right a1,3 如果不知位數,比較亂的話 看來不是我看...