VB.net中怎樣知道變量的數(shù)據(jù)類型？

那程序是你寫(xiě)的？不然你會(huì)清楚變量的類型的？

創(chuàng)新互聯(lián)公司服務(wù)項(xiàng)目包括隴川網(wǎng)站建設(shè)、隴川網(wǎng)站制作、隴川網(wǎng)頁(yè)制作以及隴川網(wǎng)絡(luò)營(yíng)銷策劃等。多年來(lái)，我們專注于互聯(lián)網(wǎng)行業(yè)，利用自身積累的技術(shù)優(yōu)勢(shì)、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等，向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案，隴川網(wǎng)站推廣取得了明顯的社會(huì)效益與經(jīng)濟(jì)效益。目前，我們服務(wù)的客戶以成都為中心已經(jīng)輻射到隴川省份的部分城市，未來(lái)相信會(huì)繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任！

要看什么類型可在雙擊窗體后，在窗體通用部分、模塊內(nèi)查看變量類型（就dim等申明的關(guān)鍵字）。

或在程序運(yùn)行時(shí)（以源代碼運(yùn)行時(shí)有效）可查看

VB.NET字符數(shù)據(jù)類型和其他數(shù)據(jù)類型

字符數(shù)據(jù)類型 ??? 字符數(shù)據(jù)類型是用來(lái)處理打印和顯示字符的 Char包含單個(gè)字符 String則包含多個(gè)字符 VB．NET中Char和數(shù)字類型可以進(jìn)行轉(zhuǎn)換 但要通過(guò)Ascw和Chrw等函數(shù)來(lái)完成 如果類型檢查開(kāi)關(guān)被打開(kāi) 則必須在聲明時(shí)在單個(gè)字符后面加上值類型字符C 用以標(biāo)識(shí) 例如下面語(yǔ)句 ??? Option strict on??? Dim Emaiin as char??? Emailn= @ ??? ／／打開(kāi)了類型檢查開(kāi)關(guān) 此時(shí)不可以將其轉(zhuǎn)換為Char??? Emailn= @ C? ／／成功轉(zhuǎn)換??? String類型為零個(gè)或多個(gè) 位字符序列 每個(gè)字符取值為 ～ 當(dāng)字符串被填充了空格的時(shí)候 可以用這些函數(shù)來(lái)清除 Trim Ltrim Rtrim 其標(biāo)識(shí)符類型字符為$ 沒(méi)有值類型符號(hào)

其他數(shù)據(jù)類型 ??? 布爾數(shù)據(jù)類型包含True和False兩種值 在默認(rèn)狀態(tài)下是為False 這個(gè)數(shù)據(jù)類型中True的值為 布爾類型沒(méi)有值類型符號(hào) 如果將布爾值強(qiáng)制轉(zhuǎn)換為非布爾類型時(shí) 代碼中將帶有升級(jí)警告 例如下面語(yǔ)句 ??? Dim Sendagain as Boolean??? Dim Number as Integer??? Number=Sendagain??? 轉(zhuǎn)換以后為??? Dim Sendagain as Boolean??? Dim Number as Integer??? UPGRADE—WARNING Boolean Sendagain is being converted into a unmeric??? Number=Sendagain??? Date類型是一個(gè) 位的有符號(hào)整數(shù) 在VB ． 中Date以Double格式存儲(chǔ) 能夠作為Double類型的變量來(lái)操作 而在VB．NET中由于Date的類型存儲(chǔ)為 位 所以無(wú)法再作為Double類型來(lái)進(jìn)行操作 但卻為兩者的轉(zhuǎn)換提供了相關(guān)的函數(shù) ToOADate和FromOADate 在進(jìn)行源代碼升級(jí)時(shí) 升級(jí)工具沒(méi)有辦法自動(dòng)檢測(cè)到所有這種轉(zhuǎn)換的情況 但是它會(huì)在相應(yīng)的地方插入以上兩個(gè)函數(shù) 例如語(yǔ)句 ??? Dim daynum as Double??? Dim day as Date??? Daynum=day??? 升級(jí)以后為 ??? Dim daynum as Double??? Dim day as Date??? Daynum=daY．ToOADate

lishixinzhi/Article/program/ASP/201311/21734

VB.NET獲取硬盤(pán)信息的幾種方法

strResult += 磁盤(pán)類型: System.Convert.ToInt16(disk(DriveType).ToString())End IfMsgBox(strResult)NextEnd Sub總結(jié)：在VB.NET中，用API函數(shù)可以獲取硬盤(pán)信息。原來(lái)熟悉API函數(shù)VB6程序員，可以對(duì)API函數(shù)聲明進(jìn)行適當(dāng)?shù)母暮螅M(jìn)行調(diào)用。利用FSO（文件系統(tǒng)對(duì)象）的Scrrun.DLL，也可以獲得磁盤(pán)信息。在.net Framwork中，利用WMI可以獲取更多的關(guān)于機(jī)器硬件的詳細(xì)信息（參考System.Management命名空間）。

