在平日里，心中难免会有一些新的想法，往往会写一篇心得体会，从而不断地丰富我们的思想。优质的心得体会该怎么样去写呢？下面小编给大家带来关于学习心得体会范文，希望会对大家的工作与学习有所帮助。
主题实验抓小白鼠心得体会和感想一
组长： 组员：
一、实验要求
1、练习使用显微镜，学习规范的操作方法。
2、能够独立操作显微镜。
3、能够将玻片标本移动到视野中央，并看到清晰的图像。
二、实验原理
三、材料用具
显微镜，写有“上”字的玻片，动物、植物玻片标本，擦镜纸，纱布。
四、方法与步骤
（一）取镜和安放
1、右手握住镜臂，左手托住镜座
2、把显微镜放在实验台上，略偏左。安装好目镜和物镜。
（二）对光
3、转动转换器，使低倍物镜对准通光孔（物镜的前端与载物台要保持2厘米的距离）。
4、把一个较大的光圈对准通光孔。左眼注视目镜内（右眼睁开，便于以后同时画图）。转动反光镜，使光线通过通光孔反射到镜筒内。通过目镜，以看到白亮的视野。
（三）观察
5、把所要观察的玻片标本（也可以用印有“e”字的薄纸片制成）放在载物台上，用压片夹压住，标本要正对通光孔的中心。
6、转动粗准焦螺旋，使镜筒缓缓下降，直到物镜接近玻片标本为止（眼睛看着物镜，以免物镜碰到玻片标本）。
7、左眼向目镜内看，同时反方向转动粗准焦螺旋，使镜筒缓缓上升，直到看清物像为止。再略微转动细准焦螺旋，使看到的物像更加清晰。
注意事项：
1、实验完毕，把显微镜的外表擦拭干净。转动转换器，把两个物镜偏到峡谷旁。最后把显微镜放进镜箱里，
主题实验抓小白鼠心得体会和感想二
一、实验目的和要求
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
运行结果：
如果觉得《实验抓小白鼠心得体会和感想 小白鼠实验收获(二篇)》对你有帮助，请点赞、收藏，并留下你的观点哦！
