单选题下面关于直线控件的叙述中正确的是
单选题列表框中被选中的数据项的位置可以通过一个属性获得，这个属性是( )。
单选题下面过程定义语句可以使过程调用后不影响主调过程中的实际参数的是______ 。
单选题有下面的程序段，其功能是按图1所示的规律输出数据。Dima(3,5)AsIntegerFori=1To3Forj=1To5A(i,j)=i+jPrinta(i,j);NextPrintNext若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是____。图1数据输出规律图2数据输出规律
单选题要使文本框只具有垂直滚动条，则就( )。
单选题在窗体上画两个单选按钮(名称分别为Option1、Option2，标题分别为“宋体”和“黑体”)、1个复选框(名称为Check1，标题为“粗体”)和1个文本框(名称为Text1，Text属性为“改变文字字体”)，窗体外观如下图所示。程序运行后，要求“宋体”单选钮和“粗体”复选框被选中，则下列能够实现上述操作的语句序列是______。
单选题有如下函数过程：
Function Fun(By Val x As Integer,ByVal y As Integer)As Integer
Do While y＜＞0
reminder=x Mod y
x=y
y=reminder
Loop
Fun=x
End Function
以下调用函数的事件过程，该程序的运行结果是
Private Sub Command7_Click()
Dim a As Integer,b As Integer
a=100:b=25
x=Fun(a,b)
Print x
End Sub
单选题有如下过程代码：
Sub var_dim()
static numa As Integer
Dim numb As Integer
numa=numa+2
numb=numb+1
print numa; mub
End Sub
连续3次调用var_dim过程，第3次调用时的输出是______。
单选题在窗体模块的声明部分声明变量时，不能使用的关键字是
单选题满足下列条件之一的年份是闰年：1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份，下面判断闰年的正确表达式是
单选题有如下函数过程： Function lj(x As Integer)As Long Dims As Long Dimi As Integer s=0 Fori=1 To x s=s+i Nexti lj=s End Funcfion 在窗体上添加一个命令按钮，名为Commandl，编写事件过程调用该函数，输出结果为 ( )。 Private Sub Commandl_lick() Dimi As Integer Dim sum As Long Fori=1 To 5 sum=sum+lj(i) Nexti Print sum End Sub
单选题窗体上有一个名为List1的列表框和一个名为Command1的命令按钮，并有下面的事件过程：
Private Sub Command1_Click()
n%=List1.ListIndex
If n＞0 Then
ch$=List1.List(n)
List1.List(n)=List1.List(n-1):List1.List(n-1)=ch
End If
End Sub
程序运行时，选中1个列表项，然后单击Command1按钮，则产生的结果是
单选题在窗体中添加一个标签LblResult和一个命令按钮Command1，然后编写程序。程序的功能是单击命令按钮，计算1+2+3+4+5的值，并把结果转化为字符串显示在标签内，能够实现上述功能的程序段是， ( )
单选题数据库设计中反映用户对数据要求的模式是( )。
单选题有下面程序代码：
Private Sub Command1_Click()
Dim a As String
a="COMPUTER"
n=search(a, "T")
Print IIf(n=0, "未找到", n)
End SUb
Private Function search(str As String, ch As String)As Integer
For k=1 To Len(str)
c=Mid(str, k, 1)
If c=ch Then
search=k
Exit Function
End If
Next k
search=0
End Function
程序运行后，单击命令按钮Command1，输出结果是______。
单选题在Visual Basic中，不能关闭的窗口是
单选题已知通用对话框名为Cd1g，则执行下列的( )语句，将弹出“字体”对话框。
单选题下列关于复选框的说法，正确的是( )。
单选题关系表中的每一行记录称为一个( )。
单选题已知代数式eXSin(30°)2x/(x+y)Lnx，则正确的Visual Basic表达式为{{U}} {{/U}}。
A.E^*Sin(30*3.14/180)*2*X/X+Y*Log(X)
B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X)
C.Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*Log(x)
D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(x)