根据《现金管理暂行条例》规定,下列经济业务中,一般不应用现金支付的是( )。 A .支付职工奖金 4 000 元 B .支付零星办公用品购置费 900 元 C .支付物资采购货款 2 300 元 D .支付职工差旅费 5 000 元
手机使用
分享
复制链接
新浪微博
分享QQ
微信扫一扫
微信内点击右上角“…”即可分享
反馈
参考答案:
举一反三
【单选题】运行下列程序,单击窗体后输出的结果是( ) Function f(ByVal x As Integer) Static z z = z + 1 x = x + z f = x + z End Function Private Sub Form_Click() Dim a%, i% a = 2 For i = 1 To 3 Print f(a), Next i End Sub
【简答题】当运行下列程序,单击窗体后,分别输入72和24,信息框上显示的结果是【 】。 Private Sub Form_Click() Dim x As Integer,y As Integer x=Val(InputBox('输入整数72')) y=Val(InputBox('输入整数24')) z=fun1(x,y) MsgBox Str(Z) End Sub Private Function fun...
【单选题】设有如下的Sub过程:Sub S(x As Single, y As Single) t = x x = t / y y = t Mod yEnd Sub在窗体上画一个命令按钮Cmd1,然后编写如下事件过程:Private Sub Cmd1_Click() Dim a As Single, b As Single a = 5 : b = 4 S a, b Print a, bEnd Sub程序运行...
【单选题】在窗体上画一个命令按钮Cmd1,然后编写下列代码:Private Sub Cmd1_Click() Dim a1(10) As Integer, a2(10) As Integer n = 3 For i = 1 To 5 a1(i) = i a2(n) = 2 * n + i Next i Print a2(n); a1(n)End Sub程序运行后,单击命令按钮,输出的结果是 ...
【简答题】设有如下通用过程: Private
Function Fun1(s As String) As String Dim st As String For i = 1 To Len(s) st = Chr(Asc(Mid(s, i, 1)) + 1) &
st Next i Fun1 = st End
Function 在窗体上画一个命令按钮 Command1 和两个文本框 Text1 、 Text2...