题目内容

完成下列问题：考生文件夹下有一个工程文件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

查看答案

搜索结果不匹配？点我反馈

更多问题

依法必须进行招标的项目，其招标活动不受地区或者部门的限制。( )

A. 对
B. 错

(每小题有A、B、C、D四个备选项，其中至少有一个符合题意) 某中型水电工程建设需要征收W省A市B县土地300亩。2009年1月，为做好补偿和移民安置工作，成立了项目法人。其中该项目征收耕地100亩，该耕地被征收前三年平均年产值为1000元/亩。如果将该项目部分移民安置到H省C市D县，项目法人应当及时将相应的征地补偿和移民安置资金交给移民安置区( )，用于安排移民的生产和生活。

A. W省人民政府
B. H省人民政府
C市人民政府
D县人民政府

· A lecture is not (41) . · Use abbreviations, symbols, numbers and so on to take notes in order to (42) . · (43) should: Before the lecture; ask yourself what you already know about (44) . During the lecture; think about where the talk might be (45) . · Lecturers often repeat them themselves by (46) (47) . · To review notes effectively you need to (48) them; reorganize them, highlight the main points and add your own (49) . · The advantages of reviewing; help everything sink in and make a (50) . · A lecture is not (41) . · Use abbreviations, symbols, numbers and so on to take notes in order to (42) . · (43) should: Before the lecture; ask yourself what you already know about (44) . During the lecture; think about where the talk might be (45) . · Lecturers often repeat them themselves by (46) (47) . · To review notes effectively you need to (48) them; reorganize them, highlight the main points and add your own (49) . · The advantages of reviewing; help everything sink in and make a (50) .

France Canada Russia Course of study French language and literature comparative literature (57) Length of course (51) (54) (58) Purpose of study diploma (55) (59) Accommodation (52) (56) in a student hostel Advantage opportunity to speak French; (53) beautiful countryside small classes (60) ; greattheatre France Canada Russia Course of study French language and literature comparative literature (57) Length of course (51) (54) (58) Purpose of study diploma (55) (59) Accommodation (52) (56) in a student hostel Advantage opportunity to speak French; (53) beautiful countryside small classes (60) ; greattheatre