1樓：匿名使用者
程式語句中不能出現一連串不等號。x1 < x2 < x3 可改寫成x1x2 then
t=x1
x1=x2
x2=t '如果x1>x2,則將x1和x2的數值進行交換end if
if x1>x3 then
t=x1
x1=x3
x3=t
end if '如果x1>x3,則將x1和x3的數值進行交換print x1 '輸出最小值x1
2樓：厚布凡
您檔案的形式
部分的**，我給你剩下的你自己的想象
i = 0至dir1.listcount
如果dir1.listcount > 0
msgbox「aa」
對於j = 0，要dir1.listcountmsgbox「aa」
如果dir1.listcount > 0
dir1.path = dir1.list（一）對於k = 0，要dir1.listcountdir1.path = dir1.list（一）msgbox「aa」
往下k其他dir1.path =「e：\」
結束如果
下一步j
結束如果
接下來，我
我的程式是不是很好。但可以達到過濾器的路徑。您可以編寫這個程式在上面加點。我的計畫最初想要做的乙個破壞性程式。由於這種方法是有點慢。於是我放棄了
3樓：絕殺狂龍
這肯定不對啊，你這使用的完全是數學的比較方式。
最小值嘛。
第一次判定x1為最小值，
x1＜x2 and x1＜x3 這是條件，如果條件成立那麼x1就是最小值。接下來x2,x3和上面類似。
4樓：匿名使用者
語法錯誤,在vb中,沒有x1 < x2 < x3這種語法,你可以這樣改
(x1 < x2 and x2 < x3)
5樓：賴福平
不可以這樣子的，x2 < x1 < x3要分成兩個表示式， x2 < x1 and x1 < x3，數學中的一些習慣，在計算機語言中是行不通的。
6樓：匿名使用者
關係運算子 < 等，只能 比較2者，不能 x1 < x2 < x3 連用 的
樓主 vb 門 都沒有入！
安裝 msdn，找書 慢慢看吧
祝你順利
vb程式語言程式設計序問題），VB程式語言 程式設計序！！（3個問題）
三個問題才給10分，也太少了，呵呵 不過還是幫你解決一下。1 如下 private sub form load dim i as integer dim s,t as single dim n as integer show clss 0 t 1 n val inputbox 請輸入n的值 if n...
VB程式設計問題，VB程式設計問題
窗體上新增picture1控制項，再新增command1控制項，右鍵點中command1複製，貼上三次，按圖中排列好 private sub command1 click index as integer select case index case 0 picture1.cls picture1....
vb程式設計問題，關於VB程式設計的小問題
這個問題你問的比較到位。在vb裡面，子窗體和父窗體之間有乙個選單是否重疊的設定。你可以進行選擇當子窗體最大化是，子窗體的選單是否和父窗體的重疊。焦點，就是當前的活動物件，也就是說，如果有3個文字框，當你把滑鼠點到第二個上時 你輸入的內容就會在第二個顯示，而其他兩個不會有反應，這個時候其實就是第二個是...
VB程式設計新手問題，VB程式設計中的迴圈問題
隨便畫乙個按鈕叫command1，option explicit private q x private sub command1 click command1.caption q int x rnd end sub private sub form load q array 你好 你今年多大 喂 ...
VB程式設計問題
什麼意思啊?圓周率只能自己定義,三角函式當然可以打在 視窗裡的啊.sin cos tan 你要說清楚哦。什麼意思啊，更糊塗了，當然要用鍵盤打出來的啊 你要圓周率 這是希臘字母，用智慧型abc就可以了。你用滑鼠右擊輸入法最右邊的鍵盤，選希臘字母就可以了。可以呀.只要輸入法能打出來的,都能在程式中顯示的...