完成下列问题:考生文件夹下有一个工程文件sjt4.vbp,其中的窗体上已有如图4所示

题型:问答题

问题:

完成下列问题:

考生文件夹下有一个工程文件sjt4.vbp,其中的窗体上已有如图4所示的控件。程序功能如下:


①单击“读数据”按钮,则将考生文件夹下in4.dat文件内容(该文件中仅含有字母和空格)显示在Text1文本框中。
②在Text1中选中部分文本,并单击“统计”按钮,则以不区分大小写字母的方式,自动统计选中文本中同时出现“o”、“n”两个字母单词的个数(如:million、company都属于满足条件的单词),并将统计结果显示在Text2文本框内。
在横线处填写正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。
[题目提供的源程序]
Dim s As String
Private Sub Command1_Click()
Open App.Patb & "\in4.dat" For Input As #1
s=Input(LOF(1),#1)
Close #1
Text1.Text=s
End Sub
Private Sub Command2_Click()
Dim m As Integer
If Len(s)= (1) Then
MsgBox "请先使用"读数据"功能!"
Else
If Text1. (2) =0 Then
MsgBox "请先选中文本!"
Else
t=""
For i=1 To Text1.SelLength
c=Mid(Text1.SelText,i,1)
If c<>"" Then
t=t+c
Else
x= (3)
If InStr(x, "o") <> 0 And InStr(x, "n") <> 0 Then
m=m+1
End If
t=""
End If
Next i
(4) =Str(m)
End If
End If
End Sub

考点:计算机等级考试VISUALBASIC二级VISUALBASIC机试
题型:问答题

教育部2013年8月22日公布了《小学生减负十条规定》征求意见稿。下面是部分朋友对“史上最严”的减负新规的评论,请你针对网友的评论,提炼出“减负”效果不理想的三条原因。要求语言准确、简明,每条不超过10个字。(6分)

@“踏雪寻镅75”:减负新规没有产生立竿见影的效果,首要原因是我国庞大人口基数造成的就业、竞争压力,以及压力带来的社会焦虑与急功近利心态,这个改变不可能一蹴而就。

@“渡西死亡”:建议真正取消重点校、重点班,严格就近入学,促进义务教育均衡发展,基层教育行政部门要真正肩负起责任。

@“ts10000”:现在课程改革的一些不合理之处,弄得一人上学,全家繁忙。我是大学毕业生,儿子上小学五年级,他的作业有时我都辅导不了,比如成语接龙什么的。

@“长沙网友”:建议教育行政部门改革学制,提倡全面发展,拒绝一考定终身。

@“向玉36158”:减负迟迟不能见效,和政府部门抓升学率息息相关。建议建立规章制度,严防地方片面抓升学率。

(摘自《人民日报》2013年8月22日18版)

题型:问答题

如图所示,在矩形ABCD的AD边和BC边的中点M和N各放一个点电荷,它们分别带等量的正、负电荷。E、F是AB边和CD边的中点,P、Q两点在MN的连线上,MP=QN。对于E、F、P、Q四点,其中电场强度相同、电势相等的两点是

[ ]

A.E和F  

B.P和Q

C.A和B

D.C和D

题型:问答题

---What’s your favorite music, by the way?

--- I really ______ progressive jazz.

A.go to

B.take for

C.addict to

D.go for

题型:问答题

展台布置的作用在于重点推荐宴会的()

题型:问答题

下列各项中,属于土地增值税征税范围的是( )。

A.房地产出租
B.以房地产进行投资
C.房地产开发公司代客户进行房地产开发
D.以房地产抵债

更多题库