以下有关数组定义的语句序列中,错误的是______. A: Staticarr1(3)arr1(1)=100arr1(2)="Hello"arr1(3)=123.45 B: Dimarr2()AsIntegerDimsizeAsIntegerPrivateSubCommand2_Click()size=InputBox("输入:")ReDimarr2(size)……EndSub C: OptionBase1PrivateSubCommand3_Click()Dimarr3(3)AsInteger……EndSub D: DimnAsIntegerPrivateSubCommand4_Click()Dimarr4(n)AsInteger……EndSub
以下有关数组定义的语句序列中,错误的是______. A: Staticarr1(3)arr1(1)=100arr1(2)="Hello"arr1(3)=123.45 B: Dimarr2()AsIntegerDimsizeAsIntegerPrivateSubCommand2_Click()size=InputBox("输入:")ReDimarr2(size)……EndSub C: OptionBase1PrivateSubCommand3_Click()Dimarr3(3)AsInteger……EndSub D: DimnAsIntegerPrivateSubCommand4_Click()Dimarr4(n)AsInteger……EndSub
下面程序的运行结果是Dimm1AsInteger,p1AsInteger‘模块级变量PrivateSubForm_Load()Showp1=1:m1=5CallSub1CallSub1Printp1EndSubPrivateSubSub1()Ifm1>1Thenm1=m1-1p1=p1*4Printp1;EndSub
下面程序的运行结果是Dimm1AsInteger,p1AsInteger‘模块级变量PrivateSubForm_Load()Showp1=1:m1=5CallSub1CallSub1Printp1EndSubPrivateSubSub1()Ifm1>1Thenm1=m1-1p1=p1*4Printp1;EndSub
下列程序的输出结果为()。PrivateSubCommand1_Click()D...)-a(4)*2)+a(5)EndSub
下列程序的输出结果为()。PrivateSubCommand1_Click()D...)-a(4)*2)+a(5)EndSub
假定有如下事件过程: Private SubForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=1 Then PopupMenu Popform End If EndSub 则以下描述中错误的是 。
假定有如下事件过程: Private SubForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=1 Then PopupMenu Popform End If EndSub 则以下描述中错误的是 。
有如下函数过程:Functionsecproc(xAsInteger,yAsIn...a)EndSub该程序的运行结果是()。
有如下函数过程:Functionsecproc(xAsInteger,yAsIn...a)EndSub该程序的运行结果是()。
在窗体中添加了一个文本框和一个命令按钮(名称分别为tText和bCommand),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为“计算机等级考试”。以下能实现上述操作的事件过程是______。 A: PrivateSubbCommand_Click() Caption="计算机等级考试" EndSub B: PrivateSubtText_Click() bCommanCaption="计算机等级考试" EndSub C: PrivateSubbCommanCOmge() Caption="计算机等级考试" EndSub D: PrivateSubtText_Change9 bCommanCaption="计算机等级考试" EndSub
在窗体中添加了一个文本框和一个命令按钮(名称分别为tText和bCommand),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为“计算机等级考试”。以下能实现上述操作的事件过程是______。 A: PrivateSubbCommand_Click() Caption="计算机等级考试" EndSub B: PrivateSubtText_Click() bCommanCaption="计算机等级考试" EndSub C: PrivateSubbCommanCOmge() Caption="计算机等级考试" EndSub D: PrivateSubtText_Change9 bCommanCaption="计算机等级考试" EndSub
下列哪条语句是正确的呢()。 A: ExitWhile B: EndSub C: Forloop D: DoExit
下列哪条语句是正确的呢()。 A: ExitWhile B: EndSub C: Forloop D: DoExit
下列程序运行过程中,信息框中显示的内容是()。 PrivateSubCommand1_Click() MsgBoxStr(123+123) EndSub
下列程序运行过程中,信息框中显示的内容是()。 PrivateSubCommand1_Click() MsgBoxStr(123+123) EndSub
单击命令按钮时,下列程序的执行结果为()。 PrivateFunctionP(NAsInteger) Staticsum ForI=1ToN sum=sum+1 NextI P=sum EndFunction PrivateSubCommand1_Click() S=P(1)+P(2)+P(3)+P(4) PrintS; EndSub
单击命令按钮时,下列程序的执行结果为()。 PrivateFunctionP(NAsInteger) Staticsum ForI=1ToN sum=sum+1 NextI P=sum EndFunction PrivateSubCommand1_Click() S=P(1)+P(2)+P(3)+P(4) PrintS; EndSub
执行下列程序后,在立即窗口中将会出现() PrivateSubForm_Click() Fori=1To10Step2 Debug.Printi; i=i+1 Nexti EndSub
执行下列程序后,在立即窗口中将会出现() PrivateSubForm_Click() Fori=1To10Step2 Debug.Printi; i=i+1 Nexti EndSub