题库 题库
🏠 天天查询 > 题库 > VB

VB

单选题 程序流程图中带有箭头的线段表示的是 查看答案
单选题 结构化程序设计的基本原则不包括 查看答案
单选题 软件设计中模块划分应遵循的准则是 查看答案
单选题 在软件开发中,需求分析阶段产生的主要文档是 查看答案
单选题 算法的有穷性是指 查看答案
单选题 对长度为n的线性表排序,在最坏的情况下,比较次数不是n(n-1)/2的排序方法是 查看答案
单选题 下列关于栈的叙述正确的是 查看答案
单选题 在数据库设计中,将E—R图转换成关系数据模型的过程属于 查看答案
单选题 有三个关系R、S和T如下:
           
由关系R和S通过运算得到关系T,则所使用的运算为
查看答案
单选题 设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为 查看答案
单选题 以下叙述中错误的是 查看答案
单选题 在Visual Basic中,表达式3* 2\5 Mod 3的值是 查看答案
单选题 以下选项中,不合法的Visual Basic变量名是 查看答案
单选题 以下数组定义语句中,错误的是 查看答案
单选题 现有语句:y=IIf(x>0, x  Mod  3, 0) ,设x=10,则y的值是 查看答案
单选题 为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把Scrollbars属性设置为 查看答案
单选题 文本框Text1的KeyDown事件过程如下:
Private SubText1_ KeyDown(KeyCode As Integer, Shift As Integer)
End Sub
其中参数KeyCode的值表示的是发生此事件时
查看答案
单选题 窗体上有一个名称为Hscroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是 查看答案
单选题 若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是 查看答案
单选题 要使两个单选按钮属于同一个框架,正确的操作是 查看答案
单选题 能够存放组合框的所有项目内容的属性是 查看答案
单选题 设窗体上有一个标签Labell和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是 查看答案
单选题 设有如图所示窗体和以下程序:
Private Sub Command1_Click()
  Textl.Text=“Visual Basic”
EndSub                                                       
Private Sub Text1_LostFocus()
  If Text1.Text <>“BASIC”Then
    Text1.Text=””
    Text1.SetFocus
  End If
End Sub
程序运行时,在Text1文件框中输入“Basic”(如图所示),然后单击Command1按钮,则产生的结果是
查看答案
单选题 窗体上有一个名称为Command1的命令按钮,其事件过程如下:
Private Sub Command1_Click()
  x=“VisualBasicProgramming”
  a=Right(x,11)
  b=Mid(x,7,5)
  C=Msgbox(a, , b)
End Sub
运行程序后单击命令按钮,以下叙述中错误的是
查看答案
单选题 设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas,两个窗体上分别只有一个名称Command1的命令按钮。
Form1的代码如下:
Public X As Integer
Private Sub Form_load()
  x=1
  y=5
End Sub
Private Sub Command1_Click()
  Form2.Show
End Sub
Form2的代码如下:
Private Sub Command1_Ciick()
  Print Form1.x,y
End Sub
Module1的代码如下:
Public y As Integer
运行以上程序,单击Form1的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是
查看答案
单选题 窗体上有一个名称Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:
Private  Type  x
  a  As Integer
  b  AS Integer
End Type
Private Sub Command1_Click()
  Dim  y  As  x
  y.a = InputBox(“”)
  If y.a\2=y.a/2 Then
    y.b=y.a*y.a
  Else
    y.b = Fix(y.a/2)
  End If
  Text1.Text=y.b
End Sub
对以上程序,下列叙述中错误的是
查看答案
单选题 窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数Command1,其下标从左到右分别为0、1、2、3,窗体外观如图所示。
命令按钮的事件过程如下:
Private Sub Command1_Click(Index As Integer)
  Select Case Index
    Case 0
      CD1.Action=1
    Case 1
      CD1.ShowSave
    Case 2                                          
      CD1.Acti_dj=5
    Case 3
      End
  End Select
End Sub
对上述程序,下列叙述中错误的是
查看答案
单选题 窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为“计算”的命令按钮Command1,并编写了以下程序:
Private Sub Command1_ClickO
  Call Cale (HV.Value, HT.Value)
End Sub                                        
Public Sub Cale(x AS Integer , y AS Integer)
  Text1.Text = x* y
