1樓:網友
看你這**我看得苦啊。
dim n(14) as integer
n(0)=a6-a1
n(1)=a6-a2
n(2)=a6-a3
n(3)=a6-a4
n(4)=a6-a5
n(5)=a5-a1
n(6)=a5-a2
n(7)=a5-a3
n(8)=a5-a4
n(9)=a4-a1
n(10)=a4-a2
n(11)=a4-a3
n(12)=a3-a1
n(13)=a3-a2
n(14)=a2-a1
dim s as string '放結果的。
for i = 0 to 14
if instr(s,(n(i) &0 then '如果沒有找到重複項。
s = s & cstr(n(i))
end if
nextmsgbox s
vb,怪異的篩選問題,高手幫我做下!!!**等
2樓:網友
作為小學生的我,可以肯定的告訴你"我不會!"
vb文字篩選問題
3樓:
你想問什麼啊?你的陣列沒有初始化,dim keyword$(10)
vb資料庫篩選問題。
4樓:網友
用on error resume next的方法避開錯誤。
再用select 語句再開啟資料庫,就有了。
vb按時間篩選
5樓:網友
檔案的格式是怎樣的?
宣告。dim a2 as string
vb數字的篩選
6樓:網友
先放賀叢在陣列裡,再處理,資料一般都是在陣列裡進禪純櫻行處理的。褲敬。
private sub command1_click()dim a1(100) as integerdim a2() as integer
dim a3() as integer
text1 =
text2 =
text3 =
randomize
for i = 0 to 100
a1(i) =rnd * 100
text1 = text1 & a1(i) &nextj = 0
for i = 0 to 100
if a1(i) mod 2 = 0 thenredim preserve a2(j)
a2(j) =a1(i)
text2 = text2 & a2(j) &j = j + 1
end if
nextj = 0
for i = 0 to ubound(a2)if a2(i) >50 then
redim preserve a3(j)
a3(j) =a2(i)
text3 = text3 & a3(j) &j = j + 1
end if
nextend sub
vb 高手進,文字篩選問題
7樓:網友
if i = ubound(keyword) thenstream = mid(stream, 5) '加上巖則這一句粗攜棚。
sendkeys ""stream & 隱物"
end if
vb的問題,一個vb的問題
開啟一個視窗 使用 shellexecute api 函式能夠實現自動登入,具體宣告請你參考一下 msdn 或者使用 vb 自帶的 api 檢視器來貼上宣告 用法如下 shellexecute form1.hwnd,open 名稱 sw restore 將這些 寫進標籤的 click 事件中就可以了...
VB程式設計問題,VB程式設計中的迴圈問題
有個 自己去看吧,都是考試的。編一個求圓周長的程式。輸入半徑,得到周長和麵積。試試看。建議你不要光學vb,畢竟它有太多缺點,很多事做不了 如果是對basic語言感興趣的話,到不如去學哈freebasic,powerbasic,purebasic,它們都功能超級強大 freebasic甚至可以寫作業系...
vb中的timer控制元件問題,VB問題,timer 控制元件的用法。
樓上的說的 太對了。這就是新手問題,當時我學到這裡的時候也遇到了這種問題。當時問老師之後解決的。當時還有點沒轉過彎來。後來知道轉彎了。private sub timer1 timer i i 1 label1.caption i end sub 這個過程裡面的 i 變數,每執行一次就初始化一次。因為...