单选题表达式66/8 Mod 5&"avg"的值是
单选题以下变量名中合法的是
单选题有如下程序: Private Sub Form_Click() Dimi As Integer,sumASInteger sum=0 For i=2To 10 If i Mod2<>0 And i Mod 3=0 Then sum=sum+i End If Nexti Print sum EndSub 程序运行后,单击窗体,输出结果为( )。
单选题设有如下三个关系表:
R
A
B
C
1
1
2
2
2
3
S
A
B
C
3
1
3
T
A
B
C
1
1
2
2
2
3
3
1
3
下列操作中正确的是______。
单选题在属性窗121中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写),运行程序,如果按“A”键,则程序输出的是( )。
单选题如果一个正整数从高位到低位上的数字依次递减,则称其为降序数(如9632是降序数,而8516则不是降序数),现编写如下程序,判断输入的正整数是否为降序数。
Private Sub Command1_Click()
Dim n As Long
Dim flag As Boolean
n=InputBox("输入一个正整数")
s=Trim(Str(n))
For i=2 To Len(s)
If Mid(s,i-1,1)<Mid(s,i,1)
Then Exit For
Next
If i=Len(s) Then flag=True Else
flag=False
If flag Then
Print n; "是降序数"
Else
Print n; "不是降序数"
End If
End Sub
运行以上程序,发现有错误,需要剥给flag变量赋值的If语句进行修改。以下正确的修改是______。
单选题数据流图中带有箭头的线段表示的是( )。
单选题计算z的值,当x大于等于y时,z=x;否则z=y。下列语句错误的是( )。
单选题如果要定义一个窗体级变量,定义变量语句的位置应该是
单选题在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( ) Dim m As Integer,n As Integer,p As Integer m=3:n=5:p=O Call Y(m,n,p) Print Str(p)End SubSub Y(ByVal i As Integer,ByVal j As Integer,k As Integer) k=i + jEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是
单选题下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是______。
Private Sub Command1_Click()
Dim Num(25)As Integer, Chr1 As String
Chr1=UCase(InputBox("请输入字母字符串"))
For k=1 To Len(Chr1)
n=Asc(Mid(Chr1, k, 1))-Asc("A")
If n>=0 Then
Num(n)=Num(n)+1
End If
Next k
m=Num(0)
For k=1 To 25
If m<Num(k)Then
m=Num(k)
End If
Next k
Print m
End Sub
单选题在数据库管理系统提供的数据语言中,负责数据的查询及增、删、改等操作的是 A) 数据定义语言 B) 数据转换语言 C) 数据操纵语言 D) 数据控制语言
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Command1_Click() n=Val(Text1.Text) For i=2 To n Forj=2 To Sqr(i) If i Mod j=0 Then Exit For Next j If j>Sqr(i) Then Print i Next i End Sub 该事件过程的功能是( )。
单选题下面控件中,没有Caption属性的是
单选题以下不能用形状控件画出的图形是
单选题窗体上有名称为Text1、Text2的两个文本框,和一个由3个单选按钮构成的控件数组Opfion1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图2所示。为了实现上述功能,在程序中的横线处应填入的内容是()。PrivateSubOption1_Click(IndexAsInteger)IfText1.Text<>""ThenSelectCase______Case0Text2.Text=Text1.TextCase1Text2.Text=Text1.Text*10Case2Text2.Text=Text1.Text*100EndSelectEndIfEndSub
单选题设a=”a”,b=”b”,c=”c”,d=”d”,执行语句
x=IIf((ad),”A”,“B”)
后,X的值为
单选题下列程序段的执行结果为( )。
A=2
B=5
If A * B < 1 Then B=B - 1 Else B= - 1
Print B -A > 0
A) True
B) False
C) -1
D) 1
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
x = -5
If Sgn(x) Then
y = Sgn(x ^ 2)
Else
y = Sgn(x)
End If
Print y
End Sub
程序运行后,单击命令按钮,窗体上显示的是
单选题下列程序段的执行结果为( )。 a="ABBACDDCBA" For I=6 To 2 Step-2 x=Mid(a,I,I) y=Left(a,I) z=Right(a,I) z=x&y&z Next I Print z
