सच है कि आप एक प्रकार है कि आप निर्धारित करने के लिए किया जाए या नहीं यह एक पूर्णांक या किसी अन्य प्रकार मैं यह सोचते हैं कि नंबर एक स्ट्रिंग में निहित है है की आवश्यकता होगी, कर रहे हैं कि द्वारा आंकना। यदि ऐसा है तो आप यह निर्धारित करने के लिए Integer.TryParse विधि का उपयोग कर सकते हैं कि मान एक इंटीजर है या नहीं, यह सफल होने पर इसे पूर्णांक के रूप में भी आउटपुट करेगा। यदि आप ऐसा नहीं कर रहे हैं तो कृपया अधिक जानकारी के साथ अपने प्रश्न को अपडेट करें।
Dim number As String = 34.68
Dim output As Integer
If (Integer.TryParse(number, output)) Then
MsgBox("is an integer")
Else
MsgBox("is not an integer")
End If
संपादित करें:
यदि आप एक दशमलव या किसी अन्य प्रकार का उपयोग कर रहे अपना नंबर, एन कुछ इस तरह शामिल करने के लिए आप एक ही विचार कर सकते हैं।
Option Strict On
Module Module1
Sub Main()
Dim number As Decimal = 34
If IsInteger(number) Then
MsgBox("is an integer")
Else
MsgBox("is not an integer")
End If
If IsInteger("34.62") Then
MsgBox("is an integer")
Else
MsgBox("is not an integer")
End If
End Sub
Public Function IsInteger(value As Object) As Boolean
Dim output As Integer ' I am not using this by intent it is needed by the TryParse Method
If (Integer.TryParse(value.ToString(), output)) Then
Return True
Else
Return False
End If
End Function
End Module
स्रोत
2013-09-24 01:22:45
किस प्रकार किया जाता है चर है कि आप अपने नंबर शामिल करने के लिए प्रयोग कर रहे हैं, यह एक स्ट्रिंग है ?. –