【单选题】有如下程序。 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的值分别为
【简答题】设有如下程序 Private Sub Search(a( )As Variant,ByVa1 key As Variant,index%) Dim I% For I=LBound(A)To UBound(a) If key=a(1) Then index=I Exit Sub End If Next I index=I End Sub Private Sub Form_Load( ) Show D...
【单选题】有如下程序: Private Type stu X As String Y As Integer End Type Private Sub Command1 Click( ) Dim a As stu X='ABCD' Y=12345 Print a End Sub 程序运行时出现错误,错误的原因是( )。
【单选题】有如下程序: Private Sub Commandl_Click( ) a$='A WORKER IS HERE' x=Len(a$) For i=1,To x-1 b$=Mid$(a$,i,3) If b$='WOR' Then S=S+1 Next Print S End Sub 单击命令按钮,程序运行结果为
【简答题】(14分) A—F六种元素中,除C外其他均为短周期元素,它们的原子结构或性质如下表所示: 元素 结构或性质 A 原子最外层电子数是内层电子总数的1/5 B 形成化合物种类最多的元素,其单质为固体 C 生活中常见的金属,它有两种常见的氯化物,且相对分子质量相差35.5 D 地壳中含量最多的元素 E 与D同主族 F 与E同周期,且最外层电子数等于电子层数 请回答下列问题: (1)A在元素周期表中的位置...
【简答题】设有如下程序: Private Sub Form_Click( ) Dim a As Integer,s As Integer n=8 S=0 DO S=S+n n=n-1 Loop While n>0 Print S End Sub 以上程序的功能是【 】。程序进行后,单击窗体,输出结果为【 】。