题库
题库
| 单选题 | 可以实现从键盘输入一个作为双精度变量a的值的语句是 | 查看答案 |
| 单选题 | 下列符号常量的声明中，不合法的是 | 查看答案 |
| 单选题 | 在Visual Basic中，要强制用户对所用的变量进行显式声明，这可以在哪里设置? | 查看答案 |
| 单选题 | 下列语句中，获得列表框List1中项目个数的语句是 | 查看答案 |
| 单选题 | 要获得当前驱动器应使用驱动器列表框的属性是 | 查看答案 |
| 单选题 | 如果将文本框的MaxLength属性设置为0，则文本框中的字符不能超过 | 查看答案 |
| 单选题 | 当在滚动条内拖动滚动块时触发 | 查看答案 |
| 单选题 | 设有声明语句 Dim b(-1 To 10, 2 To 9, 20) As Integer 则数组b中全部元素的个数 |
查看答案 |
| 单选题 | 设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt) > 0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text="BBBBB" End If End Sub 上述程序运行后，如果按 【Shift+F2】 ，则在文本框中显示得是 |
查看答案 |
| 单选题 | 设已经在"菜单编辑器"中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其"可见"属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是 | 查看答案 |
| 单选题 | 下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按Cancel键退出对话框，则 Private Sub Command1_Click() CommonDialog1.CancelError=True CommonDialog1.Flags=cdlCFEffects Or cdlDFBoth CommonDialog1.Action=4 CommonDialog1.ShowFont Text1.Font.Name=CommonDialog1.FontName Text1.Font.Size=CommonDialog1.FontSize Text1.Font.Bold=CommonDialog1.FontBold Text1.Font.Italic=CommonDialog1.FontItalic Text1.Font.Underline=CommonDialog1.FontUnderline Text1.FontStrikethru=CommonDialog1.FontStrikethru Text1.ForeColor=CommonDialog1.Color End Sub |
查看答案 |
| 单选题 | 要将名为MyForm的窗体显示出来，正确的使用方法是 | 查看答案 |
| 单选题 | 下列程序段的执行结果为 a=5 For k=1 To 0 a=a + k Next k Print k; a |
查看答案 |
| 单选题 | 下列程序段的执行结果为 a=3 b=1 For I=1 To 3 f=a + b a=b b=f Print f Next I |
查看答案 |
| 单选题 | 下列程序段的执行结果为 I=9 x=5 Do I=I + 1 x=x + 2 Loop Until I >=7 Print "I="; I Print "x="; x |
查看答案 |
| 单选题 | 以下程序段运行时从键盘上输入字符"-"，则输出结果为 op$=InputBox("op=") If op$="+" Then a=a + 2 If op$="-" Then a=a - 2 Print a |
查看答案 |
| 单选题 | 以下程序段的输出结果为 Dim l, a(10) , p(3) k=5 For i=0 To 10 a(i) =i Next i For i=0 To 2 p(i) =a(i (i + 1) ) Next i For i=0 To 2 k=k + p(i) 2 Next i Print k |
查看答案 |
| 单选题 | 下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer, y As Integer x=12: y=20 Call Value(x, y) Print x; y End Sub Private Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; n End Sub |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮，然后编写下列程序 Private Sub Command3_Click() Tcl 2 Tcl 3 Tcl 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后，单击命令按钮，输出结果为 |
查看答案 |
| 单选题 | 下面程序段，运行后的结果是Private Sub Command1_Click() Dim b%(1 To 4) , i%, t# For i=1 To 4 b(i) =i Next i t=Tof(b() ) Print "t="; t, End Sub Function Tof(a() As Integer) Dim t#, i% t=1 For i=2 To UBound(A) t=t * a(i) Next i Tof=t End Function |
查看答案 |
| 单选题 | 单击按钮时，以下程序运行后的输出结果是 Private Sub Command1_Click() Dim x As Integer, y As Integer, z As Integer x=1: y=2: z=3 Call God(x, x, z) Print x; x; z Call God(x, y, y) Print x; y; y End Sub Private Sub God(x As Integer, y As Integer, z As Integer) x=3 * z + 1 y=2 * z z=x + y End Sub |
查看答案 |
| 填空题 | 在树结构中，树根结点没有______。 | 查看答案 |
| 填空题 | Jackson结构化程序设计方法是英国的M.Jackson提出的，它是一种面向______ 的设计方法。 | 查看答案 |
| 填空题 | 面向对象的模型中，最基本的概念是对象和______ 。 | 查看答案 |
| 填空题 | 软件设计模块化的目的是______ 。 | 查看答案 |
| 填空题 | 数据模型按不同应用层次分成3种类型，它们是概念数据模型、 ______ 和物理数据模型。 | 查看答案 |
| 填空题 | 在Visual Basic的立即窗口内输入以下语句 X＝65 ?Chr$(X) 在窗口中显示的结果是 ______ 。 |
查看答案 |
| 填空题 | 下列程序是判断一个整数(>=3) 是否为素数，请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3) ") k=Int(Sqr(n) ) i=2 swit=0 While i <=k And swit=0 If n Mod i=0 Then ______ Else ______ End If Wend If swit=0 Then Print n; "是一个素数。" Else Print n; "不是一个素数。" End If |
查看答案 |
| 填空题 | 下面程序是用来打印九九乘法表的，请补充完整。 Dim i As Integer, j As Integer, Str1$ Str1="" For i=1 To 9 For j=1 To 9 If ______ Then Str1=Str1 + Str$(j) + "×" + Str$(i) + "=" + Str$(Val(i j) ) Else Str1=Str1 & Chr(13) ______ End If Next j Next i Print Str1 |
查看答案 |
| 填空题 | 在窗体上有一个命令按钮，然后编写如下程序： Function Trans(ByVal num As Long) As Long Dim k As Long k=1 Do While num k=k * (num Mod 10) num=num ＼ 10 Loop Trans=k Print Trans End Function Private Sub Command1_Click() Dim m As Long Dim s As Long m=InputBox("请输入一个数") s=Trans(m) End Sub 程序运行时，单击命令按钮，在输入对话框中输入"789"，输出结果为 ______ ,在输入对话框中输入"987"输出 ______ ,在输入对话框中输入"879"，输出结果为______ 。 |
查看答案 |
| 填空题 | 下面程序的功能是产生10个小于100(不含100) 的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请补充完整。 Sub PR() Randomize Dim a(10) For j=1 To 10 a(i) =Int( ______ ) If ______ Then k=k + 1 Print a(j) Next j Print k / 10 End Sub |
查看答案 |
| 单选题 | 算法的空间复杂度是指 | 查看答案 |
| 单选题 | 用链表表示线性表的优点是 | 查看答案 |
| 单选题 | 数据结构中，与所使用的计算机无关的是数据的 | 查看答案 |
| 单选题 | 结构化程序设计主要强调的是 | 查看答案 |
| 单选题 | 软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指 | 查看答案 |
| 单选题 | 检查软件产品是否符合需求定义的过程称为 | 查看答案 |
| 单选题 | 数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是 | 查看答案 |
| 单选题 | 应用数据库的主要目的是 | 查看答案 |
| 单选题 | 在数据库设计中，将E-R图转换成关系数据模型的过程属于 | 查看答案 |
| 单选题 | 在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是 | 查看答案 |
| 单选题 | 窗体文件的扩展名是 | 查看答案 |
| 单选题 | 下列可以启动Visual Basic的方法是 | 查看答案 |
| 单选题 | 关于货币型数据的说明，正确的是 | 查看答案 |
| 单选题 | 在运行程序时，在文本框中输入新的内容，或在程序代码中改变Text的属性值，相应会触发到什么事件？ | 查看答案 |
| 单选题 | 如果一个变量未经定义就直接使用，则该变量的类型为 | 查看答案 |
| 单选题 | 根据变量的作用域，可以将变量分为3类，分别为 | 查看答案 |
| 单选题 | 标签控件能够显示文本信息，文本内容只能用什么属性来设置？ | 查看答案 |
| 单选题 | 一个工程必须包含的文件的类型是 | 查看答案 |
| 单选题 | 在Visual Basic中，要使标签的标题栏居中显示，则将其Alignment属性设置为 | 查看答案 |