vb 字符串转为数字 和判断字符串是否是数字字符串【转】

最新推荐文章于 2021-07-25 21:17:22 发布
最新推荐文章于 2021-07-25 21:17:22 发布
阅读量7k 收藏 6
点赞数
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/miaozk2006/article/details/82416943
版权
这篇博客介绍了VB中的Val函数和IsNumeric函数。Val函数用于从字符串中提取数字，忽略非数字字符，而IsNumeric函数则判断一个字符串是否能转化为数字。文章通过示例展示了这两个函数的用法。
摘要由CSDN通过智能技术生成

1 Val 函数


返回包含于字符串内的数字，字符串中是一个适当类型的数值。

语法

Val(string)

必要的 string 参数可以是任何有效的字符串表达式.

说明

Val 函数，在它不能识别为数字的第一个字符上，停止读入字符串。那些被认为是数值的一部分的符号和字符，例如美圆号与逗号，都不能被识别。但是函数可以识别进 位制符号 &O（八进制）和 &H（十六进制）。空白、制表符和换行符都从参数中被去掉。

下面的返回值为 1615198：

Val(" 1615 198th Street N.E.")

在下面的代码中，Val 为所示的十六进制数值返回十进制数值 -1。

Val("&HFFFF")

注意 Val 函数只会将句点（.）当成一个可用的小数点分隔符。当使用不同的小数点分隔符时，如在国际版应用程序中，代之以 CDbl 来把字符串转换为数字。  
  
Val 函数示例
本示例使用 Val 函数返回字符串中所含的数值。

Dim MyValue
MyValue = Val("2457") ' 返回 2457。
MyValue = Val(" 2 45 7") ' 返回 2457。
MyValue = Val("24 and 57") ' 返回 24。  
2 IsNumeric 函数


返回 Boolean 值，指出表达式的运算结果是否为数。

语法  
   
IsNumeric(expression)

必要的 expression 参数是一个 Variant，包含数值表达式或字符串表达式。

说明

如果整个 expression 的运算结果为数字，则 IsNumeric 返回 True；否则返回 False。

如果 expression 是日期表达式，则 IsNumeric 返回 False。  
   
IsNumeric 函数示例
本示例使用 IsNumeric 函数判断变量的值是否可为数值。

Dim MyVar, MyCheck
MyVar = "53" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 True。

MyVar = "459.95" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 True。

MyVar = "45 Help" ' 指定值。
MyCheck = IsNumeric(MyVar) ' 返回 False。

摘自：网络整理

 
 
 
    
 
 
 
相关文章参考：
 
 
 
    
 
 
 
※VB SendMessage向其他程序窗口发送字符串消息实例
 
 
※VB 二进制数组与十六进制字符串相互转换
 
 
※VB 汉字字符串转换成拼音
 
 
※VB查找替代字符串的函数 
 
 
※VB中字符串匹配的多种方式 
 
 
※vb 字符串转为数字和判断字符串是否是数字字符串【转】
 
 
※查找替代字符串的函数 
 
 
※VB中使用MD5算法
 
 
※VB的MD5加密模块 
 
 
※加密算法-MD5算法
 
 
※VB 字符串MD5加密函数
 
 
 
    
 
 
 
 
 
 
 
 
 
 
★VB部分相关文章推荐：★
 
 
 
 
 
 
☆VB6 中善用ByRef 提升速度 
 
 
☆[vb] Set 语句 
 
 
☆VB_Format自定义格式 
 
 
☆用VB如读取内存地址 
 


                

        

        

    




        

            

                    
                      最低0.47元/天 解锁文章
                        
                    
            

        

    

      

        

            

              
                
                  miaozk2006
                
              
            

            

                关注
              
            

        

        

          
    
            
  • 
              
                
                
                
                
                      0
                
              
              
    点赞
    
            
    • 
            
  • 
              
                
                
                
              
              
    踩
    
            
    • 
            
  • 
              
                
                
                
                
                    6
                
              
              
    
                
    
                  
                    收藏
                  
                
    
              
    
              
    
                
    
                  觉得还不错?
                  
                    一键收藏
                  
                 
                
    
              
    
            
    • 
          
  • 
            
    
              
              
            
    
              
              
              
                    0
              
            
            
    评论
    
          
    • 
          
  • 
          
    • 
          
  • 
            
              
            
              
    
            
              
                
            
    
          
    • 
        

      

      










                



	

		

			

				
					
r 字符串转化为数值_R语言系列3：高级数据管理

				
			

			

				

					weixin_39826984的博客
				

				

					11-21
					
					2303
					
				

			

		

		

			
				
