不管是vb還是c# 文本框TextBox2.Text一定是字符串,所以不管你使用gettype,typeof,is 獲取的類型都是String,不可能是數值型的。你可以是用強制轉換來判斷,能轉換為decimal的,繼續,不能轉換的,就捕獲錯誤,然后彈出錯誤框。
目前創新互聯公司已為上千家的企業提供了網站建設、域名、網頁空間、網站運營、企業網站設計、揭東網站維護等服務,公司將堅持客戶導向、應用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協力一起成長,共同發展。
try{
testClass.Chinese = Convert.ToDecimal(TextBox2.Text)
}
catch{//彈出錯誤框}
如果是要判斷引用類型可以用TypeOf來判斷
Dim s = "666"
If TypeOf (s) Is String Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
如果不知道是否是引用類型,可以這樣判斷:
Dim s = 666
If VarType(s) = VariantType.String Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
或者:
Dim s = 666
If s.GetType = "".GetType Then
Debug.Print("string")
Else
Debug.Print("not string")
End If
這個問題可以用注冊表解決。
Function getOpenCommand(fileExt As String) as String
Dim fileType as String, openCommand as String
fileExt = "." + fileExt
'取得文件擴展名在注冊表里的文件類型名稱
'比如.zip的類型名稱一般是zipfile
fileType = 讀取注冊表的classes_root下的子鍵(fileExt)的默認鍵值
'取得打開這種文件的程序
openCommand = 讀取注冊表的classes_root下的子鍵(fileType + "\shell\open\command")的默認鍵值
Return getOpenCommand
End Function
讀取注冊表的HKEY_CLASSES_ROOT下的子鍵的默認鍵值的方法可以在網上搜索到。
這樣getOpenCommand("doc")就可以得到一個字符串(包括引號):
"C:\Program Files\Word\word.exe" "%1"
這里只需要用Spilt函數把C:\Program Files\Word\word.exe分離出來就好了
當前題目:vb.net類型判斷 vba typename判斷類型
轉載注明:http://m.newbst.com/article24/dosjije.html
成都網站建設公司_創新互聯,為您提供營銷型網站建設、靜態網站、定制網站、用戶體驗、ChatGPT、做網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