第2题
验证字符串函数的使用,TextBox1文本框输入字符串,TextBox2文本框为函数结果,命令按钮为字符串函数(见图图3.3),第二个标签Label2.Text显示对应的函数名。 以“昵称-3-3”为项目名保存。 项目完成后,将整个项目文件夹压缩成:昵称-3-3.rar,以附件形式提交。 【提示】图中所示的常用字符串函数由6个命令按钮组成,其中上面一行3个函数仅有一个TextBox1.Text 作为参数;第二行3个函数要多个参数,除了TextBox1.Text外,还要再通过InputBox输入参数。第二个标签Label2.Text要显示对应的函数名。例如:Instr函数事件过程如下: Sub Button6_Click(…) Handles Button6.Click Dim s1$ s1 = InputBox("输入查找子串s1") TextBox2.Text = InStr(TextBox1.Text, s1) Label2.Text = Button6.Text & "函数的结果" End Sub图3.3 运行界面
第3题
A. PageMaker
B. PaGeMaKer
C. pagemaker
D. PAGEEMAKER
第8题
窗体上建立一个简单组合框,在组合框的文本框输入数字字符,按回车键后加入到组合框的列表框内,如下左图所示;单击”交换”命令按钮,将列表框中最小值项目和第0个项目交换;最大值项目与最后项目交换, 如下右图所示。保存工程和窗体,窗体文件名为:昵称-10-3.frm;工程名为:昵称-10-3.vbp。将工程文件和窗体文件压缩成:昵称-10-3.rar,以附件形式提交。 提示: ① 只能输入数字,在Combo1_KeyPress事件通过如下代码实现: Select Case KeyAscii Case 48 To 57, 13 ‘ 0~9数字和回车键为合法数据 Case Else ‘ 否则为非法数据,去除非法字符 KeyAscii = 0 End Select ② 找最小值和最大值必须声明4个变量:如aMin、iMin、aMax和iMax分别存放最小值、最小值下标,最大值和最大值下标,并将列表框中第0个项目为上述4个变量的初值; ③ 按照求最大值和最小值的方法从组合框中找最小值和最大值,并获得最小值和最大值下标;注意比较时项目要用Val函数,否则作为字符串比较。 ④ 将组合框的第0相与最小值交换、最大值与最后项交换。例最大值与最后项交换的代码: t = Combo1.List(Combo1.ListCount - 1) Combo1.List(Combo1.ListCount - 1) = Combo1.List(imax) Combo1.List(imax) = t
第9题
A、要使得输入的帐户不超过8位数字,只需将其文本框的MaxLength属性设置为8
B、在文本框中输入帐户后,按Tab键时,会触发LostFocus事件。
C、输入密码的文本框,若要使得输入的字符以*显示,需要将文本框的Text属性设置为*
D、判断文本框中输入的帐户号码是否为数字,可以通过IsNumeric函数来判断。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!