单选题为清除PietureBox控件中的图形,下列方法正确的是 ( )
单选题在窗体上画一个Timer1计时器控件和一个Shape1形状控件,并编写如下程序Private Sub Form_Load()Timer1.Interval=1000Timer1.Enabled=TmeEnd SubPrivate Sub Timer1_Timer()If Shape1.Shape=1 ThenShape1.Shape=3ElseShape1.Shape=1End IfEnd Sub运行程序,则看到的结果是
单选题设有如下数组定义语句: Dim a(一1 To 4,3)As Integer 以下叙述中正确的是
单选题在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框,然后编写如下程序;
{{U}} {{/U}} Private Sub Commandl_Click()
Dim x,y,z As Integer x=5:y=7:z=O
Text1.Text="" Call Pl(x,y,z) Text1.
Text=Str(z) End Sub Sub P1(ByVal a As Integer,
ByVal b As Integer, c As Integer) c=a+b End
Sub
A. 0
B. 12
C. Str(z)
D. 没有显示
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程: Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=6 To 1 Step -2 Counter=Counter+1 Next j Next i Label1.Caption=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是
单选题在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For j=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub
单选题有如下过程代码: Sub vat dim() Static numa As Integer Dim numb As Integer numa=numa+2:numb=numb+1:print numa;numb End Sub 连续3次调用var_dim过程,第3次调用时的输出是
单选题设a=10,b=4,c=5,d=7,表达式a>b And Not c
单选题下列说法正确的是:
为了保存一个Visual Basic应用程序,应当______。
单选题现有如下程序: Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer) If x>=10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序,则窗体上显示的是( )。
单选题窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:Private Sub Command1_Click()For i=0 To List1.ListCotmt-1If List1.Selected(i)=True ThenList2.AddItem TextEnd IfNextEnd Sub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是
单选题在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() a=4:b=5:c:6 Print a=b+c End Sub 程序运行后,单击命令按钮,其结果为
单选题下列定义语句中不能定义为字符型数据的是( )。 A) Defstrc B) c C) Static c As String D) Dim c As Si
单选题在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click()CD1.DialogTitle="打开文件"CD1.InitDir="C:"CD1.Filter="所有文件|*.*|Word文档|*.doc|文本文件|*.txt"CD1.FileName=""CD1.Action=1IfCD1.FileName=""ThenPrint"未打开文件"ElsePrint"要打开文件"&CD1.Fi1eNameEndIEndSub但实际显示的对话框中列出了C:/下的所有文件和文件夹,“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是______。
单选题使用语句Dim A As Integer声明数组A之后,以下说法正确的是( )。
单选题如果进栈序列为A,B,C,D,则可能的出栈序列是( )。
单选题以下关于图片框控件的说法中,错误的是
单选题下列有关文件的叙述中,正确的是( )。
单选题窗体上有一个列表框和一个文本框,编写如下两个事件过程:
Private Sub Form_Load()
List1.Addltem"Beijing"
List1.Addltem"Tianjin"
List1.Addltem"Shanghai",
Text1.Text="
End Sub
Private Sub Listl_Dbl Click()
x=Listl.Text
Printx+Textl.Text
End Sub
程序运行后,在文本框中输入"China",然后双击列表框中的"Shanghai",则输出结果为
____
。
单选题如果将PasswordChar属性设置为一个字符,如星号(*),运行时,在文本框中输入的字符仍然会显示出来,而不显示星号,原因可能是