1、如果要設(shè)置時(shí)間變量應(yīng)該這樣:
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)!專注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了鄂溫克免費(fèi)建站歡迎大家使用!
Dim a As Date = Date.FromOADate(24 / 9 / 2010)
2、Sub SaveSetting(ByVal AppName As String, ByVal Section As String, ByVal Key As String, ByVal Setting As String)
此函數(shù)只能在注冊(cè)表的“HKEY_CURRENT_USER\Software\VB and VBA Program Settings\”創(chuàng)建應(yīng)用程序的參數(shù)設(shè)置,這個(gè)函數(shù)是從VB6繼承過(guò)來(lái)的,是為了升級(jí)vb6代碼而使用的。函數(shù)中的AppName為項(xiàng)目名,Section為節(jié)點(diǎn),Key為鍵名,Setting為鍵值。例如SaveSetting("MyName","Section1","MainKey","Settingvalue")將會(huì)在“HKEY_CURRENT_USER\Software\VB and VBA Program Settings\MyName”創(chuàng)建一個(gè)節(jié)點(diǎn)"Section1",并在Section1下創(chuàng)建一個(gè)鍵名為"MainKey",值為"Settingvalue"的鍵。
至于如何保存RadioButton的值,可以先用"CStr"函數(shù)或"CInt"函數(shù)將RadioButton是否被選中的Boolean值轉(zhuǎn)換為String或Integer,再使用SaveSetting函數(shù)存入注冊(cè)表。注意:當(dāng)使用Cstr函數(shù)轉(zhuǎn)換Boolean時(shí),如果Boolean為“真”,轉(zhuǎn)換的String就是“True”,反之則是“False”,轉(zhuǎn)換為Integer是0代表假,1代表真。
不知是否詳細(xì)。
干嘛不直接用系統(tǒng)時(shí)間呢?
在start按下時(shí) textbox4.text=now
在stop按下時(shí) textbox5.text=now
加個(gè)timer,兩個(gè)label,以下是代碼:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Label1.Text = Format(Now(), "yyyy-MM-dd HH:mm:ss")
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label2.Text = Format(Now(), "yyyy-MM-dd HH:mm:ss")
If DateDiff(DateInterval.Hour, DateTime.Parse(Label1.Text), DateTime.Parse(Label2.Text)) = 3 Then
MsgBox("超過(guò)3小時(shí)了!", , "信息提示")
Timer1.Enabled = False 'timer終止,不然會(huì)一直談對(duì)話框!
End If
End Sub
本文題目:vb.net逝去時(shí)間的簡(jiǎn)單介紹
URL網(wǎng)址:http://jinyejixie.com/article6/dochcig.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供商城網(wǎng)站、建站公司、網(wǎng)站設(shè)計(jì)公司、網(wǎng)站排名、ChatGPT、做網(wǎng)站
聲明:本網(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)