用DI3光电测距仪测得某边的显示斜距平均值为246.374m，竖盘读数为272°53′17″（盘右）和87°07′13″（盘左），气温为29.5℃，气压为706mmHg，该仪器各项改正数经检测为：加常数＝＋3mm；乘常数＝－4ppm；周期误差的振幅A＝2.2mm，初相角ϕ0为76°45′，该仪器精测尺尺长为20m，试求该边的水平距离值。已知P＝706mmHg时，每100m的气象改正数：ｔ=29℃时，为＋3.48mm；ｔ＝30℃时，为＋3.56mm。
用DI3光电测距仪测得某边的显示斜距平均值为246.374m，竖盘读数为272°53′17″（盘右）和87°07′13″（盘左），气温为29.5℃，气压为706mmHg，该仪器各项改正数经检测为：加常数＝＋3mm；乘常数＝－4ppm；周期误差的振幅A＝2.2mm，初相角ϕ0为76°45′，该仪器精测尺尺长为20m，试求该边的水平距离值。已知P＝706mmHg时，每100m的气象改正数：ｔ=29℃时，为＋3.48mm；ｔ＝30℃时，为＋3.56mm。
相关考题：
下面程序运行后，窗体中显示【 】。Private Sub Command1_Click) ( )aS ="*" :b$ ="$"For k = 1 To 3x$ =Strings (Len(a$) +k,b$ )Print x $;NextPrintEnd Sub
有以下程序：Private Sub Form_Activate()For j=1 to 3x=3For i=l to 2x=x+6NextNextPrint xEnd Sub程序运行后，窗体上显示的结果为______。
执行以下语句过程，在窗体上显示的内容是Option Base 0Private Sub Command3_Click（）Dim dd=Array（"a", "b", "c", "d"）Print d（1） ; d（3）End Sub（ ）。A．abB．bdC．acD．出错
在通用声明中定义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
下列关于Sub过程的叙述正确的是A.一个Sub过程必须有一个Exie Sub语句B.一个Sub过程必须有一个Enb Sub语句C.在Sub过程中可以定义一个Function过程D.可以用Goto语句退出Sub过程
（10）在窗体上设计两个复选框，一个显示粗体，另一个显示斜体，通过对复选框的选择，在一个文本框中显示相应效果的文本，请完成下列程序。 Private Sub Form_Load() Check1.Caption="显示粗体" Check2.Caption="显示斜体" Text1Text="May you a happy day!" End Sub Private Sub Check1_Load() If=1 Then Text1.FontBold=True Else Text1.FontBold=False Else If End Sub Private Sub Check2_Load() If Check2.Vaiue=1 Then Text1._____ Else Text1._____ End If 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
有如下事件过程：Private Sub Form. Active ( )Dim Score (1 to 3) As IntegerDim i As IntegerDim t As VariantFori=3 To 1 step-1Score (i) = 2 * iNextFor Each t In ScorePrint tNextEnd Sub程序运行后窗体上显示的值为【 】。
在窗体上画一个名称为CoilTlilandl的命令按钮，然后编写如下事件过程： Private Sub command1 Click() Dim m As Integer， i As Integer， x(3)As Integer For i=0 To 3：x(i)=i：Next i For i = 1 To 2： Call sub1(x，i)：Next i For i = 0 To 3： Print x(i)；： Next i End Sub Private Sub sub1(a()As Integer，k As Integer) Dim i As Integer Do a(k)=a(k)+a(k+1) j = j + 1 Loop While j ＜ 2 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．0 3 7 5B．0 1 2 3C．3 2 4 5D．0 5 8 3
设在窗体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 Form_Activate()Forj=1 to 3x=3ForI=1 to 2x=x+6NextINextjPrint xEnd Sub程序运行后，窗体上显示的结果为上______。
在窗体中添加一个命令按钮,编写如下程序: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 Form_Click( )a$ = 2b$ = 1Call abcd(a, b, c$, d$)Print c; dEnd SubPrivate Sub abcd(x$, y$, z$, s$)z = x + ys = x - yEnd Sub单击窗体后，则在窗体上显示的结果是( )。A.3 1B.1 3C.211D.显示出错信息
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．41 54B．2 54C．1 3D．42 3
在窗体中添加一个命令按钮，编写如下程序： 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
用DI3光电测距仪测得某边的显示斜距平均值为246.374m，竖盘读数为272°53′17″（盘右）和87°07′13″（盘左），气温为29.5℃，气压为706mmHg，该仪器各项改正数经检测为：加常数＝＋3mm；乘常数＝－4ppm；周期误差的振幅A＝2.2mm，初相角ϕ0为76°45′，该仪器精测尺尺长为20m，试求该边的水平距离值。已知P＝706mmHg时，每100m的气象改正数：ｔ=29℃时，为＋3.48mm；ｔ＝30℃时，为＋3.56mm。
将硬盘C:///SUB下的全部文件（总长度超过5MB）备份到软盘，用（）命令一定不可以。A、BACKUP C://SUB/*.*A：B、BACKUP C:///SUB A：C、COPY C:///SUB A：D、BACKUP C:///SUB B：
单选题A pIsub2/sub=Isub3/sub/pB pIsub2/sub=4Isub3/sub/pC pIsub2/sub=2Isub3/sub/pD pIsub3/sub=4Isub2/sub/p
单选题正态分布时，算术平均数、中位数、众数的关系为（）Amsub0/sub＜msube/sub＜(xBmsub0/sub＝msube/sub＝(xCmsub0/sub＞msube/sub＞(xDmsube/sub＜msub0/sub＜(x
单选题已知某线声源长度为l0，在线声源垂直平分线上距线声源r0和r的分别为Lp(r0)和Lp(r)，根据《环境影响评价技术导则声环境》，按公式Lp(r)=Lp(r0)-15lg(r/r0)近似计算该线声源的噪声影响时，应满足的条件是()。AprIsub0/sub且rsub0/subIsub0/sub /pBprIsub0/sub/3且rsub0/subIsub0/sub/3 /pCpIsub0/sub/3rspanI/spansub0/sub且Isub0/sub/3rsub0/subr0Isub0/sub /r0/pDp无条件限制 /p