执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量strInput的内容是 ______。atrlnpu

您可能感兴趣的试题

• 1为了清除列表框中的所有内容，应使用的方法是 ______。A．ClsB．ClearC．RemoveD．RemoveItem

  为了清除列表框中的所有内容，应使用的方法是 ______。

  A．Cls

  B．Clear

  C．Remove

  D．RemoveItem

  点击查看答案进入在线练题题不想做，我帮你做
• 2窗体上画一个文本框（其名称为Text1)和一个标签（其名称为Labell)。要求程序运行后，如果在文本框中

  窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是 ______。

  A．Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub

  B．Private Sub Text1_Click() Labell.Caption=Text1.Text End Sub

  C．Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub

  D．Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub

  点击查看答案进入在线练题题不想做，我帮你做
• 3在窗体上画一个通用对话框，程序运行后，通过ShowOpen方法显示“打开”对话框，要求在该对话框的“文件

  在窗体上画一个通用对话框，程序运行后，通过ShowOpen方法显示“打开”对话框，要求在该对话框的“文件类型”栏中只显示扩展名为．DOC的文件，则对通用对话框的 Filter属性的正确设置是 ______。

  A．(*.DOC)*.DOC

  B．(*.DOC)|(.DOC)

  C．(*.DOC)||*.DOC

  D．(*.DOC)|*.DOC

  点击查看答案进入在线练题题不想做，我帮你做
• 4以下正确的叙述是 ______。Select Case xCase 1 to 10……End SelectA．Select Case语句中的测试表达

  以下正确的叙述是 ______。 Select Case x Case 1 to 10 …… End Select

  A．Select Case语句中的测试表达式可以是任何形式的表达式

  B．Select Case语句中的测试表达式只能是数值表达式或字符串表达式

  C．在执行Select Case语句时，所有的Case子句均按出现的次序被顺序执行

  D．如下Select Case语句中的Case表达式是错误的：

  点击查看答案进入在线练题题不想做，我帮你做
• 5在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Tex

  在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。

  A．27

  B．28

  C．29

  D．30

  点击查看答案进入在线练题题不想做，我帮你做
• 6在窗体上画一个命令按钮（其名称为Command1)，然后编写如下事件过程：Private Sub Command1_Click（)

  在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5，5)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=1 To 3 a(i，j)=(i-1)*3+j Print a(i，j) Next j Print Next i End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是 ______。

  A．1 4 7 2 5 8 3 6 9

  B．1 2 3 4 5 6 7 8 9

  C．1 2 3 4 5 6 7 8 9

  D．没有输出

  点击查看答案进入在线练题题不想做，我帮你做
• 7在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序：Priv

  在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。

  A．ABCD和10

  B．1234和100

  C．ABCD和100

  D．1234和10

  点击查看答案进入在线练题题不想做，我帮你做
• 8假定程序中有以下语句：answer=MsgBox（"String1",,"String2","String3",2)执行该语句后，将显示一

  假定程序中有以下语句： answer=MsgBox("String1",,"String2","String3",2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则answer的值为 ______。

  A．String1

  B．String2

  C．String3

  D．1

  点击查看答案进入在线练题题不想做，我帮你做
• 9设窗体Form1中有一名为mnuFile的菜单，它只有一个标题为Open的子菜单。为使程序运行时，按下Alt＋F键

  设窗体Form1中有一名为mnuFile的菜单，它只有一个标题为Open的子菜单。为使程序运行时，按下Alt+F键窗体中能够显示如下图所示的菜单项，则mnuFile的标题应为 ______.

  

  A．File(F)

  B．：File(F)

  C．：File(&F)

  D．File(-F)

  点击查看答案进入在线练题题不想做，我帮你做
• 10设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为 ______。x=IIF（（a＞B)And（c＜d)，10,20)A．10B．20C．30D．

  设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为 ______。 x=IIF((a＞B)And(c＜d)，10,20)

  A．10

  B．20

  C．30

  D．300

  点击查看答案进入在线练题题不想做，我帮你做