单选题 | 在利用菜单编辑器设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为 | 查看答案 |
单选题 | 在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序: Dim ss As String Private Sub Text1_KeyPress(KeyAscii As integer) If chr(KeyAscii)<>””Then ss=ss+chr(KeyAscii) End Sub Private Sub Command1_Click() Dim m As String,i As Integer For i=Len(ss) To 1 step -1 m=m+Mid(ss,i,1) Next Text1.Text=Ucase(m) End Sub 程序运行后,在文本框中输入“Number100”,并单击命令按钮,则文本框中显示的是 |
查看答案 |
单选题 | 窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enable属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停止移动。 为实现上述功能,某人把计时器的Interval属性设置为1000,并编写了如下程序: Private Sub Timer1_Timer() For k=Line1.X1 To Line2.X1 Step 100 If Shape1.Left+Shape1.Width<Line2.X1 Then Shape1.Left=Shape1.Left+100 End If Next k End Sub 运行程序时发现圆立即移动到了右边的直线处,与题目要求的移动方式不符。为得到与题目要求相符的结果,下面修改方案中正确的是 |
查看答案 |
单选题 | 下列有关文件的叙述中,正确的是 | 查看答案 |
单选题 | 窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Command1_Click() Dim n%,k% n=Len(Text1.Text) For k=0 To List1.ListCount-1 If Left(List1.List(k),n)=Text1.Text Then List1.RemoveItem k End If Next k End Sub 在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”,则只删除了“刘邦”、“刘备”2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把For k=0 To List1.ListCount-1改为 |
查看答案 |
单选题 | 在深度为5的满二叉树中,叶子结点的个数为 | 查看答案 |
单选题 | 若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是 | 查看答案 |
单选题 | 一些重要的程序语言(如C语言和Pascal语言) 允许过程的递归调用。而实现递归调用中的存储分配通常用 | 查看答案 |
单选题 | 软件工程的理论和技术性研究的内容主要包括软件开发技术和 | 查看答案 |
单选题 | 开发软件时对提高开发人员工作效率至关重要的是 | 查看答案 |
单选题 | 在软件测试设计中,软件测试的主要目的是 | 查看答案 |
单选题 | 数据处理的最小单位是 | 查看答案 |
单选题 | 索引属于 | 查看答案 |
单选题 | 下述关于数据库系统的叙述中正确的是 | 查看答案 |
单选题 | 数据库系统的核心是 | 查看答案 |
单选题 | 下列说法错误的是 | 查看答案 |
单选题 | 下列四组控件属性中,属性值的类型不相同的一组是 | 查看答案 |
单选题 | 下列方法中不能退出Visual Basic的是 | 查看答案 |
单选题 | 任何控件都有的属性是 | 查看答案 |
单选题 | 可以实现从键盘输入一个作为双精度变量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 |
查看答案 |
单选题 | 算法的空间复杂度是指 | 查看答案 |
单选题 | 用链表表示线性表的优点是 | 查看答案 |
单选题 | 数据结构中,与所使用的计算机无关的是数据的 | 查看答案 |
单选题 | 结构化程序设计主要强调的是 | 查看答案 |
单选题 | 软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指 | 查看答案 |
单选题 | 检查软件产品是否符合需求定义的过程称为 | 查看答案 |
单选题 | 数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是 | 查看答案 |
单选题 | 应用数据库的主要目的是 | 查看答案 |
单选题 | 在数据库设计中,将E-R图转换成关系数据模型的过程属于 | 查看答案 |
单选题 | 在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是 | 查看答案 |