填空题
下列程序的输出结果为【 】。 num=2 While num<=3 num=num+1 Print num Wend
【参考答案】
3 4
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查 找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查 找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显 示第1个匹配项;若未找到,则在Text2中显示“查无此人”。请填空。Private Sub Command1_Click()Dim k As Integer, n As Integer, found As Boolean found = Falsen = Len( _________)k = 0While k < List1.ListCount And Not foundIf Text1 = Left$(List1.List(k), n) ThenText2 = _________found = True End If k = k + 1Wend If Not found ThenText2 = 查无此人 End If End Su
点击查看答案&解析
填空题
在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:Private Sub Form_Click() 5Open d: test smtext1.txt For Input As #1Do While Not _________Line Input #1, aspect$whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10) Loop Text1.Text = whole$Close #1 Open d: test smtext2.txt For Output As #1Print #1, _________Close #1 End Sub 上述程序的功能是,把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来,然后把 该文本框中的内容存入磁盘文件smtext2.txt。请填空。
点击查看答案&解析
相关试题
把窗体的KeyPreView属性设置为True,并编写...