在表单中有命令按钮Commandl和文本框Text1，将文本框的InputMask属性值设置为$9,999.9，然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=123456.789，当运行表单时，单击命令按钮，此时文本框中显示的内容为______。

A．$123456.789

B．$23456.7

C．123456.7

D．**，***．*

[单选题]在表单中有命令按钮Command1和文本框Text1，将文本框的InputMask属性值设置为$9，999．9，然后在命令按钮的Click事件中输入代码ThisForm．Text1．Value=123456．789，当运行表单时，单击命令按钮，此时文本框中显示的内容为A．123457B．$23 456．7C．123457D．* * * *．*

[单选题]在表单中有命令按钮Command1和文本框Text1，将文本框的InputMask属性值设置为＄9,999.9，然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=12 3456.789，当运行表单时，单击命令按钮，此时文本框中显示的内容为A．＄123 456.789B．＄23 456.7C．123 456.7D．****.*

[单选题]窗体有命令按钮Commandl和文本框Text1，对应的事件代码如下：F．or i=1T04X==3F．or i=1t03F．or k=1T02x=x+3Next kNext jNext iText1．Value=Str(x)E．nd Sub运行以上事件过程，文本框中的输出是（ ）。A．6B．12C．18D．21

[单选题]窗体中有命令按钮Command1和文本框Text1，事件过程如下：F．unction result(ByVal x As Integer)As BooleanIf x Mod 2=0 Thenresult=Trueelseresult=FalseE．nd IfE．nd FunctionPrivate Sub Command1_Click()x=Val(InputBox(“请输入一个整数”))If______ ThenTextl=Str(x)&“是偶数．”E．lseTextl=Str(x)

[单选题]窗体有命令按钮Commandl和文本框Textl，对应的事件代码如下：Private Sub Commandl_Click()F．or i=1 To 4x=3F．or j=l to 3F．or k=1 To 2x=x+3Next kNext jNext iTextl．Value=Str(x)E．nd Sub运行以上事件过程，文本框中的输出是( )。A．6B．12C．18D．21

[单选题]（27）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1Text=p2(p1(x),y) Text2Text=p1(x) End Sub Private Function pl(x As Integer) As Integer x=x+y:y=x+y pl=x+y End Function Private Fun

[单选题]（30）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer Private Sub Commandl_Click() Dim x As Integerx=2 Text1.Text=p2(pl(x),y) Text2.Text=p2(x) End Sub Private Function p2(x As Integer,y As Integer) x=x+y：y=x+y pl=x+y End Function Private

[单选题]在表单Form1中有一个文本框text1，text1的InteractiveChange事件代码如下：CHAR1=ALLTRIM（THIS.VALUE）ASC1=ASC（CHAR1）+32THIS.VALUE=CHR（ASC1）该表单运行后，在文本框中输入一个大写ASCII码“T”，则文本框中显示内容将是（）。A . T+32B . T32C . tD . 97

[单选题]3在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1)，然后编写如下事件过程： Private Sub Commandl_Click() x=Val(Text1.Text) SelectCaseX Case 1，3 y=X*X CaseIS＞=10，IS＜=-10 y=X Case-10 To 10 y=-X End Select End SA．执行y=x*xB．执行y=-xC．先执行y=x*x，再执行y=-xD．程序出错

[单选题]在窗体中添加一个命令按钮Commandl和一个文本框Text1，编写命令按钮Com-mand1 的 Click事件代码； Private Sub Command1_Click() Dim S As String*20 S=TextText End Sub 该程序的功能是当单击按钮Command1时，把变量S中内容写入一个顺序文件 datl. dar中，正确的程序段是 ( )A．Open "datl. dat", For lnput As#1 Write井1,SB．Open"datl. da