填空题

在窗体上添加两个文本框和一个按钮,在按钮的单击事件中添加如下代码:
Private sub command1_Click( )
Text1="vba test"
Text2=text1
Text1= "test end"
End sub
单击按钮后,text2中的文本内容是 【11】 。

【参考答案】

vba test
<上一题 目录 下一题>
热门 试题

填空题
若窗体中已有一个名为Cmd的命令按钮、一个名为Label1的标签和一个名为Text1的文本框,且文本框的内容为空,然后编写如下事件代码: Private Function f(x As Long) As Boolean If x Mod 2=0 Then f=False Else f=True End If End Function Private Sub Cmd_Click( ) Dim n As Long n=Val(Me! text1) p=IIf(f(n), 奇数“, 偶数 ) Me! Labell. Caption=n& 是 &p End Sub窗体打开运行后,在文本框中输入11,单击命令按钮,则标签显示内容为 【12】 。
填空题
下面VBA程序段运行时,内层循环的循环总次数是 【15】 For m = 0 To 7 step3 For n = m To m+1 Next n Next m
相关试题
  • 下列不属于控件格式属性的是( )。
  • 下列关系模型中术语解析不正确的是( )。
  • 用SQL语言描述“在学生表中查找女学生的全...
  • 能被“对象所识别的动作”和“对象所执行的...
  • 哪个查询会在执行时弹出对话框,提示用户输...