以下语句的输出结果是【 】。 Print Int(12346789*100+0.5)/100
第1题
本程序的功能是利用随机数函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于—次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如图所示。程序运行后,在文本框Text1中输入总次数,然后单击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。
Private Sub Command1_Click( ) Randomize n=CInt(Text1.Text) n1=0 n2=0 For i=1To【 】 r=Int(Rnd*2) If r=【 】Then n1=n1+1 Else n2=n2+1 End If Next TcxtText=n1 TextText=n2 End Sub
请帮忙给出正确答案和分析,谢谢!
第2题
在窗体上画两个组合框,其名称分别为Combo1、Comb02,然后画两个标签,名称分别为Label1、Label2,如 图所示。程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。
Privte Sub Combo1_Click( ) Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click( ) Call Showltem(ComboLabe12) End Sub Public Sub Showhem(tmpCombo As ComboBox,tmpLabd As Label), 【 】Caption=【 】.Text End Sub
请帮忙给出正确答案和分析,谢谢!
第4题
在窗体上有一个名称为Laell的标签和一个名称List1的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Label中显示所选中的项目,如图所示。请在空白处填入适当的内容,将程序补充完整。
Private Sub Form_Load() List1.AddItem“北京” List1.AddItem“上海” List1.AddItem“河北” End Sub Private Sub List1_Dblclick() Label.Caption=【 】 End Sub
请帮忙给出正确答案和分析,谢谢!
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!