1樓：匿名使用者
這個是我的做的，請檢視一下行不行。有不懂的地方再問我。
2樓：碧血玉葉花
'一、function cala(x as integer, byval y as integer) 'x是按址傳遞，y是按值傳遞
x = x + y
if x > 0 then
cala = x
else
cala = y
end if
end function
private sub command1_click()
dim m as integer, n as integer
m = 18
n = -8
text1.text = cala(m, n) 'm執行前為18，執行後m=10,n不變仍然為-8
text2.text = cala(m, n) '執行前m=10，n=-8，執行後，m為2,n為-8,cala返回2
end sub
『二private sub command1_click()
dim m as integer, a as integer
for a = 1 to 10
if a mod 4 <> 0 then』1到10裡，只有a為4和8時，a mod 4=0
m = m + a \ 4
end if
next a
print m
end sub
求vb6.0程式設計問題，幫忙一下下，做做題，最好六題都回答、、、
3樓：
第一題private sub command1_click()dim m%, n%
m = val(text1.text)
n = val(text2.text)
if m ^ 2 + n ^ 2 > 99 thentext3.text = "大於"
else
text3.text = "小於或等於"
end if
end sub
第二題private sub command1_click()dim m%, n%
m = val(text1.text)
n = val(text2.text)
if (m + n) mod 3 = 0 thentext3.text = "能整除"
else
text3.text = "不能整除"
end if
end sub
第三題沒看懂要求
第四題private sub command1_click()dim a%, b%
a = val(text1.text)
b = val(text2.text)
if a - b < 50 then
text3.text = "小於"
else
text3.text = "大於或等於"
end if
end sub
第五題private sub command1_click()dim a%, b%, tmp%
a = val(text1.text)
b = val(text2.text)
if a > b then
a = a
else
tmp = a
a = b
b = tmp
end if
if a + b > 5 and a - b < 5 thentext3.text = "能"
else
text3.text = "不能"
end if
end sub
第六題private sub form_click()dim a%, b%, i%
a = 24
b = 1
do until a = 2 * b
a = a + 1
b = b + 1
i = i + 1
loop
print i
end sub
（是在窗體顯示年份）
幫忙做下關於vb程式的選擇題,謝謝啦,急
4樓：匿名使用者
17.b 18.c 19.
a 20.a 21.c 22.
b 23.b 24.a 25.
b 26.c 27.d 28.
c 29.d 30.b 31.
b 32.d 33.c 34.
c 35.b 36.c 37.
a 38.a 39.b 40.
b非標準答案,僅供參考!
vb6.0安裝時麻煩又難解決的問題拜託了各位 謝謝
5樓：匿名使用者
net/vb2009/sp6.rar 前者是vb6的地址 後者是補丁六的地址 整個安裝檔案，copy到你的硬碟某個資料夾中，最好這個資料夾，不要長檔名，比如直接放到d：下某個目錄中，你試一下吧 序列號：
全是數字1 安裝vb6到最後的介面時，要注意，有一個「安裝msdn」不要勾選，還有一個「現在註冊」也不要勾 這兩個選擇不在同一個介面中，你安裝到最後幾步時注意一下就知道了 vb6綠色版： http://soft.
qhdedu.net/vb2009/vb6.rar
VB6 0 檔案操作，vb6 0對txt檔案操作
哪種資料型別都能放的，只是相對操作效能有區別，二進位制可以讀寫任何檔案，比如一個壓縮包就可以用二進位制檔案讀入加密後再儲存。其操作速度較快 隨機檔案可以讀取任意位置的單個資料，非常靈活，速度最快。文字檔案操作較直觀，直接用記事本就可開啟編輯 vb6.0對txt檔案操作 vb6.0關於.csv檔案的操...
怎麼利用VB 6 0製作函式影象，請高手幫忙解決一下問題，萬分感謝
分思路和 兩步說 思路 就是偽 讀取資料 不知道你的資料 和方式 畫點連線 座標點，點色，大小 折線，線色，粗細 不知道資料 多少組資料 資料大小範圍 不知道是靜態的還是動態的圖表？無法寫 能不能把 不確定表示式的多個函式 給你看下。張志晨 您的問題 我的課題.願攜手共進. 仰望 星空 愁思 在vb...
問VB6 0的問題，問一個VB6 0的問題
這樣就行了 把use宣告在通用裡 這樣在點選command1時 use的值就會在原來的數值 1 而use的值不會一值為0 dim use as integer private sub command1 click dim loginname,password as string loginname ...