2. 计算机
  3. 在考生文件夹下有一个工程文件sjt4．vbp。运：行程序，按下鼠标左键，并在窗体上拖动鼠标时，沿鼠标移动可在窗体上画出一系列圆，如图3-110所示。给出的程序不完整，要求去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改窗体文件中

在考生文件夹下有一个工程文件sjt4．vbp。运：行程序，按下鼠标左键，并在窗体上拖动鼠标时，沿鼠标移动可在窗体上画出一系列圆，如图3-110所示。给出的程序不完整，要求去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改窗体文件中

admin2016-01-31  77
问题 在考生文件夹下有一个工程文件sjt4．vbp。运：行程序，按下鼠标左键，并在窗体上拖动鼠标时，沿鼠标移动可在窗体上画出一系列圆，如图3-110所示。给出的程序不完整，要求去掉程序中的注释符，把程序中的?改为正确的内容。
    注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。
   
选项
答案审题分析 本题源程序在Form MouseDown事件过程中，先判断当前按下的是否为鼠标左键，若为左键，则将全局变量flag的值设置为True，因此该变量类型应该为逻辑型；在Form MouseUp事件过程中，判断若弹起的是鼠标左键，则令flag为False，这样的话如果鼠标左键保持按住不放时flag的值就一直为True。在Form MouseMove事件中，如果flag为Tme(意味着按住鼠标左键)，则调用Circle方法画一个圆。 操作步骤 步骤1：打开本题工程文件sjt4．vbp，在代码编辑窗口中，去掉程序中的注释符“′”，将问号“?”改为正确的内容。 参考代码： Dim Flaa As Boolean Private Sub Form_MouseMove(Button As Integer，Shift As Integer，X As Single，Y As Sinqlel Circle (X，Y)，300 Flaa=False 步骤2：按要求将文件保存至考生文件夹中。 考点链接 键盘和鼠标事件。
解析
转载请注明原文地址:https://kaotiyun.com/show/EuLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)