单选题语句Print Sgn(-6^2)+Abs(-6^2)+int(-6^2)的输出结果是( )。
单选题为了防止用户随意将光标置于控件上,应( )。
单选题下列代码运行后输出结果是( )。 Defstr B-E Private Sub Cornmand1_Click() B$=“123” C=“456” Print B+C$ End Sub A) 123456 B)“123456” C) 123+“456” D) 显示出错信息
单选题目录列表框的Path属性的作用是( )。 A) 显示当前驱动器或指定驱动器上的目录结构 B) 显示当前驱动器或指定驱动器上的某目录下的文件名 C) 显示根目录下的文件名 D) 显示该路径下的文件
单选题为了使列表框中的项目呈多列表显示,需要设置的属性为
单选题下列程序的功能是:调用字体对话框来设置文本框中的字体,单击C。mmand1按钮弹出对话框,进行相应的字体、字号等的设置,然后单击“确定”按钮退出对话框,则将发生哪些变化( )。 Private Sub Command1_Click() CommonDialog1.CancelError=True CommonDialog1.Flags=3 On Error Resume Next CommonDialog 1.ShowFont Text1.Font.Name=CommonDialog1.FontName Text1.Font.Size=CommonDialog1.FontSize Text1.Font.Bold=CommonDialog1.FontBold Text1.Font.Italic=CommonDialog1.Fontltalic Text1.Font.Undefiine=CommonDialog1.FontUnderline Text1.FontStrikethru=CommonDialog1.FontStrikethru Text1.ForeColor=CommonDialog1.Color End Sub
单选题在窗体上画一个文本框和一个列表框,然后编写下列两个事件过程: Private Sub Form_Load() List1.AddItem"357" List1.AddItem"246" List1.AddItem"123" List1.AddItem"456" Text1.Text="" End Sub Private Sub List1 DblClick() m=List1.Text Print m+Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的"456",输出结果是( )。
单选题在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程 Private Sub Form_Load() List1.Addltem"Iteml" List1.Addltem"Item2" List1.Addltem"Item3" End Sub Private Sub Command1_click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为______。
单选题在窗体上有一个命令按钮Command1,编写如下程序: Private Sub
Command1_Click() Print pp1(3,7)
End Sub Public Function pp1(x As Single,n As Integer)As
Single If n=0 Then
pp1=1 Else
If n Mod 2=1 Then
pp1=x*x+n
Else
pp1=x*x-n End If
End If End Function
程序运行后,单击该命令按钮,屏幕上显示的是{{U}} {{/U}}。
A. 2
B. 1
C. 0
D. 16
单选题在窗体(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)中分别输入123和321,然后单击命令按钮,则输出结果为( )。
单选题对窗体编写如下事件过程: Private Sub Form _ MouseDown(BuRon As Integer,Shift As Integer, X As Single, Y As Single) If Button=2 Then Print "AAAAA" End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single, Y As Single) Print "BBBBB" End Sub 程序运行后,如果单击鼠标右键,则输出结果为 ______。
单选题数据库设计的四个阶段是:需求分析、概念设计、逻辑设计和( )。
单选题以下( )不属于对象的基本特征。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c="ABCD" For n=1 T0 4 Print ______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在______处应填入的内容为
单选题设有如下程序:Private Sub Inv(ByVal xStr As String,As String) Dim tStr As String Dim L AS Integer L=Len(xStr) Do While L>=1 tStr=tStr+Mid(xStr,L,1):L=L-1 Loop yStr=tStr End Sub Private Sub Form_Click() Dim S1 As String,S2 As String S1="abcdef"Inv S1,S2 Print S2End Sub运行程序,单击窗体,输出结果为
单选题有以下程序:
Option Base 1
Dim arr()As Integer
Private Sub Form_Click()
Dim i As Integer,j As Integer
ReDim arr(3,2)
FOr i=1 To 3
For j=1 To 2
an"(i,J)=i*2+j
Next j
Next i
ReDim Preserve arr(3,4)
For j=3 To 4
arr(3,j)=j+9
Next j
Print arr(3,2);arr(3,4)
End Sub
程序运行后,单击窗体,输出结果为【 】
单选题
单选题下列程序段的运行结果是:Private Sub Command1_Click() Dim n AS Integer I =21: n = 3 do while I>n I=I- n Loop Print IEnd Sub在窗体上打印的结果是______。
单选题若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是______。
单选题定时器的Interval属性的值是一个整数,它表示的是( )。