簡單的VB題目，乙個簡單的VB題目

1樓：匿名使用者

首先：function t(i as integer) as long

if i = 0 then

t = 1

else

t = i *t(i-1)

end if

end function

這是乙個功能函式：原型function t(i as integer) as long

輸入引數：i 為整形(i as integer)，返回值是乙個長整形(as long)

實現的功能如下，具體在數學上叫做什麼名稱我不懂，但不影響解題：

t(0)=1;

t(1)=1;

t(2)=2*t(1)=2;

t(3)=3*t(2)=6;

t(4)=4*t(3)=24;

....

然後：private sub command1_click()dim i as integer

dim s as long

for i = 1 to 6

s = s + t(i)

next i

print "s=";s

end sub

這是command1的click事件的過程函式，for i = 1 to 6

s = s + t(i)

next i

就是通過迴圈計算了s=t(1)+t(2)+...+t(6)；

最後列印結果 print "s=";s

程式執行結果是當單擊command1時輸出：s=873

2樓：匿名使用者

麻煩把問題打出來

3樓：匿名使用者

private sub command1_click()dim i as integer

dim s as long

for i = 1 to 6

s = s + t(i)

next i

print "s=";s

end sub

這足夠表示command1的命令了，是從1加到6

乙個簡單的vb題目

4樓：匿名使用者

private sub command1_click()a = 2

b = 5

c = 4

d = 3

e = 6

print a + b > c and d * a = eend sub

乙個簡單vb測試題

5樓：玻璃麥田

11從if x

y=x可以看出此題是在求最小值。

vb簡單題目1.3題的**

6樓：匿名使用者

我能說看不清楚嗎

照得太不清晰了

你最好還是手動敲到提問裡來

這樣直接拍**，對於你來說是是簡單 了

對於回答你問題的人是比較困難的

請修改一下提問吧

求大神給編乙個簡單點的vb程式，內容不限，必須自己編寫的，老師讓每個同學自己出一道題，實在不會，謝 30

7樓：匿名使用者

自己應該有個目的。直接抄別人的沒有意義。起碼，你想實現什麼簡單的功能。

然後，即使是看別人的程式，也是帶著問題去的，也是學習和探索的過程。編寫**lucky-7程式最簡單。你可以模仿下。

8樓：夢龍

求10個不同的隨機字母

問VB的簡單語句，問乙個VB的簡單語句

再次更正 1.dim i as integer 宣告區域性非靜態整型變數i 2.list2.additem list1.list i 在list2中新增一項，這一項是list1中的第i項3.end if 結束if語句塊 4.next i 將程式控制權轉移至for所在的語句行，以判斷i的值是否超過終值...

VB中,簡單的問題 高手幫幫，VB中,一個簡單的問題 高手幫幫

你要的其實就是模擬按鍵 使用keybd event api就能完成。函式vb申明 public declare sub keybd event lib user32 byval bvk as byte,byval bscan as byte,byval dwflags as long,byval d...

求乙個簡單的VB程式 高手 速度啊

首先新建乙個標準工程，在窗體中新增乙個command1命令按鈕，在其中加入下面 private sub command1 click dim a 9 as integer 定義乙個陣列，存放十個兩位數。dim n as integer 用於迴圈十次。dim sum as integer 存放元素之和...