首页 > 计算机 > 计算机考试 正文

[填空题] 在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母

时间:2021-07-20 16:27:46 解答: 68 次

[填空题] 在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中。例如,若在 Text1中输入的是abDfdb,则单击Command1按钮后Text1中显示的字符串是

ZYXWVUTSRQPONMLKJIHGEC。请填空。

Private Sub Command1_Click()

Dim str As String,s As String,c As String

str=UCase(Textl)

s = " "

c = "Z"

While c>="A"

If InStr(str,c)=0 Then

s = ______

End If

c = Chrs(Asc(c) ______)

Wend

If s<>" " Then

Text1 = s

End If

End Sub

正确答案:

s+c或s&c -1

参考解析:

本题是一个综合性题目,难度较大,需要仔细分析题意。首先应清楚UCase函数,InStr函数,Chr$函数和Asc函数的概念。UCase函数是返回以大写字母组成的字符串;InStr函数可以找到指定的字符串在另一字符串中最先出现的位置。Chr$函数将Ascii代码转换成字符串。Asc函数将字符串转换成Ascii代码值。程序首先将文本框中的字符串转换为大写,然后从A到Z循环,判断每个字符是否存在于文本框字符串中,如果有则循环,如果没有则将字符串连接起来赋给变量s,循环结束后,将s输出。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-03 01:50:47

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-03 01:50:47

←请使用微信扫码支付