单选题以下语句的输出结果是
Print Format$(5874.567,"0.00E-00")
单选题设a="Visual Basic",下面语句中可使b="Basic"的是( )。
单选题设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Function fun(a As Integer,b As Integer)While a>b a=a-b Wend fun=aEnd Function在调试时发现函数是错误的。为使函数能产生正确的返回值,应做的修改是
单选题设一棵树的度为4,其中度为4,3,2,1的结点个数分别为2,3,3,0。则该棵树中的叶子结点数为( )。
单选题在窗体上有两个文本框:Text1和Text2,然后编写如下事件过程: Private Sub Form_Load() Show Text1.Text=" ":Text2.Text=" ":Text2.SetFocus End Sub Private Sub Text2 KeyDown(KeyCode As Integer,ShiflAs Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后,如果在Text2文本框中输入“ertyu”,则Text1文本框中的内容为( )。
单选题下面程序执行时,输出的结果是( )。 Private Sub Form_Click() Dim i As Integer,j As Integer i=10 Do i=i+j Forj=10 To i Step-3 i=i+j Nextj Loop While i<50 Print i;j End Sub
单选题有三个关系R、S和T如下:
R
A
B
C
a
1
n
b
2
m
c
3
f
d
5
e
S
A
D
c
4
a
5
e
7
T
A
B
C
D
c
3
f
4
a
1
n
5
则由关系R、S得到关系T的操作是______。
单选题有数据定义语句:Dim X,YAs Integer以上语句表明
单选题下列合法的变量名是
单选题下面有关标准模块的叙述中,错误的是( )。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim m As Integer,i As Integer,x(3)As Integer For i=0 To 3 : x(i)=i:Next i For i=1 To 2:Call subl(x,i):Next i For i=0 To 3:Print x(i);:Next i End Sub Private Sub subl(a( )As Integer,k As Integer) Dim j As Integer Do a(k)=a(k)+a(k+1) j=j+1 Loop While j<2 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
单选题函数UCase("basic")的值为________。
A.Visual
B.basic
C.VISUAL
D.BASIC
单选题下面程序的输出结果是______。
Private Sub Command1_Click()
ch$="ABCDEF"
proc ch
Print ch
End Sub
Private Sub proc(ch As String)
S=""
For k=Len(ch)To 1 Step-1
s=s&Mid(ch,k,1)
Next k
ch=s
End Sub
单选题在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:
Private Sub Form_Load( )
Text1.Text = ""
For I = 1 To 10
Sum = Sum + I
Next I
Text1.Text = Sum
End Sub
上述程序的运行结果是( )
单选题以下程序的运行结果是______。
单选题如果在Visual Basic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是______。
A.用鼠标双击窗体的任何部位
B.执行“工程”菜单中的“属性窗口”命令
C.按Ctrl+F4键
D.按F4键
单选题栈实际上是一种特殊的线性表,即在这种线性表的结构中,( )。
单选题下列程序段的执行结果是______ 。
a=0
b=0
For i = -1 To -2 Step -1
For j = 1 To 2
b=b+1
Next j
a=a+1
Next i
Print a; b
单选题设有如下的用户定义类型: Type Student Number As String:Name As String:Age As Integer End Type 则以下正确引用该类型成员的代码是
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:
Private Sub Command 1_Click()
a$="pascal程序设计技巧"
b$="c++编程指南"
c$=UCase(Left(b$,5)&Right$(a$,2))
Text1.Text=C$
End Sub
运行上面的程序,单击命令按钮,文本框中显示的结果为
