首页 > 电子信息工程> 数字信号处理

网友您好，请在下方输入框内输入要搜索的题目：

请输入或粘贴题目内容搜题

搜题

拍照、语音搜题，请扫码下载APP

题目内容（请给出正确答案）

[单选题]

有一个窗体Form1，其中有一个文本编辑框Text1和一个命令按钮Command1。运行窗体后在文本编辑框中输入一串字符，单击命令按钮后该窗体的标题改变为文本编辑框中输入的字符串。则宏命令SetValue的参数设置是( )。

A.“项目”：[Forms]![Form1]，“表达式”：[Forms]![Form1]![Text1]

B.“项目”：[Forms]![Form1].[Caption]，“表达式”：[Forms]![Form1]![Text1]

C.“项目”：[Forms]![Form1].[Caption]，“表达式”：[Forms]![Form1]![Command1]

D.“项目”：[Forms]![Form1]![Text1]，“表达式”：[Forms]![Form1]![Command1]

答案

查看答案

发布时间：2022-12-04

更多“有一个窗体Form1，其中有一个文本编辑框Text1和一个命令按钮Command1。运行窗体后在文本编辑框中输入一串字符”相关的问题

第1题

有一个窗体Form1，其中有命令按钮Command1，现要求单击该按钮用VBA程序打开已有的数据表“学生”，正确的命令是( )。

A.DoCmd.OpenTable学生

B.DoCmd.OpenTable"学生"

C.DoCmd.OpenForm学生

D.DoCmd.OpenForm"学生"

点击查看答案

第2题

有一个窗体Form1，要求该窗体只能运行30s，时间一到则窗体将自动关闭。程序空白处应填写（)。 Private Sub Fo

有一个窗体Form1，要求该窗体只能运行30s，时间一到则窗体将自动关闭。程序空白处应填写( )。

Private Sub Form_Load()

Me.TimerInterval=1000

i=0

End Sub

Private Sub Form_Timer()

______

If i=30 Then

DoCmd.CloSe

End If

End Sub

A．i=i+1 B．i=i-1

C．i=i+30 D．i=i-30

点击查看答案

第3题

在MDI主窗体中,如何新建一个MDI子窗体？

A.Form1_NewMdiChild=new_Form1();NewMdiChild.MdiParent=this;

B. Form1_NewMdiChild=new_Form1();this.MdiChild=NewMdiChild;

C. Form. 1.MdiParent=this;

D. this.MdiChild=Form1;

点击查看答案

第4题

一个工程含有多个窗体及标准模块，下列叙述错误的是（)。

A、如果工程含Form1窗体，程序首先执行该窗体的事件过程

B、任何时刻最多只有一个窗体是活动窗体

C、标准模块不能设置为启动模块

D、Hide方法只是隐藏而不从内存中清除窗体

点击查看答案

第5题

如果Form2是启动窗体，并且Form2的Load事件过程中有Form1.Show,则程序启动后（)。

A、发生一个运行时错误

参考答案：

C、在所有的初始化代码运行后Form1是活动窗体

D、在所有的初始化代码运行后Form2是活动窗体

点击查看答案

第6题

编写一个过程把C盘中的Config. sys文件内容读出，并在文本框中显示出来。在窗体Form1建立一个文本

框Text1，将其MultiLine属性设置为True,将ScrollBars属性设置为3-Both。根据题意。请完善下列程序。 option Explicit Private Sub Form. C1ick() Dim chl As String, fn As Integer Dim Str As String fn=【】 Open "C:\Config. sys" For Input As fn Do While Not EOF(【】) Line Input fn, chl Str=Str+chl+vbCrLf Loop Text1. Text=【】 End Sub

点击查看答案

第7题

编写一过程将C盘中的Config.sys文件内容读出，并在文本框中显示出来。在窗体Form1上建立一个文本框

Text1，将其MultiLine属性设置为True，ScrollBars属性设置为3-Both。给定的程序不完整，请将程序补充完整。 Option Explicit Private Sub Form. _Click() Dim ch1 As String，fn As Integer Dim Str As String fn=【】 Open "C:\Config.sys" For Input As fn Do While Not EOF(【】) Line Input fn, ch1 Str = Str + chl+ vbCrLf Loop Text1.Text =【】 End Sub

点击查看答案

第8题

在窗体form1上有一个驱动器列表控件Drivel，一个目录列表控件Dirl，一个文件列表控件File1，一个富

文本控件Richtexbox1。要求程序运行以后，用户可以利用。Drivel选择不同驱动器，同时Dirl中显示当前选中的驱动器的目录，用户利用Dirl选择文件所在的文件夹，在Filel控件中将显示当前选中的文件夹下的文件，用户选中其中某个文件(假设为文本文件)，则该文件的内容显示在控件Richtexboxl中。补充相应的语句，使之完成所述的功能。 Private Sub Dirl_Change() 【】 End Sub Private Sub Drive1_Change() 【】 End Sub Private Sub Filel _Click() Dim fname AS String If【】Then fname=Filel．Path & Filel．FileName Else fname=Filel．Path& "\" & Filel．FileName End If RichTextBox1．LoadFile(fname) End Sub

点击查看答案

第9题

在窗体Form1中有按钮Button1，以下那个Click事件处理程序可以关闭该窗体?()

在窗体Form1中有按钮Button1，以下那个Click事件处理程序可以关闭该窗体？（)

在窗体Form1中有按钮Button1，以下那个Click事件处理程序可以关闭该窗体？()

A.Form1.Close();

B.this.Close();

C.Button1.Close();

D.me.Close();

点击查看答案

第10题

在窗体Form1中有按钮Button1，以下哪个Click事件处理程序可以关闭该窗体?()