Visual Basic中的控件分为3类,它们是【 】、ActiveX控件和可插入对象。
第1题
运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是【 】和【 】。 Private Sub Command1_Click() t=1:x=2:y=3:z=4 If t>0 Or t=x And x <> y Or y>z Then t=fun1(t,z) Print t Else t = fun1(x, y) Print t End If Print x Print y End Sub Function funl(ByVal x As Integer, ByVal y As Integer)As Integer Do While y <> 0 t=x\y x=y y = t Loop fun1 = x End Function
请帮忙给出正确答案和分析,谢谢!
第2题
以下程序的功能是:将当前目录下的顺序文件mText1.txt的内容读入内存,并在图片框 Picture1中显示出来。请完善程序。 Private Sub Command1_Click() Dim inData As String Open ".\mText1.txt"【 】As 1 Do While Not EOF(1) Input 1,inData Picture1.Print inData Loop Close 1 End Sub
请帮忙给出正确答案和分析,谢谢!
第4题
窗体上有一个命令按钮,数据文件data.txt的内容如下: "语文" "2001", 87 "数学" "2002", 75 "英语" "2003", 92 "体育" "2004", 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click( Dim xs As bs Dim fl As Integer fl = FreeFile Open "d:\data.txt" For Input As fl Do While Not EOF(fl) Input fl, xs.aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop Print EOF(fl) Close End Sub 问:在列表框中第一行、第三行、第四行的内容是【 】、【 】、【 】。窗体上打印出的是【 】。
请帮忙给出正确答案和分析,谢谢!
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!