单选题在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存在方式 ______。
单选题某人设计了如下程序用来计算并输出7!(7的阶乘)。
Private Sub Command1_Click()
t=0
For k=7 To 2 Step-1
t=t*k
Next
Print t
End Sub
执行程序时,发现结果是错误的,下面的修改方案中能够得到正确结构的是______。
单选题下列语句都是在Form中定义的,( )是错的。
单选题运行下述语句后,输出的结果是( )。 Option Base 1 Dim a i=1 a = Array(1,-2,9,0,-1,9) Do k = a(i) For m = 10 To k Step -2 n=k+m Next m Print n + m i=i+1 Loop While Abs(m + n)<>27
单选题某二叉树的中序序列为BDCA,后序序列为DCBA,则前序序列为
单选题以下语句的输出结果是 ______。
Print Format $(“123.58”,“#,###.00”)
单选题数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是( ) A.DB包括DBS和DBMS B.DBMS包括DB和DBS C.DBS包括DB和DBMS D.没有任何关系
单选题关于水平滚动条,如下叙述中错误的是
单选题以下能对正实数d的第3位小数四舍五入的表达式是
单选题编写如下程序:
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=InputBox("输入第一个数")
y=InputBox("输入第二个数")
Call f(x,y)
Print x,y
End Sub
Sub f(a AS Integer, ByVal b As Integer)
a=a*2
x=a+b
b=b+100
End Sub
程序运行后,单击命令按钮Command1,并输入数值10和15,则输出结果为______。
单选题在窗体上画一个命令按钮,并编写如下事件过程: Private Sub Command1_Click() For i=5 To 1 Step-0.8 Print Int(i); Next i End Sub 运行程序,单击命令按钮,窗体上显示的内容为
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Prirate Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
单选题阅读程序:
Private Sub Form_Click()
msg1$="继续吗?"
msg2$="操作对话框"
r=MsgBox(msg1$,vbYesNo Or vbDefauhButton2,msg2$)
End Sub
程序运行后,单击窗体,将产生一个信息框。此时如果直接按回车键,则相当于用鼠标单击信息框中的某个按钮,这个按钮是
单选题在窗体上画一个名称为Text1的文本框,然后画一个名称为Hscroll1的滚动条,其Min和Max属性分别为0和1000。程序运行后,如果移动滑块,则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是______。
单选题设在菜单编辑器中定义了一个菜单项,名为menul为了在运行时隐藏该菜单项,应使用的语句是
单选题设有如下程序段:
Dim a(10)
…
For Each x In a
Print x;
Next x
在上面的程序段中,变量X必须是______。
单选题在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Commandl_Click()
Text1.Text=LCase(SaveAll)+SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为______。
单选题当Visual Basic表达式中含有以下多种运算时( )。 ①关系运算 ②算术运算 ③逻辑运算 ④函数运算 正确的运算顺序为( )。
单选题在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click() Private Sub fl(ByRef x1 As Integer,_ Dimx As Integer y1 As Integer) x=10:y=5 x1=x1+2:y1=y1+2 Call fl(x,y) End Sub Print x,y End sub 程序运行后,单击命令按钮,在窗体上显示的内容是
单选题在窗体上有一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(5)As String
a(i)=Chr(Asc("A")+(i-1))
Next
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是______。
