A.财政机制
B.货币机制
C.行政干预
D.法律调整
E.市场机制
第1题
A.Private Sub Command1_Click() Label3. Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub
B.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub
C.Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End Sub
D.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
第2题
A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub
B.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub
C.Private Sub Command1_Click() Label3.Caption=HScrolll*HScroll2 End Sub
D.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
第3题
A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub
B.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End Sub
C.Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End Sub
D.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub
第4题
第5题
A.
B.
C.
D.
第6题
A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End Sub
B.Private Sub Command1_Click() Label3.Caption=HScrolll.Value*HScroll2.Value End Sub
C.Private Sub Commandl_click() Label3.Caption=HScrolll*HScroll2 End Sub
D.Private Sub Command1_Click() Label3.Caption=HScrolll.Text*HScroll2.Text End Sub
第7题
A.输出asingle的字符串形式
B.输出数据asingle的整数部分
C.输出数据asingle的小数点及小数点后面的数字
D.只去掉数据中的小数点,保留所有数字输出
第8题
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As label,ByVal a As Integer) L.Caption ="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1,A)Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是: ______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
第9题
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1,A)Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是: ______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
第10题
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1,a)Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!