单选题窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为“计算”的命令按钮Command1,并编写了以下程序:PrivateSubCommand1_Click()Callcalc(HV.Value,HT.Value)EndSubPublicSubcalc(xAsInteger,yAsInteger)Text1.Text=x*yEndSub运行程序,单击“计算”按钮,可根据速度与时间计算出距离,并显示计算结果。对以上程序,下列叙述中正确的是______。
单选题下面关于列表框Selected属性的叙述中正确的是
单选题在窗体有一个水平滚动条名为Hscrolll,其属性设置如下: LargeCh8nge=15, SmallChange=3, Max=100,Min=20,Value=45 现单击该滚动条向右的箭头,Value的值将变为 ______。
单选题下列代码运行后输出结果是 Defstr B-E Private Sub Command1_Click() B$="123" C="456" Print B+C$ End Sub
单选题现在软件工程界提倡的( )是一种有效提高程序设计效率的方法。
单选题软件生命周期是指( )。 A) 软件产品从提出、实现、使用维护到停止使用退役的过程 B) 软件从需求分析、设计、实现到测试完成的过程 C) 软件的开发过程 D) 软件的运行维护过程
单选题为了使文本框同时具有水平和垂直滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为
单选题设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是______。
A.Line1.X1=Line2.X2且Line1.Y1=Line2.Y2
B.Line1.X1=Line2.Y1且Line1.Y1=Line2.X1
C.Line1.X2=Line2.X1且Line1.Y1=Line2.Y2
D.Line1.X2=Line2.X1且Line1.Y2=Line2.Y2
单选题窗体上有一个名称为command1的命令按钮,其中部分代码如下:
Private Sub Command1_Click()
Dim a(10)As Integer
Dim n As Integer
Call calc(a,n)
……
End Sub
CaIc过程的首行应该是______。
单选题在窗体上画一个名称为Text1的文本框,再建立一个名称为Option1的控件数组(含3个单选按钮,标题分别为宋体、黑体、仿宋,下标从0开始),并编写如下程序代码:
Private Sub Option1_Click(Index As Integer)
Dim ft As String
Select Case _________________
Case 0
ft = "宋体"
Case 1
ft = "黑体"
Case 2
ft = "仿宋"
End Select
Text1.FontName = ft
End Sub
程序运行后,单击某个单选按钮,可将文本框的文本字体设置为相应的字体,则在横线处应填入的内容是
单选题如果想在程序中反复使用一个日期型数据“01/01/2005”,为了避免在编写程序时反复输入这个数据,也为了一次能够修改程序中所有用到这个数据的语句,可以采用( )。
单选题设工程中有2个窗体:Form1、Form2、Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为“Teacher”,所有菜单项都可见;否则看不到“成绩录入”菜单项。为此,某人在Form1窗体文件中编写如下程序:
Private Sub Text 1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If Text1.Text="Teaeher"Then
Form2.input.Visible=True
Else
Form2.input.Visible=False
End If
End If
Form1.Hide
Form2.Show
End Sub
菜单结构
标题
名称
级别
成绩管理
mark
1
成绩查询
query
2
成绩录入
input
3
程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是______。
单选题下列程序的输出结果为( )。 S1="1":S2="2":S1=Val(S1)+Val(S2):S2=Val("12") If S1<>S2Then Print S1-S2 Else Print S2-S1
单选题下列不是标准控件的是______。
单选题假定程序中有以下语句:_______。
answer=MsgBox("Stringl",,"String2","String3",2)
执行该语句后,将显示一个信息框,此时如果单击“确定”按钮,则answer的值为:_______。
A. String1
B. String2
C. String3
D. 1
单选题在窗体上画一个文本框(其名称为Textl)和一个标签(其名称为Label1),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是【 】
单选题用来设置文字字体是否斜体的属性是( )。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private SubCommand1_Click() Dim num As Integer num=1 DO Until mum>6 Print num; num=num+2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。
单选题执行下列程序段后,输出的结果是( )。 Forkl=0 To 4 y=20 For k2=0 To 3 y=10 Fork3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y
单选题窗体上有一个名称为Label1的标签;一个名称为Timer1的计时器,其Enabled和Interval属性分别为True和1000。编写如下程序:Dim
n As IntegerPrivate Sub
Timer1_Timer() ch=Chr(n+Asc("A")) Label1.Caption=ch n=n+1 n=n
Mod 4End Sub运行程序,将在标签中______。
A.不停地依次显示字符"A"、"B"、"C"、"D",直至窗体被关闭
B.依次显示字符"A"、"B"、"C"、"D"各一次
C.每隔1秒显示字符"A"一次
D.每隔1秒依次显示26个英文字母中的一个