单选题为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:
Private Sub Command1_Click() Dim a%,s%,k%
s=1 a=2 For k=2 To
10 a=a*2
s=s+a Next k
Text1.Text=S End Sub
执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是{{U}} {{/U}}
A.把s=1改为s=0
B.把For k=2 To 10改为For k=1 To 10
C.交换语句s=s+a和a=a*2的顺序
D.同时进行B、C两种修改
单选题下面关于文件的叙述中错误的是( ) A.随机文件中各条记录的长度是相同的 B.打开随机文件时采用的文件存取方式应该是Random C.向随机文件中写数据应使用语句Print#文件号 D.打开随机文件与打开顺序文件一样,都使用Open语句
单选题在窗体上画一个名称List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单
单选题为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为( )。
单选题如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是
单选题下列不属于Visual Basic特点的是( )。 A) 对象的链接与嵌入 B) 结构化程序设计 C) 编写跨平台应用程序 D) 事件驱动程序编程机制
单选题如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项
单选题设a="a",b="b",c="c",d="d",执行语句
x=IIf((ad),"A","B")
后,x的值为
单选题A、B、C均为整型,执行下列语句后,窗口上将显示 _______。 A=7: B=2:C=11 Print A*C^2/B-A*C^2/B
单选题以下语句的输出结果是(在立即窗口中)
a="Beijing" <CR>(Δ为空格)
b="ShangHai" <CR>
Print a;b <CR>
单选题表达式Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是______。
单选题在窗体上画一个命令按钮,然后编写如下程序
Private Sub Command4 Click()
Dim a As Integer,b As Integer
a=1
b=2
Print N(a,b)
End Sub
Function N(x As Integer,y As Integer)As Integer
N=IIf(x>y,x,y)
End Function
程序运行后,单击命令按钮,输出结果为( )。
单选题图像框和图片框在使用时的不同之处是
____
。
单选题软件需求分析阶段的工作,可以分为4个方面:需求获取、需求分析、编写需求规格说明书以及
____
。
单选题数据字典(DD)所定义的对象都包含于
单选题下列选项中不属于结构化程序设计方法的主要原则的是__________。
A.自顶向下
B.逐步求精
C.模块化
D.可复用
单选题下列 ______ 语句可以为动态数组分配实际元素个数。
单选题在窗体上画一个文本框,其名称为Text1,然后编写如下程序:Option Base 1Pfivate Sub Form_Click()Dim Arr(10)As IntegerFor i=6 To 10An-(i)=i一3Next iTextl.Text=Str(Arr(6)+An-(An.(6)+Arr(10)))End Sub程序运行后,单击窗体,在文本框中显示的内容是( )。
单选题在菜单编辑器中建立一个名称为Menu0的菜单项,将其"可见"属性设置为False,并建立其若干子菜单, 然后编写如下过程: Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu Menu0 End If End Sub 则以下叙述错误的是______。 A) Menu0在菜单编辑器中定义弹出菜单的名称 B) 该过程的作用是弹出一个菜单 C) 单击鼠标右键时弹出菜单 D) 参数X、Y指明鼠标当前位置的坐标
单选题窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:Private Sub Command1_Click()Dim x As String,s As String,temp As StringDim i As IntegerX=InputBox("输入字符串","输入")If x< >""ThenFor i=Len(x)To 1 Step-1S=Mid(x,i,1)If s< >""Thentemp=S+tempElseList1.AddItem temps=""temp=""End IfNextList1.AddItem tempElseMsgBox"输入内容为空!"End IfEnd Sub程序运行后,单击命令按钮Command1,并输入“Happy new year”,则在List1中显示的内容为
