用户可以在“每页项目数”文本框中输入每页项目的数量,在()文本框中设置起始页码。
A.起始页
B.分页
C.项目数
D.多页显示
A.起始页
B.分页
C.项目数
D.多页显示
A.A.“每页0.10元。”
B.B.“每页0.10元。而且我们的交货是业内公认最快的。”
C.C.“每页0.10元。常言道: ‘一分钱,一分货’,我们的质量是最好的,所以我们的价格也是最贵的。”
在文小框中输入信息后,会产生一个改变(Change)事件。利用Change事件,检验文本框中输入的年龄值是否合法,并根据输入值的不同情况分别给予不同的提示。
图10.16为脚本程序运行的效果:由于输入的年龄(199岁)不合法,非法输入提示框会弹出。
如果输入的某个学生的学号对应的学生不存在,则在第二个文件框内显示“该生不存在”,第三个文本框不显示内容(如下图所示):如果输入的某个学生的学号对应的学生存在,但在宿舍表中没有该学号对应的记录,则在第二个文本框内显示该生的“姓名”,第三个文本框显示“该生不住校”。
单击“退出”按钮关闭表单。
如图16-10所示.在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项;若未找到,则在Text2中显示“查无此人”。请填空。 Private Sub Conmlandl_Click() Dim k As Integer, n As Integer, found As Boolean found=False n=Len(【 】) k=0 While k<List1. ListCount And Not found If Text1=Left $(List1. List(k), n)Then Text2=【 】 found=True End If k=k+1 Wend If Not found Then Text2="查无此人" End If End Sub
对“基本工资”字段,若在有效性文本框中输入“基本工资必须在800到5000元之间(包括800和5000)”,则设置的有效性规则为()
A.>=800 Or<=5000
B.Between 800 Or 5000
C.>=800 And<=5000
D.>800 And<=5000