上海公务员考试学校:VB程序编程1,求1到100中5的倍数2,已知三角形的三边求三角形的面积

来源：百度文库编辑：杭州交通信息网时间：2024/05/10 13:57:02

1
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 100
If i Mod 5 = 0 Then Print i
Next i
End Sub

2
Private Sub Command1_Click()
Dim s, p, a, b, c As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
p = (a + b + c) / 2
s = Sqr((p * (p - a) * (p - b) * (p - c)))
Print s
End Sub

1:5,10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90,95,100

VB程序编程1,求1到100中5的倍数2,已知三角形的三边求三角形的面积 PB程序编程1,求1到100中5的倍数2,已知三角形的三边求三角形的面积用VB编写程序:计算1+2+3+........+100中所有偶数且为3的倍数的和~~~? 用VB编写：循环语句的应用求1到10000的平方和，去掉7和13的倍数从1到400这400个自然数中既不是2的倍数，又不是3的倍数有＿个？（急需！）求水仙数的VB的编程程序求1－10的平方和。vb编程给代码请问各位VB编程高手,小女子急求VB编程题目1、求1+1/2+1/3+……+1/50的和跪求vb编程的软件加密问题和 vb程序中的的第三方控件从1加到1000，再减去1000里2的倍数和3的倍数，答案是多少？