问题:
Function Func(ByVal x As Integer, y As Integer)
y = y * x
If y > 0 Then
Func = x
Else
Func = y
End If
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = 3
b = 4
c = Func(a, b)
Print a; b; c
End Sub
程序运行后,单击命令按钮,其显示结果为( )。
A. 3 12 3
B. 3 12 12
C. 3 4 12
D.3 4 3
[单选题]在窗体上添加一个命令按钮Command1,然后编写如下程序:
答案解析:
您可能感兴趣的问题
- 在定义函数时,某个参数名字前面带有两个*符号表示可变长度参数,可以接收任意多个关键参数并将其存放于一个字典之中。
- 7.工程造价是怎样形成的?影响价格的因素有哪些?
- 5.世界银行工程造价的构成与我国现阶段工程造价的构成有哪些不同?
- 11.预算定额与施工定额有哪些联系和区别?试列表比较说明。
- 17.影响人工、材料、机械价格变化有哪些因素?试举例说明。
- 1.什么是技术经济分析?技术经济分析对建设工程造价有何作用?
- 16.某地面垫层厚300mm,外墙中心线尺寸为20m×10m,墙厚240mm,内墙净长50m(其中120mm墙有15m,其余均为240mm墙),则垫层工程量为多少?
- 5.建设工程施工招标应具备的条件和投标人应具备的条件有哪些?
- 12.某项目采用招投标方式确定施工单位。招标人按程序委托某招标代理机构编制标底。在开标过程中,发现各投标报价均与标底有相当差距。经核实,编制标底时漏算某分项工程。为防止招标失败,招标人重新确定了新的标
- 6.试分别叙述《竣工验收通知书》《竣工验收证明书》《竣工验收合格证书》《竣工验收鉴定书》的参与主体及实施阶段。它们分别代表竣工验收达到何种程度?