程序設計vb
❶ VB程序設計
本題選擇答案A
因為過程Swap中的第一個參數是傳址調用,所以它的值在交換後返回生效。第二個參數是值參。所以,交換的值並不會返回到主調過程中。
❷ VB程序設計
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Dim n As Integer, sum As Integer
For i = 100 To 200
For j = 2 To i - 1
If i Mod j = 0 Then Exit For
Next
If j = i Then
n = n + 1
sum = sum + i
Print i;
If n Mod 6 = 0 Then Print
End If
Next
Print
Print "ghjghj:"; n
Print "bncgfgk:"; sum
End Sub
❸ 程序設計VB
Private Sub Command1_Click()
Dim a(100), n As Integer
n = InputBox("請輸入選手個數:")
For i = 1 To n
a(i) = Val(InputBox("請輸入第" & i & "個選手的成績:"))
Next i
For i = 1 To n - 1
For j = 1 To n - 1 - i
If a(j) > a(j + 1) Then
t = a(j): a(j) = a(j + 1): a(j + 1) = t
End If
Next j
Next i
Print "排序以內後的容成績:"
For i = 1 To n
Print (a);
Next i
End Sub
❹ vb程序設計用什麼軟體做謝謝
vb的程序,當然是用VB編程軟體製作出來的,全稱為Visual Basic(簡稱VB),是Microsoft公司開發的一種通用的基於對象的程序設計語言,為結構化的、模塊化的、面向對象的、包含協助開發環境的事件驅動為機制的可視化程序設計語言。
❺ 求一個簡單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
以上代碼實現的是圖片框中的一個小球做的規律的運動,當小球碰到圖片框邊緣時便反彈繼續運動
❻ vb程序設計是什麼
1、VB程序設計以Visual Basic 6.0簡體中文版為語言背景,深入淺出的介紹Visual Basic 6.0程序設計技術,基本涵蓋了Visual Basic 6.0編程時的常用內容。
2、VB程序設計共分14章,主要內容包括開發環境、語言基礎和數組與過程、常用控制項、菜單設計、文件處理、ActiveX控制項、資料庫程序設計、圖形程序設計、多媒體編程、網路編程、API函數和注冊表、安裝程序的製作和綜合實例。
3、為了方便讀者學習,《VB程序設計》提供多媒體課件,及例題和練習題的所有源代碼。
4、VB程序設計可以作為大中專院校計算機及相關專業的教材,適合編程愛好者自學使用。
❼ vb編程在線等
測試復前做好數據備份。制
Sub sample()
i = 1
j = 1001
c=5000'你說的5000是sheet1的第5000還是sheet2的5000行,這里默認是sheet1的第5000
For m = i To c
Worksheets("Sheet1").Range(m & ":" & m).Cut Worksheets("Sheet2").Cells(j, 1)
Worksheets("Sheet2").Range(j & ":" & j).Copy
Worksheets("Sheet2").Cells(j, 1).PasteSpecial xlPasteValues
j = j + 1
Next
End Sub