VB:输入字母字符后倒序输出存放

题目来源:大工慕课 链接
原题:Visual Basic程序设计教程(第二版)龚沛曾主编,高等教育出版社 实验4-4
作者:Caleb Sung

题目要求

筛选在Text1文本框输入的字母字符,并反序在Text2中存放。
效果实例:
这里写图片描述

提示

  1. 要考虑字母的大写和小写。
  2. 首先利用Len函数求Text1.Text字符串长度,然后利用For循环结构和Mid函数逐一取字符进行判断是否为字母,若是字母,则利用语句“Text2.Text=字母 & Text2.Text”将字母连接到Text文本框前面,实现反序。

参考代码

Private Sub Command1_Click()
    Text2.Text = ""
    For i = 1 To Len(Text1.Text)
        Text2.Text = Mid(Text1.Text, i, 1) & Text2.Text
    Next i
End Sub

Private Sub Command2_Click()
    Text1.Text = ""
    Text2.Text = ""
End Sub

Private Sub Command3_Click()
    End
End Sub
  • 5
    点赞
  • 11
    收藏
    觉得还不错? 一键收藏
  • 1
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值