1樓：
中間錯誤真多。
給改過了，以下**全部在form1裡。
private sub form_click()call sortdata
end sub
sub sortdata()
dim a(10) as integer
for i = 1 to 10
a(i) =int(rnd() 21 + 30)next i
for i = 1 to 9
for j = i+1 to 10
if a(i) >a(j) then
swap a(i), a(j)
end if
next j
a(i)next i
a(10)
end sub
sub swap(a as integer, b as integer)
dim temp as integer
temp = a
a = bb = temp
end sub
2樓：匿名使用者
使用 call 呼叫子程式或者函式一定要用括號將引數括起來，即使沒有引數也要放一個空的括號。
vb顯示必選引數是什麼意思
3樓：網海1書生
如果一個函式（或方法、過程、自定義函式等）帶有一個或多個引數，那麼你在呼叫這個函式時也必須帶有相同數量的引數，否則就會提示「必選引數」的錯誤。
4樓：匿名使用者
就是說不能省略的引數，必須得填。
vb中的必選引數是什麼意思啊？
5樓：匿名使用者
必選，意思就是不能忽略這個引數。以下舉個例子，衣服（）函式：
用法：衣服（x,y,z）
x(必選)：號碼。
y(可選)：顏色。
z(可選)：布料。
號碼，你總一定要選吧，要不隨便給個超小號的讓你1米8高個子穿吧！（不說，無法讓你能用）
顏色，不說，隨便給你個顏色，或者預設一種顏色！（至少你不說，咋顏色你反正能穿下！）
布料，同上！
這下懂了吧！
vb中編譯錯誤，必選引數，是什麼意思
6樓：悠悠周郎
你八成使用新的vb了吧？text1這種方式已經被取消，你必須選擇或者其他屬性來賦值。
7樓：匿名使用者
我執行的結果正確啊！沒什麼錯誤。
vb 中必選引數錯誤
8樓：匿名使用者
call readata3 是呼叫自定義過程的命令你檢查一下，程式中應該有這個過程。
sub readata3( )
裡邊有引數，所以你呼叫它的時候，需要對應的引數。
9樓：愛梔竹的人
portopen 用來設定並返回埠狀態，使用前必須先給commport屬性賦值一個合法的埠號，否則使用或訪問portopen將報錯。
vb中的必選引數是什麼意思啊？
vb程式設計問題，提示為編譯錯誤：必選引數。
10樓：匿名使用者
sub yx(byval zf$, byref count%)
過程定義中有兩個引數，而你在呼叫的時候只傳遞了一個引數 = yx(
是一個引數。
vb中的必選引數是什麼意思啊？
11樓：散開的結
這個嘛，就是呼叫函式時，必須攜帶的引數。
sub aa(a%)
end sub
call aa(9)
其中a為必選引數。
12樓：寒信
顧名思義，必選引數就是一定要選的引數。有些函式的引數如果你不選，它會自動套用預設值，有些引數不能套用預設值的，就一定要選。
比如 msgbox(prompt[,buttons][,title][,helpfile,context])
它有5個引數，其中第一個引數為訊息文字，是必選引數。
其他4引數都不是必選引數。
你可以這樣寫** msgbox "你好", 提示"，後面的引數可有可無，會自動代入預設值。
但是不能這樣寫 msgbox , vbyesno, "提示"，會出現「引數不可選」的錯誤。
因為第一個引數是必選引數，必須要有值，即使是空字串也行。
關於VB顯示時間問題
第一 因為你在form load 中加了一個 註釋掉了，所以不會顯示，你應該去掉這個符號。第二 因為你精確到秒，所以實現不了unload me，畢竟執行也是需要時間的，所以兩個時間應該是無法相等。如果你想實現，可以按下面的 試試 private sub form load text1.text fo...
VB顯示窗體內的座標
private sub form mousemove button as integer,shift as integer,x as single,y as single text1.text x xtext2.text y yend sub 窗體上新建兩個text控制元件,private sub ...
vb讀取檔案並把內容顯示在textbox控制元件中
讀取檔案 dim inputdata as string 1open c abc.txt for input as 1do while not eof 1 inputdata input 1,1 text1.text text1.text inputdataloop close 1 替換原來檔案的內...