学习VB有什么用??如题 谢谢了
Private Sub Command1_Click()
Dim a, b, c, i As Integer
Dim j, sum As Double
a = InputBox("输入A的值", "提示")
b = InputBox("输入B的值", "提示")
c = InputBox("输入C的值", "提示")
j = 1
sum = 0
For i = 1 To a
j = j * i
sum = sum + j
Next
j = 1
For i = 1 To b
j = j * i
sum = sum + j
Next
j = 1
For i = 1 To c
j = j * i
sum = sum + j
Next
MsgBox a & "!+" & b & "!+" & c & "!=" & sum
End Sub
Private Sub Command1_Click()
Dim a(4, 4) As Integer
Dim i, j As Integer
Dim sum As Integer
sum = 0
Randomize
For i = 0 To 4
For j = 0 To 4
a(i, j) = Int(Rnd(1) * 100)
Print a(i, j),
Next
Print
Print
Next
Print
For i = 0 To 4
sum = sum + a(i, i)
Next
Print "第一个对角线的和是" & sum
sum = 0
For i = 0 To 4
sum = sum + a(i, 4 - i)
Next
Print "第二个对角线的和" & sum
End Sub
一般是搞电脑的采用VB吧.
如果你要搞电脑,平时作表格(用Excel)的时候,就可以不用一张一张,一个格子一个格子的填了。直接在面板里面用VB写程序就可以了。
很方便。
现在运用广泛的程序语言,一般都是java和C语言。
一直在悟,但直到今天也没悟出来。我是边学边忘,一点没印象了。反正聊QQ是用不上。呵呵
我也在想学vf有什么用的呢。说不定以后用的到,你的那个做商务网站可以!
学习VB有什么用??如题 谢谢了视频
相关评论: