题目内容
在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click() X=5:Y=3 Call proc(x,y) Label1.Caption=x Labet2.Caption=y End Sub Private Sub proc(a As Integer，ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是( )
查看答案
搜索结果不匹配？点我反馈
更多问题
某坝基表层为粉土，厚度为1.5m，坝下游粉土层顶底面水头差为1.6m，粉土层比重为2.66，孔隙率为46%，粉土层下为砾砂层，如安全系数取2.0，排水盖重层容重为1.83g/cm3，盖重层位于水位以上，按《碾压式土石坝设计规范》计算排水盖重层厚度为（）。
某人编写了下面的程序： Private Sub Command1_Click() Dim a As Integer,b As Integer a=InputBox("请输入整数") b=InputBox("请输入整数") pro a pro b Call pro(a+b) End Sub Private Sub pro(n As Integer) While(n＞0) Print n Mod 10； n＝n\10 Wend Print End Sub 此程序功能是输入2个正整数，反序输出这2个数的每一位数字，再反序输出这2个数之和的每一位数字。例如若输入123和234，则应该输出： 3 2 1 4 3 2 7 5 3 但调试时发现只输出了前2行(即2个数的反序)，而未输出第3行(即2个数之和的反序)，程序需要修改。下面的修改方案中正确的是( )
假定有下列函数过程： Function Fun(S As String)As String Dim sl As String For i=1 To Len(S) S1=LCass(Mid(S,i,1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Strl As String,Str2 As String Str1=InputBox("请输入一个字符串") Str2=Fun(Str1) Print Srt2 End sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为( )
日常生活中，火无处不在。火的存在改变了人们的生活和行为方式，但稍有不慎引发火灾，对人们的生命和财产也会造成极大的危害。一旦火灾降临，身处火海，在浓烟毒气和烈焰包围中应如何更好地逃生下列做法正确的是( )。
微信支付 
支付宝支付