渗透学科教学的高中信息技术教学实践(二)
                  
 附:
 程序设计:画一元二次函数:y=x^2的图像
 程序界面:修改前如图1,修改后,如图2
 
 图1                                          图2
 程序原代码:
 
 Private Sub Command1_Click()
 Dim x, y As Single
 Picture1.Scale (-10, 25)-(10, -25)
 Picture1.Line (-10, 0)-(10, 0), RGB(255, 0, 0)
 Picture1.Line (0, -25)-(0, 25), RGB(255, 0, 0)
 For x = -10 To 10 Step 0.0001
  y = x ^ 2     ‘可修改此处的表达式,得出不同函数的图像,如y=x^2+5,y=sin(x)等;修改后观察图像的变化。
  Picture1.PSet (x, y), RGB(0, 0, 255)
 Next x
 End Sub
 修改后代码:
 Private Sub Command1_Click()
 Dim x, y As Single
 Picture1.Scale (-10, 25)-(10, -25)
 Picture1.Line (-10, 0)-(10, 0), RGB(255, 0, 0)
 Picture1.Line (0, -25)-(0, 25), RGB(255, 0, 0)
 For x = -10 To 10 Step 0.0001
  y = x ^ 2      
  Y1 = x ^ 2 + 5
  Y2 = (x + 2) ^ 2
   Picture1.PSet (x, y), RGB(0, 0, 255)
   Picture1.PSet (x, Y1), RGB(255, 0, 0)
   Picture1.PSet (x, Y2), RGB(0, 255, 0)
 Next x
 End Sub
 
 此外,在Excel统计,计算等教学部分,我们也可以结合数学学科教学展开,如一些常用函数sum()、average()和计算中到的公式等都可以结合数学教学展开。
渗透语文学科教学的信息技术教学实践
 在信息获取教学中,可以诗歌大赛的形式展开,也可以以成语接龙的形式展开,学生在总结、掌握搜索技巧的同时,也学习了很多了诗歌、成语,很好地渗透了我们的语文学科教学。
渗透学科教学的高中信息技术教学实践(二)由免费论文网(www.jaoyuw.com)会员上传。


