永发信息网

VB程序问题求解 要求编写程序,在文本框输入一串英文字母(不区分大、...

答案:1  悬赏:60  手机版
解决时间 2021-01-29 04:35
VB程序问题求解
要求编写程序,在文本框输入一串英文字母(不区分大、小写),单击命令按钮,程序可找出未在文本框出现的其他所有英文字母,并以大写的方式降序表示到Text1中。例如,若在Text1中输入的是"abDfdb",则单击Command1按钮后,Text1中显示的是"ZYXWVUTSRQPONMLKJIHGEC",补充程序
Private Sub Command1_Click()
Dim str As String, s As String , c As String
str=UCase(Text1.Text)
s=" "
c=" Z "
While c >="A"
If Instr(str,c)=0 Then
s=_________
End If
c=Chr(Asc(c)_____)
Wend
If s <>" " Then
Text.Text=________
End If
End Sub
最佳答案
Private Sub Command1_Click()
Dim str As String, s As String, c As String
str = UCase(Text1.Text)
s = ""
c = "Z"
While c >= "A"
If InStr(str, c) = 0 Then
s = s + c
End If
c = Chr(Asc(c) - 1)
Wend
If s <> " " Then
Text1.Text = s
End If
End Sub

满意请采纳哦~
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
华为che1-cl20有otg功能吗
西湖茶庄地址在哪,我要去那里办事
DIOCOFFEE怎么去啊,我要去那办事
海龟的裙边是哪个部位
永图的意思是什么啊?知道的请说下!
大狗把小狗往外叼
佛茶轩地址在什么地方,想过去办事
刚买回两天的狗狗英斗就得了犬瘟细小
evdo与cdma2000有区别么?
三品茶地址好找么,我有些事要过去
在上海被开的现场罚单,实线变道,外地牌上高
VHS录像机与VCD机比较()
1号楼2单元3号室用字母怎么表示?
四境的意思是什么啊?知道的请说下!
我爸爸的社保卡是每月60元钱,可以直接在药店
推荐资讯
滨海商务宾馆(威海荣成市)地址好找么,我有些
解任的意思是什么啊?知道的请说下!
保利清能西海岸属于中心城区吗
个旧复兴旅馆怎么去啊,我要去那办事
别说我骄傲我从来没骄傲几亿的零花钱在家口袋
吉美灯饰地址在什么地方,我要处理点事
华瑞汽车销售服务有限公司(鲅鱼圈店)地址好找
中国数字电视采用什么标准?
现代化(亦作近代化)指的是人类社会从农业文明
您好,我想了解在各种牌号的铝里面,哪种的散
火爆的意思是什么啊?知道的请说下!
总等电位连接箱ndt1-z多少钱一台
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?