vb編程實例下載
發布時間: 2024-05-11 14:15:01
① vb緙栫▼瀹炰緥 奼傚ぇ紲炲府蹇欏晩
② vb編程實例
Static s As Integer s 是靜態變數,過程結束後,數據依然存在,且值保持原來不變
一開始s=0
m(1),走入Function,時,n=1 ,循環一次(加上一個1),s=1,m(1)=1
m(2),走入Function,時,s=1(值保持原來1不變),n=2 ,循環2次(加上2個1),s=3,m(2)=3
m(3),走入Function,時,s=3(值保持原來3不變),,n=3 ,循環3次(加上3個1),s=6,m(3)=6
m(1)+m(2)+m(3)=1+3+6=10
③ 求一個簡單vb編程實例~
控制項:image,picture,timer代碼:Dim x As Integer
Dim y As IntegerPrivate Sub Form_Load()
x = 100
y = 100
Timer1.Interval = 100
End SubPrivate Sub Timer1_Timer()
If img.Top >= pic.Height - img.Height Then
y = -100
End If
If img.Top <= 0 Then
y = 100
End If
If img.Left >= pic.Width - img.Width Then
x = -100
End If
If img.Left <= 0 Then
x = 100
End If
img.Top = img.Top + y
img.Left = img.Left + x
End Sub
以上代碼實現的是圖片框中的一個小球做的規律的運動,當小球碰到圖片框邊緣時便反彈繼續運動
熱點內容