End Sub
运行程序,单击“计算”按钮,可根据速度与时间计算出距离,并显示计算结果。对以上程序,下列叙述中正确的是
查看答案
单选题 现有如下程序:
Private Sub Command1_ Click()
  S=0
  For i=1 to 5
    S=S+f(5+i)                   
  Next
  Print  S
End Sub
Public Function f(x As Integer)
  If x>=10 Then
    t=x+1
  Else                           
    t=x+2
  End If
  f=t
End Function
运行程序,则窗体上显示的是
查看答案
单选题 窗体上有一个用菜单编辑器设计的菜单(见上图)。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。以下叙述中错误的 查看答案
单选题 窗体上有一个名称为Picture1图片框控件,一个名称Label1的标签控件。如图所示。
现有如下程序:
Public Sub display (x As Control)
  If  TypeOf  x  is  Label  Then
    x.Caption=“计算机等级考试”
  Else                                       
    x.Picture = Loadpicture(“pic.jpg”)
  EndIf
End Sub
Private Sub Label1_Click()
  Call display(Label1)              
End Sub
Private Sub Picture1_Click()
  Call display(Picture1)
End Sub
对以上程序,下列叙述中错误的是
查看答案
单选题 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp的事件过程如下:
Private Sub Text1_KeyUp(KeyCode As Integer , shift AS Integer)
  Dim C AS string
  Tcxt2.Text=Chr(Asc(c)+2)
End Sub
当向文本框Text1中输入小写字母a时,文本框Text2中显示的是
查看答案
单选题 设窗体上有一个文体框Text1和一个命令按钮Command1,并有以下事件过程:
Private Sub Command1_Click()
  Dim  S  As String , ch As String
  S=“”
  For k=1 TO Len(Text1)
    ch = Mid(Text1,k,l)
    S=ch+S
  Next k
  Text1.Text=S
End Sub
程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是
查看答案
单选题 某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command1_Click()
  Dim a(10) As Integer, max As Integer
  For k=1 TO 10
    a(K)=InputBox(“输入一个整数”)
  Next k
  Max=0
  For k=1 To 10
    If a(k)>max Then
      Max = a(k)
    End If
  Next k
  Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改,下面的修改中可以得到正确运行结果的是
查看答案
单选题 已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:
Option Base 1
Private Sub Command1_Click()
  Dim sum As Integer
  Sum=0
  For i=1 To 4
    For j=1 To 3
      Sum = sum + score(i,j)
    Next j
    Print“第”&i&”个学生的总分是:”;sum
  Next i
End Sub
运行此程序时发现,除第1个人的总分计算正确外,其他人的总分是错误的。程序需要修改。以下修改方案中正确的是
查看答案
单选题 一个栈的初始状态为空。现将元素 1、2、3、4、5、A、B、C、D、E 依次入栈,然后再依次出栈,则元素出栈的顺序是(    )。 查看答案
单选题 下列叙述中正确的是(    )。 查看答案
单选题 在长度为 n 的有序线性表中进行二分查找,最坏情况下需要比较的次数是(    )。 查看答案
单选题 下列叙述中正确的是(    )。 查看答案
单选题 数据流图中带有箭头的线段表示的是(    )。 查看答案
单选题 在软件开发中,需求分析阶段可以使用的工具是(    )。 查看答案
单选题 在面向对象方法中,不属于“对象”基本特点的是(    )。 查看答案
单选题 一间宿舍可住多个学生,则实体宿舍和学生之间的联系是(    )。 查看答案
单选题 在数据管理技术发展的三个阶段中,数据共享最好的是(    )。 查看答案
单选题 有三个关系 R、S和 T 如下:

  
由关系 R 和S通过运算得到关系 T,则所使用的运算为(    )。
查看答案
单选题 在设计窗体时双击窗体的任何地方,可以打开的窗口是(    )。 查看答案
单选题 若变量 a 未事先定义而直接使用(例如:a=0),则变量 a 的类型是(    )。 查看答案
单选题 为把圆周率的近似值 3.14159存放在变量 pi 中,应该把变量 pi 定义为(    )。 查看答案
单选题 表达式 2*3^2+4*2/2+3^2 的值是(    )。 查看答案
单选题 以下不能输出“Program”的语句是(    )。 查看答案