实验动物的心得体会如何写 对实验动物的心得体会(六篇)

学习中的快乐，产生于对学习内容的兴趣和深入。世上所有的人都是喜欢学习的，只是学习的方法和内容不同而已。那么我们写心得体会要注意的内容有什么呢？以下是我帮大家整理的最新心得体会范文大全，希望能够帮助到大家，我们一起来看一看吧。

关于实验动物的心得体会如何写一

1、掌握正确书写表达式、赋值语句的规则。

2、掌握inputbox与msgbox的使用。

3、掌握print方法和format格式使用。

4、掌握单分支与双分支条件语句的使用。

5、掌握多分支条件语句的使用。

6、掌握for语句和do语句的各种形式的使用。

7、掌握如何控制循环条件，防止死循环和不循环。

二、实验内容和原理

1、输入半径，计算圆周长和圆面积。

为了保证程序运行的正确，对输入半径要进行合法性检查，数据检查调用isnumeric函数；若有错，利用msgbox显示错误信息，通过setfocus方法定位于出错的文本框处，重新输入；计算结果保留两位小数。

提示：使用text1_keypress事件，按enter键，返回参数“keyascii”的值为13表示输入结束。

2、随机产生三个整数，按从小到大的顺序显示。

3、计算π的近似值，π的计算公式为：

?2n?224262

π=2…× 2n-1?2n 11?33?55?7 注意：①、分别显示当n=10、100、1000时的结果，由此可见，此计算公式收敛如何？

②、要防止大数相乘时结果溢出的问题，将变量类型改为长整型 或实数型。

三、主要仪器设备

计算机

四、实验结果与分析

实验界面：

1、输入半径，计算圆周长和圆面积。

程序：

private sub form_activate

= "输入半径值"

us

rt = 0

gth = len()

end sub

private sub text1_keypress(keyascii as integer) '圆面积，周长

dim r

r =

const pi = 3.14159

if keyascii = 13 then

cls

if isnumeric(r) then

print "当圆的半径为"; r; "时："

print "圆面积为： "; format(pi * r ^ 2, "0.00")

print "圆面积为"; format(pi * r ^ 2, "0.00")

else

text1 = "半径值输入有误"

end if

us

rt = 0

gth = len()

else

end if

end sub

运行结果：

输入值

:2

2、随机产生三个整数，按从小到大的顺序显示。

程序：

private sub command1_click

cls

dim x%, y%, z%, a%

randomize

x = int(rnd * 101)

y = int(rnd * 101)

z = int(rnd * 101)

print "随机产生三个整数： "; x; spc(2); y; spc(2); z; spc(2)

if x y then

a = x: x = y: y = a

end if

if y z then

a = y: y = z: z = a

if x y then

a = x: x = y: y = a

end if

end if

print "从小到大排序：  "; x; spc(2); y; spc(2); z; spc(2)

end sub

运行结果：

3、计算π的近似值

①、分别显示当n=10、100、1000时的结果，由此可见，此计算公式收敛如何？

②、要防止大数相乘时结果溢出的问题，将变量类型改为长整型或实数型。 程序：

private sub command2_click

cls

dim n as long, pi, i as long

n = 1

do

n = n * 10

pi = 2

for i = 1 to n

pi = pi * ((2 * i) ^ 2 / ((2 * i - 1) * (2 * i 1)))

next i

print "当n="; n; "时，π="; pi

loop while n 1000

end sub

运行结果：

关于实验动物的心得体会如何写二

本实例的目的是设置页面的背景图像,并创建鼠标经过图像。

1、生均一台多媒体电脑，组建内部局域网，并且接入国际互联网。

2、安装windows xp操作系统;建立iis服务器环境，支持asp。

3、安装网页三剑客(dreamweaver mx;flash mx;fireworks mx)等网页设计软件;

4、安装acdsee、photoshop