单选题在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
x=-3
If Sgn(x)Then
y=Sgn(x^2)
Else
y=Sgn(x)
End If
Print y
End Sub
程序运行后,单击命令按钮,其输出结果为 ______。
单选题单击窗体上的关闭按钮时,触发的事件是( )。
单选题要删除列表框中最后一个列表项,正确的语句是______。
A.List1.Removeltem ListCount
B.List1.Removeltem List1.ListCount
C.List1.Removeltem ListCount-1
D.List1.Removeltem List1.ListCount-1
单选题如下关于变体类型变量的叙述中,错误的是( )。
单选题设窗体文件中有下面的事件过程: Private Sub Command1_Click() Dim s:a%=100:Print a End Sub 其中变量a和s的数据类型分别是
单选题当对象失去焦点时,将会发生______事件。 A) GetFocus B) LostFocus C) Focus D) SetFocus
单选题要在命令按钮控件上显示图像应( )。 A)设置Picture属性 B)实现不了 C)先将Style设置为1,然后再设置Picture属性 D)以上都不对
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click() Dim s1 As String, s2 As String Open "D:/data.txt" For Input As #1 Seek #1, 5 s1 = Input$(2, #1) s2 = Input$(3, #1) Print Seek(1) Close #1End Sub假设有磁盘文件D:/data.txt,且文件足够长,当程序运行时,单击Command1,在窗体上输出的结果是
单选题在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个名为Command1的命令按钮,并编写如下事件过程: Private Sub Command1_ Click() CommonDialog1. Flags= cd10FNHideReadOnly CommonDialog1. Filter= "All Files (*.*) |*.*|Text File" & _ "(*.txt) |*.txt | Batch Files (*.bat)| *.bat" CommonDialog1. FilterIndex = 2 CommonDialog1. ShowOpen MsgBox CommonDialog1. FileName End Sub程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是______ 。
单选题VB中有3个键盘事件:KeyPress、KeyDown、KeyUp,若光标在Text1文本框中,则每输入一个字母( )。
单选题程序代码如下,当单击窗体上的Command1控件时,窗体上输出的结果是( )。 Private Sub Command1_Click() Dim Y As Integer,I As Integer Dim A(7)As Integer Y=18:I=0 Do A(I)=Y Mod 2 I=I+1 Y=Y/2 Loop Until Y<1 For j=I-1 To 0 Step-1 Print A(j); Next j End Sub
单选题在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为"宋体"和"黑体";一个复选框,名称为Check1,标题为"粗体";一个文本框,名称为Text1,Text属性为"改变文字字体"。要求程序运行时,"宋体"单选按钮和"粗体"复选框被选中(窗体外观如下图所示),则能够实现上述要求的语句序列是______。A)Option1.Value=TrueCheck1.Value=FalseB)Option1.Value=TrueCheck1.Value=TrueC)Option1.Value=FalseCheck1.Value=TrueD)Option1.Value=TrueCheck1.Value=1
单选题为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的MultiSelect属性设置为______。
单选题设窗体文件中有下面的事件过程: Private Sub Command1_Click() Dim a b $="Visual Basic" Print b End Sub 其中变量a和b的数据类型分别是______。 A) 字符串型,字符串型 B) 变体型,变体型 C) 字符串型,变体型 D) 变体型,字符串型
单选题设窗体上有一个名称为Check1的复选框,并有下面程序代码:
Private Sub Check1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Check1.Value=1
End Sub
根据上面的事件过程,可以得出结论
单选题编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住"Shift"键和锁定大写键时)运行程序,如果按“A”键,则程序输出的结果是 A) A B) a C) A D) a A A a a
单选题要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是______。
单选题下面关于直线控件的叙述中正确的是( )。
单选题具有3个结点的二叉树有
单选题Visual FoxPro中,执行了SET DATE AMERICAN后,不能显示4位年份的命令是( )