有一个对象名称是 TxtPassword 文本框,运行后,在该文本框中输入“A”后,文本框中显示的是: A 。 Private Sub TxtPassword_KeyPress （） If KeyAscii >= 122 Or KeyAscii =< 97 Then KeyAscii =0 Beep End If End Sub

A . 日期型 B . 数值型 C . 字符型 D . 以上操作出错

A . Enabled B . Visible C . Interval D . Timer

A . PARENT.TEXT1.VALUE B . THIS.TEXT1.VALUE C . THISFORM.TEXT1.VALUE D . THIS.THISFORM.TEXT1.VALUE

A . THIS.THISFORM.Text1.Value B . THISFORM.Text1.Value C . THIS.PARENT.PARENT.Text1.Value D . THISFORM.PARENT.Text1.Value

Private Sub Timer1_ TxtTime.text=Time End Sub 在下画线上应填入的内容是 A．Enabled B．Visible C．Interval D．Time

<img src='https://img2.soutiyun.com/ask/uploadfile/4317001-4320000/63c20c661602bfec53b19f6c83268fac.jpg' /> A.Private Sub save Click（） Text1．Text=file．save．Caption End Sub B.Private Sub save Click（） Text1．Text=save．Caption End Sub C.Private Sub file Click（） Text1．Text=file．save．Caption End Sub D.Private Sub file Click（） Text1．Text=save．Caption End Sub

<img src='https://img2.soutiyun.com/shangxueba/ask/4359001-4362000/4359886/ct_ctvbbm_choose_05019(20092).jpg' /> 设有如下的类型声明 TyPe Person name AS String*8 major AS String*20 End TyPe 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29 .dat中。设文本框中的数据已正确地赋值给Person类型的变量P.则能够正确地把数据写入文件的程序段是 A．Open"c：\Test29.dat"For Random As1 Put1，1，p C10se 1 B．OpeH"c：\Test29.dat"For Random As 1 Get1，1，p C108C1 C．Open"c：\Test29.dat"For Random As1 Len=Len(p) Put1，1，p C108C1 D．OPell"c：\Test29.dat"For，Random As1 Len=Len(p) Get1，1，p C106e1

Private Sub Command1_Click（） n = Val（Text1.Text） For i = 2 To n For j = 2 To sqr（i） If i Mod j = 0 Then Exit For Next j If j ＞ Sqr（i） Then Print i Next i End Sub 该事件过程的功能是（）。 A．输出n以内的奇数 B．输出n以内的偶数 C．输出n以内的素数 D．输出n以内能被j整除的数

A．Me!Text1．Caption=sum B．Me!Text1．Value=sum C．Me!Text1．Text=sum D．Me!Textl．Visible=sum

<img src='https://img2.soutiyun.com/ask/uploadfile/10839001-10842000/b6e1961a1ece372d5b5d9638e1f875a5.jpg' />

A．This.ThisForm.Text1.Value B．This.Parent.Parent.Text1.Value C．Parent.Parent.Text1.Value D．This.Parent.Text1.Value

窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（）。<img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/9ee39e48e3711140203a592ce77b107b.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/54c76f430783fad60b8a548d0f7a9765.jpg' />

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写 如下事件过程： Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To Sqr(i) If i Mod j=0 Then Exit For Next j If j＞Sqr(i)Then Print i Next i End Sub 该事件过程的功能是 A．输出n以内的奇数 B．输出n以内的偶数 C．输出n以内的素数 D．输出n以内能被j整除的数

<img src='https://img2.soutiyun.com/ask/uploadfile/2523001-2526000/b1da673322f0d1df5aa81b5625094699.jpg' /> 在下划线上应填入的内容是 A．Time B．False C．True D．Timer

A．将txtNoteEdit中的所有内容存放到st变量中，并将txtNoteEdit选中的内容清除，实现了剪切 B．将txtNoteEdit选中的内容存放到st变量中，并将txtNoteEdit中所有的内容清除，实现了剪切 C．将txtNoteEdit选中的内容存放到st变量中，并将txtNoteEdit选中的内容清除，实现了剪切 D．以上说法都不正确

<img src='https://img2.soutiyun.com/ask/uploadfile/4884001-4887000/bf8d65c222511bcbd6a987853bf72602.gif' /> A ） Me!Text1.Caption=sum B ） Me!Text1.Valuc=sum C ） Me!Text1.Text=sum D ） Me!Text1.Visiblc=sum

在名为Form1的窗体上绘制一个文本框(名称为Text1)和一个水平滚动条(名称为 HSl)。在属性窗口中对滚动条设置如下属性： Min 500 Max 2000 LargeChange 50 SmallChange 20 编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框的高度，并使得文本框的宽度始终是其高度的1.2倍。运行后的窗体如下图所示。 <img src='https://img2.soutiyun.com/shangxueba/ask/11181001-11184000/11182470/ct_ctvbjj_ctvbjbasicope_00061(20096).jpg' /> 注意： 要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为execise58.vbp，窗体文件名为execise58.frm。

A．语句fun=n有错，因为n是整型，fun没有定义类型 B．运行程序，输入值为5时，文本框中显示655 C．运行程序，输入值为6时，文本框中显示42 D．ByRef表示参数按址传递

A．日期型 B．数值型 C．字符型 D．以上操作出错

A．Alt+F2 B．ab1 C．随机显示 D．不显示任何信息