网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
用力F1单独作用于某一物体上可产生加速度为3m/s2,力F2单独作用于这一物体可产生加速度为1m/s2,若F1、F2同时作用于该物体,可能产生的加速度大小为()
- A、1m/s2
- B、1.5m/s2
- C、3m/s2
- D、5m/s2
参考答案
更多 “ 用力F1单独作用于某一物体上可产生加速度为3m/s2,力F2单独作用于这一物体可产生加速度为1m/s2,若F1、F2同时作用于该物体,可能产生的加速度大小为()A、1m/s2B、1.5m/s2C、3m/s2D、5m/s2” 相关考题
考题
下面的子过程语句说明合法的是________。
A.Sub fib(ByRef i%())B.Sub fib(j%) As IntegerC.Functionf%(f%)D.Function f1!(ByValn%)
考题
在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub f(ByVa1 x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(1)If i>4 Then i=i*2MsgBox iEnd Sub打开窗体运行后,单击命令按钮,则消息框的输出结果为______。
考题
( 15 )设在窗体 Form1 上有一个列表框 List1 ,其中有若干个项目。要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是A)Prvate Sub List1_Click()Print List1.TextEnd SubB)Private Sub Form1_Click()Print List1.TextEnd SubC)Private Sub List1_Click()Print Form1.TextEnd SubD)Private Sub Form1_Click()List1.Print List1.TextEnd Sub
考题
下面子过程语句说明合法的是( )。A.Function f1(By Valn%)B.Sub f1(n%)As IntegerC.Function f1%(f1%)D.Sub f1(ByValn%())
考题
下列子过程语句中正确的是 A.Sub f1(By Val()As Integer) B.Sub f1(n()As Integer)As Integer C.Function f1(f1 As Integer)As Integer D.Function f1(By Val f As Integer)
考题
(33)下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.Function f1l%(f1%) D.Function f1%(x As Integer)
考题
在窗体上画一个命令按钮,命名为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1,在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则F1返回1,否则返回0。能够正确实现上述功能的代码是 。A.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End FunctionB.Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 0 Else F1= 1 End If End FunctionC.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then F1= 1 Else F1= 0 End If End FunctionD.Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
考题
下面子过程说明合法的是( )。
A、Sub f1(ByVal n%())B、 Sub f1(%)As integerC、 Function f1%(f1%)D、 Function f1(ByVal n%)
考题
窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。A.Private Sub Form1 Click( )End Sub···B.Private Sub Form1. Click( )End Sub···C.Private Sub Command1 click( )End Sub···D.Private Sub Command Click( )End Sub···
考题
在窗体上添加文本框Text1,然后编写下列程序: Private Sub Form_Load() Text1.Text=" " End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Char=Chr(KeyAscii+1) KeyAscii=Asc(Ucase(Char)) End Sub Private Sub Command1_Click() Print Text1.Text End Sub 程序运行后,在文本框中依次输入1、2、3、a、b、c,单击命令按钮,则窗体上显示的内容是A.23BCDB.ABCC.!@#ABCD.123abc
考题
下面子过程语句说明合法的是A.Sub f1(s1 As String*8)B.Sub f1(n()As Integer)As IntegerC.Function f1(f1 As Integer)As IntegerD.Function f1(By Val n As Integer)
考题
下列子过程语句中正确的是( )。A.Sub f1(ByVal() As Integer)B.Sub f1(n() As Integer)As IntegerC.Function f1(f1 As Integer)As IntegerD.Function f1(ByVa1 f as Integer)
考题
设在窗体Forml上有一个列表框Listl,其中有若干个项目。要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是。 A.Private Sub Listl_Click B.Private Sub Forml_Click Print Listl.Text Print Listl.Text End Sub End Sub C.Private Sub Listl_Click D.Private Sub Forml_Click Print Forml.Text Listl.Print Listl.Text End Sub End Sub
考题
下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch:Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=sMid(ch,k,1) Next k ch=s End Sub A.ABCDEF B.FEDCBA C.A D.F
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Call sub1(-15.1,2.54) End Sub Public Function sub1(a As Integer,ByVa1 b As String) As Integer a=Val(B)sub1=a Print sub1 End Function 程序运行后,单击命令按钮,在窗体上输出的是A.3B.2C.-15D.提示出错
考题
设在窗体中有一个名称为Listl的列表框,其中有若干个项目(如图)。要求选中某一项后单击Commandl按钮,就删除选中的项,则正确的事件过程是。A.Private SubCommandl_Click List1.Clear End Sub B.Private Sub Commandl_Click List1.Clear Listl.ListIndex End Sub C.Private Sub Commandl_Click List1.RemoveItem List1.ListIndex End Sub D.PrivateSubCommandl_Click List1.RemoveItem End Sub
考题
在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click() Print "Visual"; End Sub Private Sub Command2_Click() Print "Basic"; End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后,按键盘Cancel键,在窗体上输出的结果是A.BasicB.VisualC.CancelD.True
考题
下列子过程语句的说明正确的是( )。A.Sub f1(ByVal x()As Integer)B.Sub f1(x%())As IntegerC.Function f1%(f1%)D.Function f1%(x As Integer)
考题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click( ) Dim x As integer Static y As integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef xl As Integer,y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.10 5B.12 5C.10 7D.12 7
考题
下列程序运行后的输出结果是______。Private Sub f(k,s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i,s)Sum=Sum+sNextPrint SumEnd Sub
考题
窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()End Sub End SubC)Private Sub Commandl_Click() D)Private Sub Command_ Click()End Sub End Sub
考题
力F1作用在物体上产生的加速度a1=3m/s2,力F2作用在该物体上产生的加速度a2=4m/s2,则F1和F2同时作用在该物体上,产生的加速度的大小不可能为()A、8m/s2B、5m/s2C、1m/s2D、7m/s2
考题
设当前目录是根目录,使用第()组命令不能在一级子目录SUB1下建立二级子目录SUB11。A、CD SUB1(回车)MD SUB11B、MD SUB1/SUB11C、MD SUB11D、MD/SUB1/SUB11
考题
单选题变直径圆管流,细断面直径d1,粗断面直径d2=2d1,粗细断面雷诺数的关系是( )。A
pResub1/sub=0.5Resub2/sub/pB
pResub1/sub=Resub2/sub/pC
pResub1/sub=1.5Resub2/sub/pD
pResub1/sub=2Resub2/sub /p
考题
单选题永续盘存法公式为()A
Ksubt/sub+1=Isubt/sub-(1-δ)Ksubt/subB
Ksubt/sub+1=It+(1-δ)Ksubt/subC
Ksubt/sub+1=Isubt/sub+(1+δ)Ksubt/subD
Ksubt/sub+1=Isubt/sub-(1+δ)Ksubt/sub
考题
单选题力F1单独作用于某物体时产生的加速度是3m/s2,力F2单独作用于此物体时产生的加速度是4m/s2,两力同时作用于此物体时产生的加速度不可能是()A
1m/s2B
5m/s2C
4m/s2D
8m/s2
热门标签
最新试卷