VB在化学中的实际应用_化学平衡实际应用

VB在化学中的实际应用由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“化学平衡实际应用”。

VB在化学中的实际应用

自己设计的程序就比较简单一些，就是计算周长和面积，需要输入半径就可以了。计算圆的周长和面积：在窗体中添加一个文本框（Text1）和一个对应的标签（Label1），再添加两个命令按钮（Command1和Command2）和一个图片框（Picture1）。程序运行时，当单击Command1按钮后，计算圆的周长；当单击Command2按钮后，计算圆的面积；计算结果输出在图片框中。（要求在未输入半径前两个按钮呈灰色不可用。）程序清单如下：

Private Sub Command1_Click()x = Val(Text1)* 2 * 3.14159 Picture1.Print “r=” & Text1 Picture1.Print “周长=” & x End Sub

Private Sub Command2_Click()y = Val(Text1)^ 2 * 3.14159 Picture1.Print “r=” & Text1 Picture1.Print “面积=” & y End Sub

Private Sub Text1_Change()If Text1 “” Then Command1.Enabled = True Command2.Enabled = True End If End Sub 运行效果如下：

心得体会：在学习了这门课之后，发现设计一个关于我们专业的程序之后是非常方便的，许多复杂的问题，在编辑一次程序之后就可以用很多次，不用在一个个的去计算了，显得十分方便。在编写这个程序的时候，我也查阅了一些网上的资料，让我更容易的能做出这个程序，虽然这个程序非常的简单，但是，至少是自己亲手做出来的，显得十分有成就感。