VB.net 寫一個(gè)方法，求一個(gè)時(shí)間變量=系統(tǒng)當(dāng)前年月時(shí)間-去5個(gè)月的時(shí)間，求大神指點(diǎn)

可以使用VB.NET中的DataTime對(duì)象的AddMonths方法：

成都創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時(shí)代的延川網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

Dim d1 As Date = Now

MsgBox(d1) '顯示現(xiàn)在的機(jī)器日期與時(shí)間

MsgBox(d1.AddMonths(2)) '顯示現(xiàn)在的機(jī)器日期加上2個(gè)月的對(duì)應(yīng)日期與時(shí)間

MsgBox(d1.AddMonths(-1)) '顯示現(xiàn)在的機(jī)器日期減掉1個(gè)月的對(duì)應(yīng)日期與時(shí)間

DataTime對(duì)象的方法很多，你可以通過在線查閱，例如：

d1.Add()

d1.AddDays()

d1.AddHours()

d1.AddMinutes()

d1.AddSeconds()

d1.AddYears()

等等！

注意：從字面意思可以理解是加，而括號(hào)里是填寫對(duì)應(yīng)的數(shù)值，當(dāng)數(shù)值為負(fù)數(shù)，起到減的作用了。

vb.net通過線程給lable.text賦值問題

為了線程安全，微軟規(guī)定線程不能直接訪問窗體控件，需要用委托的方式，窗體代碼中增加：

Delegate Sub SetTextDelegate(txt As String)

Private Sub SetText(ByVal Result As String)

If Me.lblTime.InvokeRequired Then

Dim d As New SetTextDelegate(AddressOf SetText)

Me.Invoke(d, New Object() {Result})

Else

Me.lblTime.Text = Result

End If

End Sub

然后在線程中需要更改lblTime時(shí)，用：

SetText("當(dāng)前時(shí)間:" System.DateTime.Now)

vb.net 中如何對(duì)日期變量賦值

Datebl=#10/10/2001#

不知道用不用加雙引號(hào)

其實(shí)字符串直接可以隱式轉(zhuǎn)換成日期型的

vb.net里的時(shí)間函數(shù)問題

dim date as DateTime = DateTime.Parse(TextBox1.Text)

TextBox2.Text = date.ToShortDateTime()

日期類型有好多種轉(zhuǎn)換表達(dá)式， 特別的使用.ToString("YYYY-mm-dd") 這種形式可以自定義ToString里面的格式化樣式。

vb.net 怎么使用指針對(duì)數(shù)組快速賦值賦值

數(shù)組好像沒有快速賦值吧，或者你再把問題再清楚一點(diǎn)。

語句執(zhí)行時(shí)間倒是可以做到。在語句前

Dim oldTime As Date = Now

在過程語句后加

Dim newTime As Date = Now

Dim differenceInSeconds As Long = DateDiff(DateInterval.Second, oldTime, newTime)

textbox1.text= "共用了:" differenceInSeconds "秒!"

vb.net 關(guān)于賦值問題？

這句代碼

counter = 1

和這句

counter = counter 1

是等效的，上面那個(gè)是二元運(yùn)算符，原本是C家族語言的特性，在VB.Net中也可以使用了。