vb

他部分。 存盘时不得改变文件名和文件夹。 本题描述如下 ： 在窗体上有一个名称为 Text1的文本框，一个名称为 C1，标题为 校验 的 命令按钮。 其中文本框用来输入口令（如图所示）， 要求在文本框中输入 的内容都必须以 *显示（请考生自己通过属性窗口设置）。 要求程序运 行后，输入口令，单击命令按钮后，对口令进行校验。 如果输入的内容是 ABC这 3个大写字母，则 用 MsgBox信息框输出

大型百货”，则在文本框内显示：“百货大楼”；如果 选择“连锁超市”，则在文本框内显示“利客隆”；如果选择“前 店后厂” 则在文本框内显示：“稻香村”。 *注意： 保存时必须存放在考生文件夹下，窗体文件名为 ，工程文件名 为。 *********************************************************************** （ 2）在考生文件夹中有文件

个命令按钮，名称为 C1，标题为“复制”。 要求程序运行 后，在列表框中 自动建立四个列表项，分别为“ Item1”、“ Item2”、“ Item3”、“ Item4” 如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本 框中（如图所示）。

体计算，它将被命令按钮的 Click 事件中的语句调用。 第 1 章 Visual Basic 基本知识 7 程序如下： Option Explicit Private Function hS(a As Single, b As Single, _ c As Single, d As Single, x As Single) As Single Dim y As Single y = a * x

名称分别为 Text Text2和 Text3，文本框内容分别设置为“等级考试”、 “计算机”和空白。 然后画两个单选按钮，其名称分别为 Op1和 Op2，标题 分别为“交换”和“连接”（如图所示），编写适当的事件程序。 程序运 行后，如果选中“交换”单选按钮并单击窗体，则 Text1文本框中内容与 Text2文本框中内容 进行交换，并在 Text3文本框中显示“交换成功”；如

修改后的文件以原来的文件名存盘。 ********************************************************************** （ 2）在考生文件夹下有一个工程文件 ，其中的窗体中有一个组合框和 一个命令按钮（如图所示）。 程序的功能是在运行时，如果在组合框中输 入一个项目并单击命令按钮，则搜索组合框中的项目，如果没有此项，则 把此项添加到列表中

xt2和 Text3，文本框内容分别设置为“等级考试”、 “计算机”和空白。 然后画两个单选按钮，其名称分别为 Op1和 Op2，标题 分别为“交换”和“连接”（如图所示），编写适当的事件程序。 程序运 行后，如果选中“交换”单选按钮并单击 Text3文本框，则 Text1文本框中 内容与 Text2文本框中内容进行交换，并在 Text3文本框中显示“交换成 功”；如果选中“连接”单选按钮并单击

的“考生文件夹”均为 C:\WEXAM\00000000\ *********************************************************************** （ 1）在考生文件夹下有工程文件 ，该程序是不完整 的，请在有。 号的地方填入正确内容，然后删除。 及所有注释符（即 39。 号）， 但不能修改其它部分。 存盘时不得改变文件名和文件夹。

原来的文件名保存工程文件和窗体文件。 ********************************************************************** （ 2）在考生文件夹下有一个工程文件 ，相应的窗体文件为。 在窗体上有一个命令按钮，其名称为 Command1，标题为 计算。 程序运行后，如果单击命令按钮，程序将根据下面的公式计算π的值： π /4 = 1 1/3

；另有一个有五个元素的标签数组，名称为 Label1，其所有元素的 Visible属性都为 False。 如图 1所示。 程序运行时，单击 输入 5个数据 按钮，可输入五个整数（最好在 1002020之间 ），并作为刻度值显示在纵坐标的左面；单击 画直方图 按钮，则按五个数的输入顺序显示直方图。 例如若输入的五个数是 1200、 500、 800、1900、 1500，则结果如图 2所示。 图