问答题库

当前位置: 计算机等级考试题库 > BASIC题库

问题描述:

[问答题] 注意:下面出现的“考生文件夹”均为C:wexam25160002。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上画一个名称为Command1的命令按钮,标题为“打开文件”,再画一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框。请按下列要求设置属性并编写代码: 设置适当属性,使对话框的标题为“打开文件”;设置适当属性,使对话框的“文件类型”下拉式组合框中有二行:“文本文件”、“所有文件”,如图23-1所示,默认的类型是“所有文件”;编写代码,使得单击按钮可以弹出打开文件对话框。要求:程序中不得使用变量,事件过程中只能写一条语句。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。 (2) 在名称为Form1的窗体上画一个命令按钮,名称为Command1,标题为“移动本按钮”,如图 23-2所示。要求编写适当的事件过程,使得程序运行时,每单击按钮一次, 按钮向左移动100。要求:程序中不得使用变量,事件过程中只能写一条语句。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

数据库系统其内部分为三级模式,即概念模式、内模式和外模式。其中,______是用户的数据视图,也就是用户所见到的数据模式。 列表框的List属性返回______。 以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数;如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整: Function Prime(inputvar As Integer)As IntegerFor i=2 To inputvar-1 If inputvar Mod i= 【13】 ,Then GoTo comfinish End IfNext iPrime=inputvarPrint "素数"GoTo 【14】 comfinish:Prime=inputvarPrint"合数"finish: End Function 下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及经在原来12 option Base 1 Private Sub Form_Click() Dim x x = Array(57,-9, 17,42, -31,46, 11, 8, 6, -4, 3,90) Max=1 For k=2 To 10 Step 1 If x(k) > x(Max) Then______ End If Next k y=______ Print Max, y End Sub 单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click( ) Print Fun(23, 18) End Sub Public Function Fun(m As Integer, n As Integer) As Integer Do Whilem <> nDo While m > n : m--m - n: LoopDo While m < n : n=n - m: Loop Loop Fun =m End Function

点评难度:

      

IP为:54.183.114.*,来自美国加利福尼亚州旧金山Amazon数据中心的网友觉得此题的难度为:容易.
IP为:18.15.213.*,来自美国马萨诸塞州大波士顿区麻省理工学院的网友觉得此题的难度为:一般.
IP为:19.224.122.*,来自美国福特公司的网友觉得此题的难度为:一般.
IP为:98.76.68.*,来自美国的网友觉得此题的难度为:一般.
IP为:81.154.233.*,来自英国伦敦的网友觉得此题的难度为:有点难.
您觉得难度如何呢?请反馈给我们,谢谢!

参考答案:

问题解析:

在窗体上建立好控件后,先设置控件属性,再编写事件过程。
在Visual Basic中,命令按钮的名称由Caption属性设置。通用对话框的属性可以在属性窗口中直接设置。将 CommonDialog的Name属性设置为CD1,文件类型在CommonDialog的Filter属性中设置,其格式为:
文件说明|文件类型
本题应在Filter属性中设置为:文本文件|*.txt|所有文件|*.*。解题步骤:
第一步:建立界面并设置控件属性。程序中用到的控件及属性设置见表23-1。
表 23-1
控 件属 性设 置 值
 按钮 Caption 打开文件
 通用对话框 (名称)
  DialogTitle
  Filter
 CD1
 打开文件
  文本文件|*.txt|所有文件|*.*|
  第二步:编写程序代码。
  参考代码:
    Option Explicit
    Private Sub Command1_Click()
      CD1.ShowOpen
    End Sub
  第三步:调试并运行程序。
  第四步:按题目要求存盘。
  (2) 在窗体上建立好控件后,先设置控件属性,再编写事件过程。
  在Visual Basic中,按钮的标题由Caption属性设置。要使命令按钮向左移动,须用到按钮的Left属性,使其值再每单击一次按钮时减去100。解题步骤:
  第一步:建立界面并设置控件属性。程序中用到的控件及属性设置见表23-2。
                                               表 23-2
控 件属 性设 置 值
 按钮 (名称)
  Caption
 Command1
 移动本按钮
第二步:编写程序代码。
参考代码:
Option Explicit
Private Sub Command1_Click()
Command1.Left=Command1.Left-100
End Sub
第三步:调试并运行程序。
第四步:按题目要求存盘。

试题分享:

相关考题