VB代码编程
1、根据三角形两边之和大于第三边,代码如下:
PrivateSubForm_Click()
DimA,B,CAsSIngle
DimSAsSingle
DimPAsSingle
A=Val(InputBox("请输入边长A的值","输入"))
B=Val(InputBox("请输入边长B的值","输入"))
C=Val(InputBox("请输入边长C的值","输入"))
If((A+B)>C)And((A+C)>B)And((B+C)>A)Then
P=(A+B+C)/2
S=Sqr(P*(P-A)*(P-B)*(P-C))
Print"三角形边长"&A&","&B;","&C&"面积S="&S
MsgBox"输入的三边不能构成三角形",vbOKOnly,"提示"
GoToZ1
EndIf
EndSub
2、100-999的水仙花数
PrivateSubForm_Click()
DimIAsInteger
DimA,B,CAsInteger
Form1.Cls
Print"100-999之间的水仙花数"&Chr(13)
ForI=100To999
A=I\100
B=(IMod100)\10
C=IMod10
IfI=A^3+B^3+C^3Then
PrintI;
EndIf
NextI
EndSub
3、求CosX的问题没看明白,请写清楚些。
本回答由提问者推荐
什么叫做“vB编程”。
是Visual
Basic编程语言
编写计算机程序需要使用计算机编程语言。计算机编程语言是人和计算机“对话”的桥梁。就像人类的语言一样,计算机编程语言也有很多。目前较为广泛使用的语言有“C
”、“Pascal”、“Basic”等。在众多的计算机编程语言中,以BASIC语言最为易学易用。
BASIC是英文Beginner’s
purpose
Symbolic
Instruction
Code的缩写,意思为初学者通用符号指令代码,一直都是程序设计入门的首选语言。
1991年,Visual
Basic(简称VB)面世,他是第三代BASIC语言,它不但秉承了BASIC语言的易学易用的优点,而且增加了图形界面设计工具。它简化了复杂的窗口程序编写过程,让编程者将更多的精力致力于问题的求解过程。