蜗杆分度圆直径d1=mZ1。
蜗杆分度圆直径d1=mZ1。
相关考题:
在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,然后编写如下程序: Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 Chr(Keycode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1="" S2="" End Sub 程序运行后,在Text1中输入“abc”,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为______。A.abc和ABCB.abc和abeC.ABC和abcD.ABC和ABC
下列过程说明合法的是( ) A、Sub S1(ByVal n!())B、Sub S1(n!) as IntegerC、 Function S1%(S1%)D、 Function S1(ByVal n!)
阅读如下程序, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( )。 A、Sub plus(sum, a , b ): sum = a + b: End SubB、Sub plus(ByVal sum , a , b ): sum = a + b: End SubC、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End SubD、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub
窗体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···
以下程序用于求S=1+3+32+33+…+310的值。Private Sub Commandl_Click()S=1T=1ForI=1 To 10T=______S=S+TNextIPrint"S=";SEnd Sub
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x+20 End Sub Private Sub s2() Dim x As Integer x=X+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。A.10B.30C.40D.50
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下: Public X As Integer Public Y As Integer Sub S1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1.Show End Sub Model2的代码如下: Sub Main( ) S1 End Sub 其中Sub Main被设置为启动过程。程序运行后,各模块的执行顺序是( )。A.Form1→Model1→Model2B.Model1→Model2→Form1C.Model2→Model1→Form1D.Model2→Form1→Model1
假定有如下的Sub过程: Sub S(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a,b Print a,b End Sub 程序运行后,单击命令按钮,输出结果为 ______ 。A.5 4B.1 1C.1.25 4D.1.25 1
编写如下事件过程: Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i>= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后,单击窗体,则窗体上显示的内容是A.rehcaetB.tahreeeC.themeeD.eerthea
写出程序运行的结果Public class BasePublic virtual string Hello() {return “Base”;}Public class Sub:BasePublic override string Hello() {return “Sub”;}1. Base b = new Base(); b.Hello;2. Sub s = new Sub(); s.Hello;3. Base b = new Sub (); b.Hello;4. Sub s = new Base(); s.Hello;
下面程序的输出结果是。 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
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Public x As Integer Private Sub Commandl_click() x=10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x=x+20 End Sub Private SubA.10B.30C.40D.50
编写如下事件过程: Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后,单击窗体,则窗体上显示的内容是A.6B.12C.24D.47
在窗体中添加一个命令按钮,编写如下程序:Private Sub Sub1(p,m,n)p=p+1:m=m+1:n=n+1Print "sub1:";p;m;nEnd SubPrivate Sub Command1_Click()a1=1:b=2:c1=3Call Sub1(a,b1+3,c1)Print"Main:";a1;b1;c1End Sub程序运行后,输出结果为A.Sub: 2 6 4 Main: 2 6 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。A.10B.30C.40D.50
有如下程序: Private Sub Command1 Click() Dim a As Single Dim b As Single a=5:b=4 Call S(a,B)End Sub Sub S(x As Single,y As Single) t=x x=t\y y=t Mod y End Sub 在调用运行上述程序后,a和b的值分别为A.0 0B.1 1C.2 2D.1 2
在窗体中添加一个命令按钮,编写如下程序: Private Sub Sub1(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub1:";p;m;n End Sub Private Sub Command1_Click() a1=1:b=2:c1=3 Call Sub1(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后,输出结果为A.Sub: 2 6 4 Main: 2 6 4B.Sub: 2 6 4 Main: 2 6 4C.Sub: 2 6 4 Main: 1 2 3D.Sub: 2 6 4 Main: 2 2 3
下列程序运行后的输出结果是______。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
设当前目录是根目录,使用第()组命令不能在一级子目录SUB1下建立二级子目录SUB11。A、CD SUB1(回车)MD SUB11B、MD SUB1/SUB11C、MD SUB11D、MD/SUB1/SUB11
把C盘路径为/SUB1的文件ASD.BAK更名为ASD,下面()命令是正确的。A、REN C://SUB1/ASD.BAK C:///SUB1/ASDB、REN C:///SUB1/ASD.BAK C://ASDC、RENAME C:///SUB1/ASD.BAKD、REN C:///SUB1/ASD.BAK ASD
单选题变直径圆管流,细断面直径d1,粗断面直径d2=2d1,粗细断面雷诺数的关系是( )。ApResub1/sub=0.5Resub2/sub/pBpResub1/sub=Resub2/sub/pCpResub1/sub=1.5Resub2/sub/pDpResub1/sub=2Resub2/sub /p
单选题永续盘存法公式为()AKsubt/sub+1=Isubt/sub-(1-δ)Ksubt/subBKsubt/sub+1=It+(1-δ)Ksubt/subCKsubt/sub+1=Isubt/sub+(1+δ)Ksubt/subDKsubt/sub+1=Isubt/sub-(1+δ)Ksubt/sub
单选题酶促反应速度(v)达到最大反应速度(Vmax)的80%时,底物浓度[S]为Ap1Ksubm/sub/pBp2Ksubm/sub/pCp3Ksubm/sub/pDp4Ksubm/sub/pEp5Ksubm/sub/p
多选题下列表示中____的表示形式是正确的。ApUsub95/sub= 1%,vsubeff/sub =9 /pBpUsubr/sub= 1%,k=2 /pCpusubC/sub=0. 5% /pDpusubC/sub=±0 5%.k=1 /p
多选题在过程控制中,若TL=-3,Tu=3,u=1,σ=1,则( )。ACsubP/sub=1 BCsubP/sub=2/3 CCsubPk/sub=1 DCsubPk/sub=2/3