当前位置：找题吧 > 软考初级

[试题]

阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。
[说明]

某公司的服务器上为每位员工提供了一定大小的存储空间，用于数据的备份。下面的程序面向公司员工，提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下：(1)连接服务器：员工需要输入用户名和口令才能连接到服务器端，checkUser函数用于检查用户名和口令是否合法，返回真假值。(2)上传文件：从本地计算机上传文件到服务器。员工可以在本地文件列表中选择一个或多个文件，这些文件通过上传操作被复制到服务器端指定的某个文件夹中；(3)下载文件：从服务器端下载文件到本地。
在开发过程中，本地驱动器列表框名为Drive1，本地和服务器端目录列表框分别名为Dir1和 Dir2，本地和服务器端文件列表框分别名为File1和File2，界面上有上至下四个按钮分别名为Command1至Command4。
[Visual Basic代码]

Private Sub Drive1_Change()(1) ’更新目录列表框的路径
E．nd Sub
Private Sub Dir1_Change()
F．ile1.Path=Dir1.Path ’更新文件列表框file1的路径
E．nd Sub
Private Sub Dir2_Change()
F．ile2.Path=Dir2.Path ’更新文件列表框file2的路径
E．nd Sub
’连接服务器
Private Sub Command1_Click()
D．im user,password As String
user=(2) (“请输入用户名：”)
password=(2) (“请输入口令：”)
If check User(user,password)Then ’若用户名和口令正确
D．ir2.Path=…… ’打开服务器上某一指定目录
E．lse: MsgBox“口令错误，请重试!”
E．nd If
E．nd Sub
’上传文件
Private Sub Command2_Click()
D．im fso As new FileSystemObject,f As File,i As Integer
If File1.FileName=""Then ’判断是否已经选中文件
MsgBox“请选择本地的文件!”
E．xit Sub
E．nd If
’创建文件系统对象
Set fso=CreateObject(“Scripting.FileSystemObject”)
’上传文件
F．or i=0 To (3) ’遍历文件列表框File1中的全体文件
If (4) Then’若该文件被选中
Set f=fso. (5) (Dir1.Path & “/” & File1.List(i))
f.Copy Dir2.Path & “/” & File1.List(i),True ’复制文件至服务器端
E．nd If
Next
F．ile2.Refresh
E．nd Sub
’下载文件
Private Sub Command3_Click()
……
E．nd Sub
’退出程序
Private Sub Command4_Click()
E．nd
E．nd Sub

参考答案与解析：

相关试题

阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏: [试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(说明)某学校举办了一场奥运知识竞赛，参加竞赛的选手为200名，1～200为选手编号。竞赛时间为9:00～11:00。8道竞赛题目依次从“A”～“H”编号，选手可按任意次序答题，每完成一道题目，可立即提交答案。若答案正确(Y)，则选择其他题目进行解答，否则，可继续做该题目或选择其他题目进行解答，直至竞赛结束。选手提交答案的情况及判定结果由专人即时录入，录入数据包括提交答案的时间、选手编号、题目编号(A～H)、是否正

查看答案

阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏: [试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。[说明]我国现行使用的公民身份证号码有两种，分别遵循两个国家标准：〖GB 11643-1989〗和〖GB 11643-1999〗。〖CB 11643-1989〗中规定的是15位身份证号码，排列顺序从左至右依次为：六位数字地址码，六位数字出生日期码，三位数字顺序码，其中出生日期码不包含世纪数。〖GB 11643 -1999〗中规定的是18位身份证号码，是特征组合码，它由十七位数字本体码和一位数字校验码组成。排列顺序从

查看答案

阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏: [试题]阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。[说明]某银行新近开通外汇定期存款业务。为方便用户查询不同存款方式下的日利率、计算本利，特开发了日利率查询及本利计算程序，其运行窗口如下图所示。用户只要在界面上选择相应的存款方式(包括外汇币种、存期等)，便可单击按钮一查询存款日利率。若输入一定数量的本金。程序还会根据所选择的存期计算并输出本利和。在开发过程中，选择币种和存期的组合框(ComboBox)名分别为Combo1和Combo2，单旋钮 (CommandBu

查看答案

阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对: [试题]阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(说明8.1)以下程序的功能是：生成20个200～300之间的随机整数，输出其中能被5整除的数并求出它们的和。(程序代码8.1)Private Sub Command1_Click()F．or i=1 To 20x=Int((1)*200+100)If (2)=0 ThenPrint xS=S+ (3)E．nd IfNext iPrint"Sum=";SE．nd Sub(说明8.2)程序8.2运行后，单击窗

查看答案

阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对: [试题]阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。(应用说明5.1)本应用程序的窗体中有一个下拉式列表框(名称为Combo1)和两个文本框(名称分别为 Txt1和Txt2)。运行时，用户从Combo1的列表中进行选择，程序就会将选中条目的内容以及编号(从0开始)分别在文本框Txt1和Txt2中显示出来。(程序代码5.1)Private Sub Combo1_Click()Txt1.Text = Combo1. (1)Txt2.Text = Combo1. (2

查看答案

阅读以下说明和Visual Basic代码,将应填入(n)处的字句写在对应栏内。: [试题]阅读以下说明和Visual Basic代码，将应填入(n)处的字句写在对应栏内。(说明)以下代码实现了当用户退出界面时，判断TextEdit中的文字是否发生改变，弹出对话框判断，让用户选择是否保存文件或取消退出界面操作。阅读下面的代码，将其补充完整。(代码7-1)B．egin VB.Form. Forml//...窗体描述(略)B．egin VB.TextBox TextEditH．eight = 1830Left = 180Tablndex = 0Text = "TextEdit"Top =

查看答案

阅读以下说明及Visual Basic程序代码,高尔夫球应填入(n)处的字句写在: [试题]阅读以下说明及Visual Basic程序代码，高尔夫球应填入(n)处的字句写在对应栏内。[说明]设某单位Acess数据库中有一张员工信息表，其中记录了员工编号、姓名、性别等基本信息。下面的应用程序利用数据控件(Data)实现了对这张表中记录的增加、删除和修改操作。其运行界面如下：在开发过程中，数据控件Data1与员工数据表相连接，各文本框、“性别”组合列表框Combo1、“政治面貌”组合列表框Combo2都分别与数据表的相应字段绑定，界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、

查看答案

阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写: [试题]阅读以下应用说明及Visual Basic部分程序代码，将应填入(n)处的字句写在对应栏内。(说明)本应用程序是一个小写数字转换成大写格式的转换器，其运行窗口如图5所示。窗口中有两个标签(lblNumber和lblChinese)、两个文本框(txtNnmber和txtChinese)和一个命令按钮(cmdChange)。当单击按钮cmdChange时，将文本框txtNumber中数字转换成中文大写，并显示在文本框txtChinese中。例如，在文本框txtNumber输入0076845，单击cm

查看答案

阅读以下说明和C£«£«代码(代码13£1),将应填入(n)处的字句写在对应栏: [试题]阅读以下说明和C++代码(代码13-1)，将应填入(n)处的字句写在对应栏内。(说明)软件设计师东方飞龙利用UML设计了一个迷你小型复数类，其类图如图13-11所示。(代码13-l)/*___________________________________*//********* 文件 MiniComplex. h*********//*___________________________________*/include＜iostream＞using namespace std;class M

查看答案

试题七阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的: [试题]试题七阅读以下应用说明及Visual Basic程序代码，将应填入(n)处的字句写在答题纸的对应栏内。(说明)已知窗体上有两个名为cmdGene和cmdSort的命令按钮。单击cmdGene按钮时，随机产生10个［1，100］范围内的整数并将它们放在数组intA中；单击cmdSort按钮时，用选择法排序这10个数并输出。(程序代码)D．im intA(1 To 10)As IntegerPrivate Sub cmdGene_Click()D．im intI As IntegerRandomize

查看答案