单选题在数据管理技术发展的三个阶段中,数据共享最好的是( )。
单选题在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click( ) A = Text1.Text+Text2.Text Print a End Sub Private Sub Form_Load( ) Text1.Text = "" Text2.Text = "" End Sub 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44,然后单击命令按钮,则输出结果为________。
单选题设有语句:Open"d:\Test.txt"For Output As #1,下列叙述中错误的是
单选题表达式3^2*2+3MODl0/4的值是( )。
单选题在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口 中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果单 击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程 序:
Private Sub Command1_Click() Timer1.______
End Sub
Private Sub Timer1_Timer() Text1.Text = Time
End Sub
在下划线处应填入的内容是______。
单选题下列关于栈的叙述正确的是______。
A.栈是非线性结构
B.栈是一种树状结构
C.栈具有“先进先出”的特征
D.栈具有“后进先出”的特征
单选题关于KeyPress事件,以下叙述中正确的是( )。
单选题有变量定义语句Dim max,min As String,则可以知道max的类型是
单选题某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:
Private Sub Command1_Click()
Openout.txtFor Output As#2
PrintText1
Close#2
End Sub
调试时发现没有达到目的,为实现上述目的,应做的修改是______。
单选题只有将组合框的Style属性设置为何值时,才能触发DblClick事件?
单选题以下不具有Picture属性的对象是
单选题窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于______。
A.VScroll1.LargeChange
B.VScroll1.SmallChange
C.VScroll1.Max
D.VScroll1.Min
单选题下面4个选项中,不是窗体属性的是( )。
单选题下面程序的执行结果是______。
Private Sub Command1_Click()
a=0
k=1
Do While k<4
X=k^k^a
k=k+1
Print x;
Loop
End Sub
单选题Visual Basic中的每个对象都有自己的名字,名字的长度不能超过______ 个字符。 A) 10 B) 32 C) 128 D) 255
单选题下列方法中,能够使对象获得焦点的是( )。
单选题Print Format(1234.56,“###.#”)语句的输出结果是( )。
单选题设a=2,b=3,c=4,d=5,下列表达式的值是a>b And cc
单选题单击一次命令按钮,下列程序代码的执行结果为( )。 Private Sub Command1 Slick() Dim a As Integer,b As Intege,c As Integer a=2:b=3:c=4 Print P2(c,b,a) End Sub PrivateFunction P1(x As Integer,y As Integer, z As Integer) P1=2*x+y+3*z End Function Private Function P2(x AS Integer,y As Integer, z As Integer) P2=P1(z,x,y)+x End Function
单选题在窗体上画一个Text1文本框和一个HScroll1水平滚动条,然后编写以下程序并运行: Private Sub Form_Load() HScroll1.Max = Text1.Width * 2 HScroll1.Value = Text1.Width HScroll1.Width = HScroll1.MaxEnd SubPrivate Sub HScroll1_Change() Text1.Width = HScroll1.ValueEnd Sub下面叙述中错误的是
