请把计算机的D分区上的一个名为“tools”文件夹共享出来,其共享名为“tools”,允许用户帐户tony对
其具有“读取”权限。
操作步骤:
步骤1:在Windows资源管理器窗口中右击希望共享的文件夹(即:()→选择()→选择()。
步骤2:在弹出的对话框中,输入希望访问此共享文件夹的用户帐户(),然后单击“共享”按钮。
步骤3:单击“完成”按钮。
【答案选项】
A.D:/tools/
B.特定用户
C.共享
D.tony
其具有“读取”权限。
操作步骤:
步骤1:在Windows资源管理器窗口中右击希望共享的文件夹(即:()→选择()→选择()。
步骤2:在弹出的对话框中,输入希望访问此共享文件夹的用户帐户(),然后单击“共享”按钮。
步骤3:单击“完成”按钮。
【答案选项】
A.D:/tools/
B.特定用户
C.共享
D.tony
注意:
文件必须存放在考生文件夹中,工程文件名为execise19.vbp, 窗体文件名为 execise19.frm。
A.不能实现,因为每个分区上的空间都不够80 GB
B.可以先建立一个备份设备,这个备份设备分别在四个分区上各占用20 GB空间,然后再用此设备备份数据库
C.可以先在每个分区上分别建立一个备份设备,指定每个设备的大小均为20 GB,并建立一个包含这四个备份设备的备份媒体集,最后再用此备份媒体集备份数据库
D.可以先在每个分区上分别建立一个不用指定大小的备份设备,然后将数据库同时备份到这四个备份设备上
在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上添加两个单选按钮(名称分别为Optionl和Option2,标题分别为“添加项目”和“删除项目”),一个列表框(名称为Listl)和一个文本框(名称为Textl),如图l所示。编写窗体的Click事件过程。程序运行后,如果选择“添加项目”单选按钮,然后单击窗体,则从键盘上输入要添加的项目内容(内容任意,不少于三个),并添加到列表框中;如果选择“删除项目”单选按钮,然后单击窗体,则从键盘上输入要删除的项目内容,将其从列表框中删除。程序的运行情况如图2所示。在考生文件夹下的工程文件sjt3.vbp(相应的窗体文件名为sjt3.frm),可以实现上述功能。但这个程序不完整,请把它补充完整。
要求:去掉程序中的注释符,把程序中的?改为适当的内容,使其正确运行,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
A.http://jacky:123@huayu
B.ftp://123:jacky@huayu
C.ftp://jacky:123@huayu
D.http://123:jacky@huayu
在窗体上添加一个命令按钮(名为Commandl),编写如下事件过程:
打开窗体后,掣击命令按钮,消息框的输出结果是()。
A)7
B)15
C)157
D)528
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
[说明]
某公司的服务器上为每位员工提供了一定大小的存储空间,用于数据的备份。下面的程序面向公司员工,提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下:
(1)连接服务器:员工需要输入用户名和口令才能连接到服务器端,checkUser函数用于检查用户名和口令是否合法,返回真假值。
(2)上传文件:从本地计算机上传文件到服务器。员工可以在本地文件列表中选择一个或多个文件,这些文件通过上传操作被复制到服务器端指定的某个文件夹中;
(3)下载文件:从服务器端下载文件到本地。
在开发过程中,本地驱动器列表框名为Drive1,本地和服务器端目录列表框分别名为Dir1和 Dir2,本地和服务器端文件列表框分别名为File1和File2,界面上有上至下四个按钮分别名为Command1至Command4。
[Visual Basic代码]
Private Sub Drive1_Change()
(1) ’更新目录列表框的路径
End Sub
Private Sub Dir1_Change()
File1.Path=Dir1.Path ’更新文件列表框file1的路径
End Sub
Private Sub Dir2_Change()
File2.Path=Dir2.Path ’更新文件列表框file2的路径
End Sub
’连接服务器
Private Sub Command1_Click()
Dim user,password As String
user=(2) (“请输入用户名:”)
password=(2) (“请输入口令:”)
If check User(user,password)Then ’若用户名和口令正确
Dir2.Path=…… ’打开服务器上某一指定目录
Else: MsgBox“口令错误,请重试!”
End If
End Sub
’上传文件
Private Sub Command2_Click()
Dim fso As new FileSystemObject,f As File,i As Integer
If File1.FileName=""Then ’判断是否已经选中文件
MsgBox“请选择本地的文件!”
Exit Sub
End If
’创建文件系统对象
Set fso=CreateObject(“Scripting.FileSystemObject”)
’上传文件
For 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 ’复制文件至服务器端
End If
Next
File2.Refresh
End Sub
’下载文件
Private Sub Command3_Click()
……
End Sub
’退出程序
Private Sub Command4_Click()
End
End Sub
A.21
B.42
C.54
D.72
A.5
B.4
C.3
D.2
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),则执行如下事件过程后,文本框中的输出为______。private Sub Command1_ click() for i = 1 To 4 for j = 1 To 3 x = 3 for K = 1 To 2 x=x+3 Next K Next j Next i Text1.Text= Str(x)End Sub
A.3
B.6
C.9
D.12