单选题从键盘上输入一个实数nu，利用字符串函数对该数进行处理，如果输出的内容不是字符End，则程序输出的内容是
nu = InputBox("nu = ")
n$ = Str$ (nu)
p=InStr(n$，".")
if p＞0 Then
Print Mid$(n$.p)
Else
Print "END"
End If
单选题单击命令按钮执行下列程序，其输出结果是( )。
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer
a=3
b=4
c=5
Prim SecProc(c,b,a)
End Sub
Function FirProc(x As Integer,y As Integer,z As Integer)
FirProc=2*x+y+3*z
End Function
Function SecProc(x As Integer,y As Integer,z As Integer)
SecProc=FirProc(z,x,y)+x
End Function
单选题在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Pdnta=b+c End Sub 程序运行后，单击命令按钮，输出的结果是______。
单选题为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为______。 A) Dim pi As Integer B) Dim pi As Single C) Dim pi As Boolean D) Dim pi As Long
单选题以下是求1～100之间5或7的倍数的和，如下程序段：
Sum = 0
For i = 1 To 100
If i Mod 5 = 0 Or i Mod 7 = 0 Then
【】
End If
Next i
Print Sum
其中【】处书写正确的是（ ）
单选题能够获得一个文本框中被选取文本的内容的属性是( )。 A) Text B) Length C) SelText D) SelStart
单选题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim I, Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100):Print Num;
Select Case Num
Case 12
Exit For
Case 58
Exit Do
Case 65, 68, 92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后，下列描述中正确的是
单选题在某个事件过程中定义的变量是
单选题序言性注释的主要内容不包括______。
A. 模块的接口
B. 模块的功能
C. 程序设计者
D. 数据的状态
单选题在窗体上画l个命令按钮和l个文本框，其名称为Command1和Text1，再编写如下程序：
Dim ss As String
Private Sub Text1 KeyPress(KeyAscii As Integer)
If Chr(KeyAscii)<>""Then ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1 Click()
Dim m As String，i As Integer
For i=Len(ss)To 1 Step-1
m=m+Mid(SS，i，1)
Next
Text1．Text=UCase(m)
End Sub
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是( )。
单选题在以下Form1窗体中没有采用的控件是{{U}}{{/U}}A.文本框B.水平滚动条C.框架D.选项按钮
单选题有如下程序： Private Sub Command1_Click() a$="A WCIRKER IS HERE" x=Len(a$) For i=1 To x-1 b$=Mid$(a$,i,3) If b$="WOR"Then S=S+1 Next Print S End Sub 单击命令按钮，程序运行结果为
单选题设在当前目录下有一个名为“file．txt”的文本文件，其中有若干行文本。编写如下程序： Private Sub Commandl—Click() Dim ch$．ascii As Integer Open”file．txt”For Input As#1 While Not EOF(1) Line Input#1．ch ascii=toascii(ch) Print ascii Wend Close#1 End Sub Private Function toascii(mystr As String)As Integer n=0 For k=1 To Len(mystr) n=n+Asc(Mid(mystr，k，1)) Next k toastii=n End Function程序的功能是( )。
单选题在窗体上画1个名称为CD1的通用对话框，1个名称为Command1的命令按钮，编写如下Click事件过程：Click事件过程：Private Sub Command1_Click() CD1.FileName = "" CD1.Filter = "所有文件|*.*|所有jpg文件|*.jpg|所有bmp文件|*.bmp" CD1.FilterIndex = 2 CD1.Action = 1End Sub关于以上代码，正确的叙述是( )。
单选题在满足实体完整性约束的条件下______。
单选题下列方法中，属于白盒法设计测试用例的方法的是( )。
单选题命令按钮Commandl的MouseUp事件过程结构如下：Private Sub Commandl—MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single)End Sub则以下叙述中错误的是( )。
单选题下面关于多窗体程序设计的说法不正确的是______ 。
单选题下列不属于数据库管理系统提供的数据语言的是
单选题在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd Sub