[如何上好化学实验课]化学是一门以实验为基础的学科，我相信不少化学老师第一节课也是通过实验来介绍化学和利用实验来吸引学生 ，来激发学生对化学的兴趣.在化学教学的过程中，学生每当知道自己有机会...+阅读

dim iMax as Single,iMin as Single,iSum as Single dim i as integer private sub Command1_click() iSum=0 for i=0 to 9 isum=isum+val(text1(i).text) if iMaxval(text1(i).text) then iMin=val(text1(i).text) next text2.text=(isum-imax-imin)/8 end sub

延伸阅读：

粗盐的提纯化学实验操作方法和实验报告doc PPT器材：铁架台 漏斗 粗盐水 滤纸 玻璃棒 烧杯 过程：将漏斗在铁架台上装定好 再将滤纸折成三层式用少许清水润湿放入漏斗里 将烧杯放在漏斗下准备接过滤好的盐水 用玻璃棒引流将...

实验室认可整改报告怎么写实验室认可监督评审整改计划 整改单位： 编 制： 审 核： 批 准： 二〇一一年XX月XX日 实验室认可监督评审整改计划 2011年XX月XX至XX日，国家认可委委派实验室认可监督评审组，按照相关...

java小程序设计设计一个窗口程序import java.awt.*; import java.awt.event.*; import javax.swing.*; public class FrameTest { private JFrame jf; private JButton yellow,blue,green; private JPanel...

汇编语言程序设计1、用减奇数法开平方。（算法：N个自然数中的奇数之和等于N的平方。） 程序清单：内存datum中存要开方数 ，result中存放结果 data segment datum db 16 result db 0 data ends ss_seg...

汇编语言程序设计红旗慢慢升起code segment assume cs:code start: push cs pop ds mov ax,12h int 10h mov ax,0a000h mov es,ax mov ah,2；画旗杆 call color mov di,510 mov ax,0aeh mov cx,450 n1:stos...

VB选择循环和数组综合程序设计实验报告Private Sub Form_Click() Dim r(1 To 60) As Integer Dim e(1 To 60) As Integer Dim o(1 To 60) As Integer Dim ec As Integer, oc As Integer Dim i As Integer, j As I...

求大神帮忙做一下这个大学VB程序设计的实验报告Private Sub Command1_Click() Dim a As Integer, b As String, i As Integer, c() As String a = Len(Text1.Text) Print a ReDim c(a) As String For i = 1 To a b = Mid(...

VB程序设计实验报告1.实验名称 实验二 Visual Basic基本语句 2.实验目的 (1)掌握Visual Basic的数据类型和变量定义方法。 (2)正确使用Visual Basic的运算符和表达式。 (3)掌握Visual Basic中...

VB程序设计实验报告过程与函数求高手出手急用的我要'计算两个数的和和积 Option Explicit Dim x As Double Dim y As Double Private Sub Cmd1_Click() x = InputBox（＂请输入一个数：＂， ， 0#） y = InputBox（＂请再输入一个数：＂， ， 0#） Text1.T...