【单选题】有如下程序: Private Sub Commandl_Cick() a=10:b=50 Rem Print ab Print bla Print a;b End Sub 运行后,单击命令按钮后的输出结果是 ( )
【单选题】有如下程序。 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 Form_Click() a=325456 Print Format(Int((a*10+0.5))/10,'000,000.00') End Sub 程序运行后,单击窗体,输出结果为【 】。
【简答题】设有如下程序 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 程序运行时出现错误,错误的原因是( )。
【单选题】下列关于发票领用前的相关事宜,说法不正确的是( )。
A.
纳税人领购发票前应先取得税务机关核发的发票领购簿,发票领购簿是记录纳税人领购和使用发票情况的重要书面材料
B.
需要领购发票的单位和个人,应当持税务登记证件、经办人身份证明、按照国务院税务主管部门规定式样制作的财务专用章的印模,向主管税务机关办理发票领购手续
C.
主管税务机关根据领用单位和个人的经营范围和规模,确认领购发票的种类、数量以及领购方式,在5个工作日内发给发票领购簿
D.
发票领购簿的内容包括用票单位和个人的名称、所属行业、购票方式、核准购票种类、开票限额、发票名称、领购日期、准购数量、起止号码、违章记录、领购人签字(盖章)、核发税务机关(章)等内容
【单选题】有如下程序: 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 单击命令按钮,程序运行结果为
【单选题】有如下程序: 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的值分别为
【简答题】设有如下程序: 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 以上程序的功能是【 】。程序进行后,单击窗体,输出结果为【 】。