题目内容

设有如下通用过程: Public Function Fun(xStr As String) As String Dim tStr As String, strL As Integer tStr="":strL=Len(xStr) i=strL/2 Do While i<=strL tStr=tStr&Mid(xStr,i+1,1) i=i+1 Loop Fun=tStr & tStr End Function 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim S1 As String S1="ABCDEF":Text1.Text=LCase(Fun(S1)) End Sub 程序运行后,单击命令按钮,文本框中显示的是

ABCDEF
B. abcdef
C. defdef
D. defabc

查看答案
更多问题

设在一个工程的窗体中有如下代码: Public x As Integer Private Sub Form_Load() Dim y As Integer End Sub 在该工程的标准模块的声明部分有代码:Public a As Integer:Private b As Integer 关于上述代码,以下叙述中错误的是

A. 变量x的作用域是整个工程
B. 变量y的作用域是Form_Load过程
C. 变量a的作用域是整个工程
D. 变量b的作用域是整个标准模块

下面能够将某个变量声明为局部变量的是

A. 在窗体模块的声明部分,用关键字Static声明这个变量
B. 在窗体模块的声明部分,用关键字Dim声明这个变量
C. 在需要使用这个变量的过程中,用关键字Private声明这个变量
D. 在需要使用这个变量的过程中,用关键字Public声明这个变量

以下不合法的VB变量名是

A. filename
B. read
C. _y
D. .e5

工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:Public x As Integerprivate y As Integer窗体文件的程序代码是: Dim a As Integer Private Sub Form_Load() Dim b As Integer a=2:b=3::x=10:y=20 End Sub Private Sub Command1_Click() a=a+5:b=b+5:x=x+5:y=y+5 Print a; b; x; y End Sub 运行程序,单击窗体上的命令按钮,则在窗体上显示的是

A. 5 5 15 5
B. 7 5 15 25
C. 7 8 15 5
D. 7 5 15 5

答案查题题库