R语言系列3：高级数据管理此文内容为《R语言实战》的笔记，人民邮电出版社出版。从高中电脑课学VB开始，大一课内开始学习C++，到后来大二为了数模学习Matlab，到大三为了搞深度学习自学Python，到研究生之初学习Stata——选择一门语言对我来说就像是小时候玩冒险岛，到10级的时候是转战士好还是弓箭手好一般的纠结。我查阅了很多B乎的文章，最后觉得可能R比较合适现在的我。作为从Pyth...

			
		

	



                

              
                



	

		

			

				
					
VB 判断字符和数字

				
			

			

				

					06-07
				

			

		

		

			
				
VB 判断字符和数字
VB 判断字符和数字

			
		

	



                


  
              

                


	

		

			

				
					
判断字符串是否全为数字

				
			

			

				

					Jelly_tracy的专栏
				

				

					02-08
					
					3418
					
				

			

		

		

			
				
Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->using System;using System.Collections.Generic;using System.Text;using System.Diagnostics;using System.

			
		

	





	

		

			

				
					
vb.net 判断字符串是否为数字

				
			

			

				

					laocooon的博客
				

				

					07-25
					
					2868
					
				

			

		

		

			
				
''' <summary>
        ''' 判断字符串是否为数字
        ''' </summary>
        ''' <param name="value">字符串</param>
        ''' <returns>如果字符串为数字，返回true，否则返回false</returns>
        <Extension()>
        Function IsNum...

			
		

	



		

			
		



	

		

			

				
					
判断是否是数字（VB制作）

				
			

			

				

					11-26
				

			

		

		

			
				
当你输入一个文本时，系统会自动给出判断，您输入的是不是数字。欢迎大家下载。

			
		

	





	

		

			

				
					
如何判断一个字符串是不是数字

				
			

			

				

					LonelyBoy的博客
				

				

					04-09
					
					1056
					
				

			

		

		

			
				
最近开发的时候。。。对传入的字符串判断是不是数字。。这个也为自己转成Number类型做一个判断。。。废话不多说。。直接上代码


/*判断字符串是不是数字*/
	public static boolean isNumber(String str){//判断字符串是不是数字
		if(null == str || 0==str.length()){
			return false;
		}
		 
		 if(str.startsWith("+")){//正数带符号的
			 str = str.substr

			
		

	





	

		

			

				
					
[removed]一段比较精简的代码实现取得字符串的字节数

				
			

			

				

					12-08
				

			

		

		

			
				
通常的做法是，如果字符串是以特定编码存储的，那么在统计其字节长度之前，首先需要判断字符串的编码类型。如果确定字符串是GBK编码的，那么可以直接使用LenB函数计算字节长度。如果是UTF-8编码的字符串，则需要先将...

			
		

	





	

		

			

				
					
VB中字符串匹配的多种方式

				
			

			

				

					miaozk2006的专栏
				

				

					06-13
					
					3176
					
				

			

		

		

			
				
 这段时间在移植项目的过程中，起初我想判断一个字符串中是否存在某字符（串），直接的使用方法是用instr（start，string1，string2，VB compare），但经过分析在VB中可以只用一下方法来判断！ 1.常用的 InStr 方法 Function InStr([Start], [String1], [String2], [Compare As VbCompareMethod = ...

			
		

	





	

		

			

				
					
VB 二进制数组与十六进制字符串相互转换

				
			

			

				

					miaozk2006的专栏
				

				

					01-30
					
					2257
					
				

			

		

		

			
				

1.VB 二进制Byte()数组转换成十六进制字符串函数：
Private Function BytesToHex(bytB() As Byte) As StringDim strTmp As String, i As LongFor i = 1 To UBound(bytB)strTmp = strTmp &amp; " " &amp; Hex(bytB(i))DoEventsNextBy...

			
		

	





	

		

			

				
					
Vb判断输入数字、字符的方法及例子

				
			

			

				

					08-09
				

			

		

		

			
				
摘要:VB源码,字符处理,输入判断
　　Vb判断输入数字、字符的方法及例子，本文本框是只允许输入数字的，如果你输入了其它类型或是混杂有其它类型的字符，那么后面的文本框会适时给出提示，告诉你输入有误。虽然是简单的小例子，但却是挺实用的，特别是对新手很友好，存起来当作参考吧。

			
		

	





	

		

			

				
					
判断在VB.NET中输入一个数字是否是一个数字?

				
			

			

				

					ganyiyang的专栏
				

				

					12-20
					
					3438
					
				

			

		

		

			
				
在VB.NET中在文本框里输入字段看是否是数字,不用函数来判断 mohongmao»[VB.NET]Text控制只可以填写数字 Private Sub TxtPrice_KeyPress(省略) Handles TxtPrice.KeyPress         处理TEXT只可以输入数字和.键         Dim c As Char         c = e.KeyC

			
		

	





	

		

			

				
					
C# 中对字符串是否为数字的判断（类似 vb.net 中的 IsNumber）(转)

				
			

			

				

					anhai6033的博客
				

				

					09-08
					
					243
					
				

			

		

		

			
				
原文:http://www.cnblogs.com/HQT/archive/2005/08/26/223374.html是否为数字：char.IsNumber(char c)char.IsNumber(string s,int index)同样，还有判断是否字母类别的 IsLetter , 是否十进制数字的 IsDigit 都是非常好用的。另外还有判断是否为字母的方法.以后不用再用正则...

			
		

	





	

		

			

				
					
在vb中如何区分一个变量值为中文还是英文字母？

				
			

			

				

					蝈蝈俊.net
				

				

					02-23
					
					2280
					
				

			

		

		

			
				
  在vb中如何区分一个变量值为中文还是英文字母？Dim i%For i = 1 To Len(Text1.Text)    MsgBox Asc(Mid(Text1.Text, i, 1))Nextasc值在0-255为标准ascii字符你查查msdn可以找到英文字母的ascii值，当返回的值是5位数，则肯定不是英文字符，但有可能是日韩或其他非英语的语言字符，不

			
		

	





	

		

			

				
					
VB编程：If-ElseIf判断输入的字符是数字还是字母-10

				
			

			

				

					彭世瑜的博客
				

				

					11-16
					
					5660
					
				

			

		

		

			
				

  
    
			
运行效果：



程序代码：

Private Sub Command1_Click()
    Dim bo, ba, st As
String
    st = Text1.Text
    bo = st Like
"[a-z]"
    ba = st Like
"[A-Z]"
    If IsNumeric(st)
Then
     
  MsgBox "输...

			
		

	





	

		

			

				
					
VB编程：Val字符串转数字，CStr数字转字符串-6

				
			

			

				

					彭世瑜的博客
				

				

					11-15
					
					9528
					
				

			

		

		

			
				

  
    
			
效果显示：



Private Sub Text1_Change()
Text2.Text = CStr(Text1.Text)  
  '转字符串
Text3.Text = Val(Text1.Text)  
    '转为数字
End Sub

备注：
1、Val()函数，字符串转为数字，从左到右依次转换，遇到非数字字符为止，必要时可以使用CDbl()；
2、CSt...

			
		

	





	

		

			

				
					
vb怎么将字符串转为数字

					
最新发布

				
			

			

				

					06-03
				

			

		

		

			
				
在 VB 中，可以使用 `CInt()`、`CLng()`、`CDec()`、`CDbl()` 等函数将字符串转换为数字。这些函数的用法如下：

```vb
Dim str As String = "123"
Dim num As Integer = CInt(str) ' 将字符串转为整数
Dim lng As Long = CLng(str) ' 将字符串转为长整数
Dim dec As Decimal = CDec(str) ' 将字符串转为十进制数
Dim dbl As Double = CDbl(str) ' 将字符串转为双精度浮点数
```

需要注意的是，使用这些函数将字符串转换为数字时，如果字符串无法转换为数字，会抛出异常。为了避免这种情况，可以使用 `Integer.TryParse()`、`Long.TryParse()`、`Decimal.TryParse()`、`Double.TryParse()` 等函数来进行转换，这些函数会返回一个 Boolean 值，表示转换是否成功，转换成功时将数字存储在输出参数中。例如：

```vb
Dim str As String = "123"
Dim num As Integer
If Integer.TryParse(str, num) Then
    ' 转换成功，可以使用 num 变量
Else
    ' 转换失败，处理转换失败的情况
End If
```

			
		

	



              




          




        



    





    



      

      

        
      

      





	

		评论	
	

	
	




  

    

      添加红包
      
    

    

      

        
        

          
          
        

        
请填写红包祝福语或标题

      

      

        
        

          
          个
        

        
红包个数最小为10个

      

      

        
        

          
          元
        

        
红包金额最低5元

      

      

        
        

          当前余额3.43元
          前往充值 >
        

      

      

        

          需支付：10.00元
        

        
        
      

    

  





  

    
    
  

  

    
    
  








  

    

      

        

          

            
            
成就一亿技术人!

          

          

        

        

          

          

            领取后你会自动成为博主和红包主的粉丝
            规则
          

        

      

      

        

          

            
              
            
            

              
hope_wisdom
 发出的红包
            

          

        

        

          

          

          

        

      

    

    

  



      
      

      
实付元

      
使用余额支付

      

        

          

            
            点击重新获取
          

        

        
扫码支付

      

      

        
          
            
          
          
        
      

      

        
        钱包余额
          0
          

            
            

              

                
抵扣说明：

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

              

            

          

      

      余额充值