单项选择题

在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”, 如图所示。

现有如下事件过程: Private Sub Text1_Change()
Text2.Text=Mid(Text1,1,1)
End Sub
运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是:(  )。

A.DataA
B.DataB
C.aData
D.aBase

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

单项选择题
窗体上有一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮,并有如下事件过程: Private Sub Command1_Click() CommandDialog1.DefaultExt=”doc” CommandDialog1.FileName=”VB.txt” CommandDialog1.FileName=”All(*.*)|*.*|Word|*.Doc|” CommandDialog1.FileName=1 CommandDialog1.ShowSave End Sub 运行上述程序,如下叙述正确的是( )。

A.打开的对话框中文件“保存类型”框中显示“All(*.*)”
B.实现保存文件的操作,文件名是VB.txt
C. DefaultExt属性与FileName属性所指明的文件类型不一致,程序出错
D.对话框的Filter属性没有指出txt类型,程序运行出错

单项选择题
设有打开文件的语句如下: Open“test.dat” For Random As #1 要求把变量a中的数据保存到该文件中,应该使用的语句是( )。
A.Inpur #1,a
B.Write #1.a
C.Put #1,.a
D.Get #1..a
相关试题
  • True
  • temp
  • Label1.Caption
  • ch
  • List2.AddItem List1.Text