网友您好， 请在下方输入框内输入要搜索的题目：

题目内容 （请给出正确答案）

有两段距离，其长度及中误差分别为：D1=138.00±0.01米，D2=183.00±0.02米，则（）。

  • A、两短距离精度相同
  • B、D1的精度高
  • C、两段距离精度无法比较
  • D、D2的精度高

参考答案

更多 “有两段距离，其长度及中误差分别为：D1=138.00±0.01米，D2=183.00±0.02米，则（）。A、两短距离精度相同B、D1的精度高C、两段距离精度无法比较D、D2的精度高” 相关考题
考题 有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。
查看答案
考题 在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：DimaAsIntegerSubtest()a=a+1:b=b+1:c=c+1PrintSub:;a;，;b;，;cEndSubPrivateSubCommand1_Click()a=2:b=3:c=4CalltestCalltestEndSub程序运行后，单击命令按钮，窗体中将显示( )A.Sub：3，4，5Sub：4，5，6B.Sub：2，3，4Sub：2，3，4C.Sub：3，1，1Sub：4，1，1D.Sub：1，1，1Sub：1，1，1
查看答案
考题 在窗体上画一个命令按钮和两个文本框，其名称分别为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
查看答案
考题 （30）下列事件过程可以将打开文件对话框的标题改变为“new Caption”.A.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowFont End Sub B.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowOpen End Sub C.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowHelp End Sub D.Private Sub Commandl_Click(） CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowColor End Sub
查看答案
考题 如下图所示的两个窗体：要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体，第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中，对这两个命令按钮编写的事件过程正确的是A．Private Sub Command1 Click() Form2．Show 1 End Sub Private Sub Command2_Click()End End SubB．Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End SubC．Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End SubD．Private Sub Command1_Click()Show 1， Form2 End SubPrivate Sub Command2_Click() End 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···
查看答案
考题 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写下列程序： Private Sub rune(L AS Labe1) Caption="1234" End Sub Private Sub Form. Load（ ） Labe11．Caption="ABCDE" Labe12．Caption=10 End Sub Private Sub Command1Click（ ） a=Va1(Label2．Caption) Call func(Label1) Label2．Caption a End Sub 程序运行后，单击命令按钮，则在两个标签中显示的内容分别为（ ）。A.ABCD和10B.1234和100C.ABCD和100D.1234和10
查看答案
考题 在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(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 Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(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 Commandl_Click() Dim a As Single Dim b As Single a=2：b=4 Call CS(a，b)End Sub Sub CS(x As Single，y As Single) t=X x=t\y y=t Mod y End Sub 程序运行后，单击命令按钮，a和b的值分别为A．0 0B．1 1C．0 2D．1 2
查看答案
考题 有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a,B)End Sub Sub Subl(x As Single, y As Single) t=x x=t\y y = t Mod y End Sub 在调用运行上述程序后，a和b的值分别为A．0 0B．1 1C．2D．1 2
查看答案
考题 在窗体中添加一个命令按钮，编写如下程序： Private Sub Test(p，m，n) p=p+1：m=m+1：n=n+1 Print "Sub: ";p；m；n End Sub Private Sub Command1.Click() a1=1：b=2：c1=3 Call Test((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 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
查看答案
考题 有如下程序。Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5: b=4Call Sub1(a, b)End SubSub Sub1(x As Single, y As Single)t=xx=t \ yy=t Mod yEnd Sub在调用运行上述程序后,a和b的值分别为A．0 0B．1 1C．2 2D．1 2
查看答案
考题 有如下程序： 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
查看答案
考题 在窗体中添加两个文本框，其名称分别为Text1和Text2;两个标签，其名称分别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母的ASCII码小4的大写字母，结果显示在文本框Text1中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是A．Private Sub Form. Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End SubB．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCode-4) End SubC．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCOde-4) End SubD．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub
查看答案
考题 在窗体中添加一个命令按钮，编写如下程序： 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
查看答案
考题 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分别为Label1、Label2，标题分别为空白和“共有文件”的标签。编写程序，使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签kabel1中显示当前文件夹中文件的数量，如图所示。能够正确实现上述功能的程序是A．Private Sub Dir1_Change( ) Filc1.Path=Dir1.Path End Sub Private Sub Drive1_Change( ) Dir1.Path=Drive1.Drive Label1.Caption=File1.ListCount End SubB．Private Sub Dir1_Change( ) File1.Path=Dir1.Path End Sub Private Sub Drive1_Change( ) Dir1.Path=Drive1.Drive Label1.Caption=File1.List End SubC．Private Sub Dir1_Change( ) File1.Path=Dir1.Path Label1.Caption=File1.ListCount End Sub Private Sub Drive1_Change( ) Dir1.Path=Drive1.Drive Label1.Caption=File1.ListCount End SubD．Private Sub Dir1_Change( ) File1.Path=Dir1.Path Label1.Caption=File1.List End Sub Private Sub Drive1_Change( ) Dir1.Path=Drive1.Drive Label1.Caption=File1.List End 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
查看答案
考题 已知两段距离的长度及中误差分别为128.286m±4.5cm与218.268m±4.5cm，则其真误差与精度均相同。
查看答案
考题 单选题变直径圆管流，细断面直径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
查看答案
考题 多选题下列扩展不确定度的表示中，表示形式是正确的是____。ApUsub95/sub=1%(vsubeff/sub=9)/pBpUsubr/sub=1%(k=2)/pCpusubCr/sub=0.5%/pDU=±0.5%（k=1）
查看答案
考题 单选题永续盘存法公式为（）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
查看答案
考题 多选题下列表示中____的表示形式是正确的。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
查看答案
考题 单选题有两段距离，其长度及中误差分别为：D1=138.00±0.01米，D2=183.00±0.02米，则（）。A 两短距离精度相同B D1的精度高C 两段距离精度无法比较D D2的精度高
查看答案
热门标签
最新试卷