niusouti.com
阅读以下说明及Visual Basic代码，将应填入(n)处的字句写在对应栏内。[说明]下图是一个简易文本编辑器程序的运行界面：用户打开磁盘上的某个文件后，可以直接对文本进行编辑，也可以利用界面提供的按钮完成相应操作。主要操作介绍如下：(1)打开文件：打开文件对话框，其中仅显示“*.txt”类型的文件。用户选中某一文件后，其内容将呈现于界面文本框内；(2)查找：提示用户输入要查找的内容，将首次出现的查找内容以蓝色高亮标记；(3)替换：若文本框中已选中某段文本，则提示用户输入要替换的内容，在文本框中完成替换
题目
阅读以下说明及Visual Basic代码，将应填入(n)处的字句写在对应栏内。
[说明]
下图是一个简易文本编辑器程序的运行界面：
用户打开磁盘上的某个文件后，可以直接对文本进行编辑，也可以利用界面提供的按钮完成相应操作。主要操作介绍如下：
(1)打开文件：打开文件对话框，其中仅显示“*.txt”类型的文件。用户选中某一文件后，其内容将呈现于界面文本框内；
(2)查找：提示用户输入要查找的内容，将首次出现的查找内容以蓝色高亮标记；
(3)替换：若文本框中已选中某段文本，则提示用户输入要替换的内容，在文本框中完成替换。
在开发过程中，文本框名为Text1，“打开文件”、“保存文件”、“查找”、“替换”、“退出”按钮分别命名为Command1至Command5。
[Visual Basic代码]
Dim fileName As String
Dim fso As New (1), ts As Object
’打开文本文件
Private Sub Command1_Click()
CommonDialog1.Filter = "*.txt"
CommonDialog1.ShowOpen
fileName =(2) ’保存所打开的文件名
Set fso=CreateObjeet("Scripting.FileSystemObject")
Set ts=fso.OpenTextFile(fileName, ForReading)
If Not ts.AtEndOfStream Then
Text1.Text =(3)
End If
ts. Close
End Sub
’保存文本文件
Private Sub Command2_Click()
Set ts = fso.OpenTextFile(fileName, ForWriting)
(4)
ts.Close
End Sub
’查找字符串
Private Sub Command3_Cliek()
Dim search As String, position As Integer
search = InputBox("输入要查找的字符串:")
position = InStr(Text1.Text, search) ’在文本中查找字符串
If position ＞0 Then ’若找到指定的字符串
Text1.SelStart = position - 1 ’设置选定文本的起始位置
Text1.SelLength = Len(search) ’设置选定文本的长度
Else
MsgBox "没有发现要查找的字符串"
End If
End Sub
’替换选中的字符串
Private Sub Command4_Click()
Dim object As String
If (5) ＞0 Then ’若已经选中了要替换的文本
object = InputBox("输入要替换的字符串:")
Text1.SelText = object ’替换文本
Else
MsgBox "请先选中要替换的文本!"
End If
End Sub
’退出程序
Private Sub Command5_Click()
End
End Sub
相似考题
更多“ 阅读以下说明及Visual Basic代码，将应填入(n)处的字句写在对应栏内。[说明]下图是一个简易文本编辑器程序的运行界面：用户打开磁盘上的某个文件后，可以直接对文本进行编辑，也可以利用界面提供的按钮完成相应”相关问题
-
第1题：
阅读以下说明和Visual Basic 码，将应填入(n)处的字名写在对应栏内
[说明] 设计一个计时程序。该程序用户界面由一个文本框(text 1)，两个按钮——命令按钮1 (Command 1)按钮、命令按钮(Command 2)组成。程序运行后，用户按开始按钮，则开始计时，文本框中显示秒数，按停止按钮，则计时停止。单击窗口则退出。
Option Explicit
Dim I
Private Sub Command1 _ Click( )
i=0
Timer1. Interval = 1000
(1)
End Sub
Private Sub Command2_ Click( )
Timer1. Enabled = False
End sub
Private Sub Form. Click(
(2)
End Sub
Private Sub Form. _Load( )
Timer1. Enabled = False
(3)
End Sub
Private Sub Timer1 _ Timer( )
i=i+1
(4)
End Sub
正确答案：Timer1. Enabled = True Unload Me Text1. Text = 0 Text1. Text = i
Timer1. Enabled = True Unload Me Text1. Text = 0 Text1. Text = i -
第2题：
阅读下列程序说明和C++程序，把应填入其中(n)处的字句，写在对应栏内。
【说明】
阅读下面几段C++程序回答相应问题。
比较下面两段程序的优缺点。
①for (i=0; i＜N; i++ )
{
if (condition)
//DoSomething
…
else
//DoOtherthing
…
}
②if (condition) {
for (i =0; i＜N; i++ )
//DoSomething
}else {
for (i=0; i ＜N; i++ )
//DoOtherthing
…
}
正确答案：程序1优点：程序简洁；缺点：多执行了N-1次逻辑判断并且程序无法循环“流水”作业使得编译器无法对循环进行优化处理降低了效率。 程序2优点：循环的效率高；缺点：程序不简洁。
程序1优点：程序简洁；缺点：多执行了N-1次逻辑判断，并且程序无法循环“流水”作业，使得编译器无法对循环进行优化处理，降低了效率。 程序2优点：循环的效率高；缺点：程序不简洁。 -
第3题：
阅读下列说明和?C++代码，将应填入(n)处的字句写在答题纸的对应栏内。
【说明】
阅读下列说明和?Java代码，将应填入?(n)?处的字句写在答题纸的对应栏内。
【说明】
某快餐厅主要制作并出售儿童套餐，一般包括主餐(各类比萨)、饮料和玩具，其餐品种
类可能不同，但其制作过程相同。前台服务员?(Waiter)?调度厨师制作套餐。现采用生成器?(Builder)?模式实现制作过程，得到如图?6-1?所示的类图。
答案：解析：
-
第4题：
阅读以下说明和Java以及HTML代码，将应填入(n)处的字句写在对应栏内。
[说明]
编写一个Applet程序，接受HTML文件传递的整数参数，根据该参数指定Applet中文本框的长度。编写对应的HTML文件运行这个Applet。
[Java 代码]
import java. applet.*；
import java. awt.*；
public class chuangdics extends (1)
{
TextField tf=new TextField ()；
int tfLength=0；
public void init()
{
try
{
tfLength=Integer. parseInt( (2) ("length"))；
tf. setColumns (tfLength)；
add (tf)；
}
catch (NumberFormatException nfe)
{
tf. (3) ("HTML 文件传人的参数格式错误。")；
add(tf)；
}
}
}
[HTML 代码]
＜html＞
＜head＞
＜title＞(4)＜/title＞
＜/head＞
＜body＞
＜hr＞
＜applet code=chuangdics width=700 height=150＞
＜param name=length value=20＞
(5)
＜hr＞
＜/body＞
＜/htmI＞
正确答案：(1)Applet (2)getParameter (3)setText (4)chuangdics (5)/applet＞
(1)Applet (2)getParameter (3)setText (4)chuangdics (5)/applet＞ -
第5题：
试题三（共 15 分）
阅读以下说明和 C 程序，将应填入 （n） 处的字句写在答题纸的对应栏内。
正确答案：