懒虫家园

       1.辛辛苦苦小学六年，勤勤恳恳初中三年，废寝忘食高中三年，却赶上国家扩招，任他猫猫狗狗也都能混个大学文凭。 　　

2.稀里糊涂大学混了四年，使尽浑身解数拿到英语四级证、计算机等级证、毕业证，却怎么也找不到如意的工作，有的连工作都找不到。 　　

3.千心万苦进了外商独资企业当白领，才发现原来中国现在遍地都是外企，500强有499家在中国有分号。

4.福利分房早已成为昨日黄花，住房公积金少得可怜，又赶上无耻之徒遍地炒房，一年攒下来的钱才能买四五平方米住房。 　

5.小时侯教育要做个诚实的孩子，中学大学又普及诚信教育，工作后又不得不说假话，拿假文凭，在假发票上签字。 　

二　执行下面程序，当单击窗体时，显示在窗体上第一行的内容是200，第二行的内容是10
Private Sub Form_Click()
   Dim I As Integer,Sum As Intger
   For I=0.5 To 8.5 Step2.5
   Sum=Sum+I*10
   Next I
   Print Sum
   print I
End Sub
2.运行下面的程序，当单击窗体时，窗体上显示的内容的第一行是0:1

二、填空题

1. 在程序运行时，将保存在C盘Pic文件夹中的名为Fishing.bmp的图片加载到图片框Picture1中的语句为_____1____。

2．执行下面的Command1_Click事件过程后，Text1中显示的内容是__2_，Text2中显示的内容是__3___。

Private Sub Command1_Click()

Dim S As String, I As Integer