效果显示:

Private Sub Text1_Change()
Text2.Text = CStr(Text1.Text)     '转字符串
Text3.Text = Val(Text1.Text)       '转为数字
End Sub
备注:
1、Val()函数,字符串转为数字,从左到右依次转换,遇到非数字字符为止,必要时可以使用CDbl();
2、CStr()函数,数字转换为字符串。

VB编程:Val字符串转数字,CStr数字转字符串-6_彭世瑜_新浪博客相关推荐

  1. VB编程:While...Wend语句实例漂亮的星星-17_彭世瑜_新浪博客

    运行效果: 程序代码: Private Sub Command1_Click() Dim a As Long, b As Long Form1.Cls               '清空窗体 Whil ...

  2. VB编程:UCase转大写,LCase转小写-4_彭世瑜_新浪博客

    Private Sub Text1_Change() Text2.Text = LCase(Text1.Text)    '转换成小写字母 Text3.Text = UCase(Text1.Text) ...

  3. [转载]VB网络聊天程序的开发(1)_彭世瑜_新浪博客

    原文地址:VB网络聊天程序的开发(1)作者:VB源码博客 互联网已经成为现代社会生活中非常普及的一项事务.在互联网上可以查询信息.电子购物,还可以进行网络聊天.本博将从今天起,具体的计解一下利用VB开 ...

  4. VB编程:SelectCase多分支选择结构判断成绩优良-11_彭世瑜_新浪博客

    运行效果: 程序代码: Private Sub Command1_Click() If IsNumeric(Text1.Text) Then Select Case CInt(Text1.Text) ...

  5. VB编程:UBound获取数组上限;LBound获取数组下限-25_彭世瑜_新浪博客

    运行效果: 程序代码: Private Sub Command1_Click() Dim a(5) Text1.Text = UBound(a) Text2.Text = LBound(a) End ...

  6. VB编程:DoWhile...Loop当循环计算0~100累加和-15_彭世瑜_新浪博客

    一.运行效果 二.技巧总结 1.常用的循环有三种: (1)for循环(For...Next): (2)当循环(Do...While...Loop)或者(While...Wend): (3)直到循环(D ...

  7. VB编程:Timer控件实例幼儿识字卡片-35_彭世瑜_新浪博客

    运行效果: 程序代码: Dim myarray(10) As String     '定义全局变量,文字数组 Dim i As Integer Private Sub Form_KeyDown(Key ...

  8. VB编程:去除文本框首尾空行-51_彭世瑜_新浪博客

    程序代码 Private Sub Command1_Click()     Dim j As Integer     Dim i(100) As String     Text2 = "&q ...

  9. VB编程:DoEvents将控制权交给系统,防止无限循环-14_彭世瑜_新浪博客

    一.运行效果: 1.没有DoEvents时运行(出现未响应): 2.有DoEvents时运行(没有未响应): 二.关键点     1.DoEvents函数,将控制权交给系统,防止无限循环. 2.将下面 ...

最新文章

  1. 我的《机器学习》课程的课件合集下载
  2. typora及vue主题安装
  3. jQuery动态设置输出窗口的高度
  4. 部署环境_Jenkins环境搭建和部署项目的过程
  5. 传奇服务器能否修改合击技能,传奇合击私服(合击技能)站站职业如何释放的更加准确与强大?...
  6. aws lambda_API网关和AWS Lambda进行身份验证
  7. Qt工作笔记-QListWidget鼠标拖动,一个到另一个,并遍历
  8. TFS报表管理器无权限访问的配置
  9. this_scope_call_apply_bind_柯里化 详细分析
  10. MySQL主从复制: MHA
  11. 玩转Metasploit系列(第二集)
  12. Qt安装要注意的事项(Qt安装教程)
  13. 【信号检测】基于matlab双稳随机共振微弱信号检测【含Matlab源码 1701期】
  14. Java图片压缩 - 压缩到指定大小范围
  15. Laravel 8.63.0 之 RabbitMQ 生产消费案例
  16. 乐优商城之后台管理系统
  17. 谷歌Cartographer的论文研读(一)
  18. 区块链概念正宗龙头股
  19. 数据仓库,数据集市,数据湖
  20. python 画图时各种颜色代码

热门文章

  1. 小米大BOSS雷军写Java代码水平如何?一起来扒一扒
  2. 交换机口不够用能再加一个吗_“交换机”有什么作用?怎样使用?
  3. Avin:Start Day0
  4. SAA-C02学习记
  5. php 取某一日期的前一天
  6. pandas操作时出现SettingWithCopyWarning的解决方法
  7. 程序员必读经典书籍[转载]
  8. 微软原版软件下载链接集合
  9. Python 算例实现Levenberg-Marquardt算法
  10. 小学计算机新课标测试题,2016小学数学新课标测试题及答案