(35) 有如下事件过程：
private sub command1_click()
   dim i as integer
   for i=1 to 2
      dc
   next i
end sub
sub dc()
   dim x as integer, m as string
   static y, n
   x=x + 1
   y=y + 1
   m=m &"*": n=n & "#"
   print x, y, m, n
end sub
程序运行后，输出的结果是
a) 1  1  *  #     
  1  1  *  #         
b) 1  1  *  #
   1  2  *  #
c) 1  1  *  #     
  1  1  *  ##
d) 1  1  *  #
   1  2  *  ##
正确答案:  d

二 、填空题
(1) 冒泡排序算法在最好的情况下的元素交换次数为 【1】 。
正确答案:  1.(0)

(2) 在最坏情况下，堆排序需要比较的次数为 【2】 。
正确答案:  1.(o(nlog2n))

(3) 若串s="mathtypes"，则其子串的数目是 【3】 。
正确答案:  1.(46)

(4) 软件开发环境是全面支持软件开发全过程的 【4】 集合。
正确答案:  1.(软件工具)

(5) 关系数据库的关系演算语言是以 【5】 为基础的dml语言。
正确答案:  1.(谓词演算)

(6) 下列语句的输出结果是 【6】 。print format$(1258.6, "000,000.00")
正确答案:  1.(001,258.60)

(7) 关系式x≤-5或x≥5所对应的布尔表达式是 【7】 。
正确答案:  1.(x<=-5 or x>=5)

(8) 对随机文件数据存取是以 【8】 为单位进行操作的。
正确答案:  1.(一个记录)

(9) 在窗体上有一个名称为label1的标签和一个名称list1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签labe1中显示所选中的项目，如图所示。请在空白处填入适当的内容，将程序补充完整。
private sub form_load()
   list1.additem "北京"
   list1.additem "上海"
   list1.additem "河北"
end sub
private sub list1 【9】 ()
   labe1.caption= 【10】
end sub
正确答案:  1.(dblclick) 2.(list1.text)

(10) 执行语句open "tc.dat" for random as #1 len=50后，对文件tc.dat中的数据能执行的操作是 【11】 。
正确答案:  1.(既可以读，也可以写)

 (11) 下面程序的功能是统计字符串中"i"的个数，请填空。
sub cou()
    a$="beijing university of technology"
    dim n as integer
    n=len(a$)
    for i=1 to n
    b$= 【12】
    if 【13】 then x=x + 1
   next i
   print "x="; x
end sub
正确答案:  1.(mid＄(a＄, i, 1) ) 2.(b＄ = "i")

(12) 下列事件过程的功能是：建立一个名为datal的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。
private type ang
   k as integer
   sinx as single
   cosx as single
end type
dim ksc as ang
private sub form_click()
   dim y as single
   open 【14】
   y=3.14159 / 180
   for i=1 to 90
     ksc.k=i
     ksc.sinx=sin(i * y)
     ksc.cosx=cos(i * y)
      【15】
      next i

      close #2
end sub
正确答案:  1.("c:＼data1.txt" for random as #2 len = 10) 2.(put #2, i)