文档介绍：综合设计题
1、()回答下列问题
新建一个项目时默认提供的窗体名称二—forml ,该窗
体对应的代码文件名= form 。
在新建的项目中，代码文件包含的内容是：(用文字说明其组成)
BPublic Class Forml
R Private Sub F or m 1 _Lo ad (ByV al sender As System. Object, ByVai e As System. Event Args) Handles MyBase. Load
End Sub
End Class
此时若重命名该窗体为frmf irst,则代码窗口内类名
: frmf irst 。
答案：
Forml,
⑵
Public Class Forml
Private Sub Forml_Load(ByVai sender As , ByVai e As ) Mandies
End Sub
End Class
该代码窗口的内容
◊创建一个与窗体名称(=Forml)同名的一个公共类Forml,
◊包括一个窗体加载过程
(3) frmfirst
2、设i 个窗体，声明一个ArrayList对象，用于存放若干个姓名，
对其进行排序，并输出排序后的结果。
在该窗体内你用到了哪几个事件？各事件实现的功能和对应的 代码是？
Dim myarr As New ArrayList()
Dim sname, mystr As String
Private Sub Form5_Load(ByVai sender As System. Object,
ByVai e As System. EventArgs) Handles MyBase. Load
myarr. Add("Smith")
myarr. Add("Mary")
myarr. Add("Dava")
myarr. Add("John")
〃 〃
mystr =
For Each sname In myarr
mystr = mystr & sname & ""
Next
TextEoxl. Text = mystr
End Sub
Private Sub buttonl_Click(EyVal sender As System. Object,
ByVai e As System. EventArgs) Handles Euttonl. Click
myarr. Sort ()
〃 〃
mystr =
For Each sname In myarr
mystr = mystr & sname & ""
Next
TextEox2. Text = mystr
End Sub
编辑0)格式(Q)查看辺 帮助QI)
3、使用菜单控件为记事本的“文件”菜单设置如下图所示的子菜单。
新建@)
Ctrl+N
打开(Q)... 保存⑤) 另存为(A)...
Ctrl+0
Ctrl+S
页面设置(U).. 打印$)•••
-
Ctrl+P
退出QL)
1
B无标题-记事本
文件(£)
设计该菜单的控件是:
menustrip
，请列出 4种标准对话框控件，实现“文件”菜单下“新建”菜单项的标准对 话框控件是？实现“文件”菜单下“打开”菜单项的标准对话框控 件是？
（3）实现“新建”菜单项的事件过程中，要求新建文件指定的路径 为
“E:\”，新建文件的类型为“.txt”，使用“新建”菜单 项的对话框控件的ID=newdialog,完善“新建”菜单项的事件过程 中代码。
="新建文件"
，在此处设置新建文件指定的路径为“E:\VBNETfile”，新建 文件的类型为“.txt”
1 ① )
If =
Then
，在此处获取对话框中设置的文件名给变量fileName
© )
="简易记事本-"& fileName
（）
，在此处新建空内容文件
（ ③ ）
End If
3、解答:
MenuStrip
OpenFileDialog打开文件对话框，SaveFileDialog保存文件对话 框，FontDialog 字体对话框，ColorDialog 颜色对话框，PageSetupD