在双缝衍射实验中，若保持双缝S1和S2的中心之间的距离d不变，而把两条缝的宽度a略为加宽，则（）A、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目变少B、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目变多C、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目不变D、单缝衍射的中央主极大变窄，其中所包含的干涉条纹数目变少
在双缝衍射实验中，若保持双缝S1和S2的中心之间的距离d不变，而把两条缝的宽度a略为加宽，则（）
- A、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目变少
- B、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目变多
- C、单缝衍射的中央主极大变宽，其中所包含的干涉条纹数目不变
- D、单缝衍射的中央主极大变窄，其中所包含的干涉条纹数目变少
相关考题：
在窗体上画一个命令按钮和两上文体，其名称分别为 Command1 、 Text1 和 Text2 ，然后编写如下程序：Dim S1 As String, S2 As StringPrivate Sub Form_Load（）Text1. Text=””Text2. Text=””End SubPrivate Sub Text1_KeyDown（KeyCode As Integer, Shift As Integer）S2=s2 Chr（KeyCode）End SubPrivate Sub Text1_KeyPress（KeyAscii As Integer）S1=S1 chr（KeyAscii）End SubPrivate Sub Command1_Click（）Text1.Text=S2Text2.Text=S1S1=""S2=""End Sub程序运行后，在Text1中输入"abc"，然后单击命令按钮，在文本框 Text1 和 Text2 中显示的内容分别为（ ）。A．abc 和 ABCB．abc 和 abcC．ABC 和 abcD．ABC 和 ABC
在窗体上画一个命令按钮和两个文本框，其名称分别为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
在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，在属性窗V1中把窗体的KeyPreview属性设置为True，然后编写如下程序：Dim S1 As String，S2 As StringPrivate Sub Form_Load()Text1．Text=””Text2．Text=””TeXt1．Enabled=FalseText2．Enabled=FalseEnd SubPrivate Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)S2=S2Chr(KeyCode)End SubPrivtee Sub Form_KeyPress(KeyAscii As Integer)S1=S1Chr(KeyAscii)End SubPfivtee Sub Command 1_Click()Text1．Text=S1Text2．Text=S2S1=””S2=””End Sub程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为( )。A．abc和ABCB．空白C．ABC和abcD．出错
在窗体上添加一个按钮(cmd) ，编写如下程序：Private sub crud_click( )Dim s, iFori = 1 to 10s=s+iNextMsgbox sEnd sub程序运行后，单击按钮，在消息框中显示的信息为 【 】 。
下列过程说明合法的是( ) A、Sub S1(ByVal n!())B、Sub S1(n!) as IntegerC、 Function S1%(S1%)D、 Function S1(ByVal n!)
在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：Public x as integerPrivate Sub Command1_Click( )x=5Call s1Call s2MsgBox xEnd SubPrivate Sub s1( )x=x+10End SubPrivate Sub s2( )Dim x as integerx=x+10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果是______
执行下面的程序，消息框里显示的结果是_______。Private Sub Form_Click()Dim Str As StringStr=""S="Access"Fori=Len(S)To 1 Step-lStr=StrMid(S，i，1)Next iMsgBox StrEnd 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
编写如下事件过程： 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
在窗体中添加一个名称为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
在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下程序： Diln S1 As String，S2 As String Private Sub Form. Load（ ） Text1．Text="" Text2．Text="" Text1．Enabled=False Text2．Enabled=False End Sub Private Sub Form. KeyDown(KeyCode As Integer，Shift As Integer) S2=S2＆Chr(KeyCode) End Sub Pri vate Sub Form. KeyPress(KeyAscii As Integer) S1=S1＆Chr(KeyAscii) End Sub Private Sub Command1 Click（ ） Text1．Text=S1 Text2．Text=S2 S1="" S2="" End Sub 程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为（ ）。A.abc和ABCB.空白C.ABC和abcD.出错
下列程序的执行结果为 Private Sub Command1_Click() Dim s1 As String，s2 As String S1；="abcdef" Call Invert(s1，s2) Print s2 End Sub Private Sub Invert (ByVal xstr As String，ystr As String) Dim tempstr As String i=Len(xstr) Do While i=1 tempstr=tempstr+Mid(xstr，i，1) i=i-1 Loop ystr=tempstr End SubA．fedcbaB．abcdefC．afbecdD．defabc
下列程序的执行结果为 Private Sub Commandl_Click() Dim s1 As String ,s2 As String s1= "abcd" Call Transfer(sl，s2) Print s2 End Sub Private Sub Transfer (ByVal xstr As String，ystr As String) Dim tempstr As String ystr=tempstr End SubA．dcbaB．abdcC．abcdD．dabc
下列程序运行后的输出结果是______。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
Operator needs to remove all leading comments # from shell.script file. Which of the following vi sub-command can achieve this?（）A、:r/^#//gB、:1,$ s/^#//gC、:sed s/^#//gD、:sub s/^#//g
填空题设字符串S1= “ABCDEF”，S2= “PQRS”，则运算S=CONCAT（SUB（S1，2，LEN（S2）），SUB（S1，LEN（S2），2））后的串值为（）。