vb.net怎樣獲取同類控件名稱

Private?ctrName?As?String?'控件名稱

Private?isClick?As?Boolean?'鼠標(biāo)點(diǎn)擊狀態(tài)

'注：如果已知點(diǎn)擊目標(biāo)控件的父控件，ctrParent變量可以不要。

Private?WithEvents?ctrParent?As?Control?'父控件

Private?Sub?ControlAMouseDown(sender?As?Object,?e?As?MouseEventArgs)?_

Handles?Button1.MouseDown

isClick?=?(e.Button?=?MouseButtons.Left?_

Or?e.Button?=?MouseButtons.Right)?'左鍵或右鍵按下

If?isClick?Then

Dim?ctr?As?Control?=?CType(sender,?Control)?'轉(zhuǎn)換Object為控件類型

ctrName?=?ctr.Name?'獲取控件名稱

ctrParent?=?ctr.Parent?'獲取控件的父控件

End?If

End?Sub

'增加這個(gè)父控件事件，是為了正確判別鼠標(biāo)彈起時(shí)是否已進(jìn)入指定目標(biāo)

Private?Sub?ParentMouseMove(sender?As?Object,?e?As?EventArgs)?_

Handles?ctrParent.MouseMove?'如果已取消ctrParent變量，改為相應(yīng)的父控件

If?isClick?Then?isClick?=?False?'點(diǎn)擊狀態(tài)關(guān)閉

End?Sub

Private?Sub?ControlBMouseUp(sender?As?Object,?e?As?EventArgs)?_

Handles?Button2.MouseEnter

If?isClick?Then?'如果點(diǎn)擊狀態(tài)為打開(kāi)

Dim?ctr?As?Control?=?CType(sender,?Control)?'轉(zhuǎn)換Object為控件類型

MsgBox(ctrName??"?|?"??ctr.Name)?'彈出消息顯示結(jié)果

End?If

End?Sub

vb.net 如何獲得一個(gè)文件類型的默認(rèn)程序。

這個(gè)問(wèn)題可以用注冊(cè)表解決。

Function?getOpenCommand(fileExt?As?String)?as?String

Dim?fileType?as?String,?openCommand?as?String

fileExt?=?"."?+?fileExt

'取得文件擴(kuò)展名在注冊(cè)表里的文件類型名稱

'比如.zip的類型名稱一般是zipfile

fileType?=?讀取注冊(cè)表的classes_root下的子鍵(fileExt)的默認(rèn)鍵值

'取得打開(kāi)這種文件的程序

openCommand?=?讀取注冊(cè)表的classes_root下的子鍵(fileType?+?"\shell\open\command")的默認(rèn)鍵值

Return?getOpenCommand

End?Function

讀取注冊(cè)表的HKEY_CLASSES_ROOT下的子鍵的默認(rèn)鍵值的方法可以在網(wǎng)上搜索到。

這樣getOpenCommand("doc")就可以得到一個(gè)字符串(包括引號(hào))：

"C:\Program Files\Word\word.exe" "%1"

這里只需要用Spilt函數(shù)把C:\Program Files\Word\word.exe分離出來(lái)就好了

VB.NET中怎么獲取當(dāng)前打印機(jī)的紙張類型

我是VB.NET 2010版本

窗體上添加一個(gè)按鈕，代碼如下：

Imports System.Drawing.Printing

Public Class Form1

'采用關(guān)鍵字WithEvents聲明一個(gè)PrintDocument對(duì)象，會(huì)引發(fā)它的PrintPage事件

Private WithEvents My_PrintDocument As PrintDocument

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'實(shí)例化PrintDocument對(duì)象

My_PrintDocument = New PrintDocument

'顯示默認(rèn)的打印機(jī)名稱

MsgBox(My_PrintDocument.PrinterSettings.PrinterName)

'顯示默認(rèn)的打印機(jī)紙張類型名稱

MsgBox(My_PrintDocument.DefaultPageSettings.PaperSize.ToString)

End Sub

End Class

當(dāng)前名稱：vb.net獲取類型 vb中文件訪問(wèn)的類型有
本文URL：http://chinadenli.net/article26/doddecg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供營(yíng)銷型網(wǎng)站建設(shè)、移動(dòng)網(wǎng)站建設(shè)、Google、外貿(mào)建站、用戶體驗(yàn)、網(wǎng)站內(nèi)鏈

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)