vb.net不操作時鎖定的簡單介紹
VB.NET如何鎖定label.text的值不變
你的問題很模糊
創(chuàng)新互聯(lián)企業(yè)建站,10余年網(wǎng)站建設經(jīng)驗，專注于網(wǎng)站建設技術，精于網(wǎng)頁設計，有多年建站和網(wǎng)站代運營經(jīng)驗，設計師為客戶打造網(wǎng)絡企業(yè)風格，提供周到的建站售前咨詢和貼心的售后服務。對于做網(wǎng)站、網(wǎng)站建設中不同領域進行深入了解和探索，創(chuàng)新互聯(lián)在網(wǎng)站建設中充分了解客戶行業(yè)的需求，以靈動的思維在網(wǎng)頁中充分展現(xiàn)，通過對客戶行業(yè)精準市場調(diào)研，為客戶提供的解決方案。
1，你要實現(xiàn)的是label.text的text值不變還是什么意思？
如果是怕程序運行的時候可能出現(xiàn)程序修改text值問題，你可以加一個判斷，或者用一個timer定時確認text是否被修改過了
Public Class Form1
Private Sub Timer1_Tick()
‘判斷l(xiāng)abel的text值是否改變了
If Label1.Text = "label的text值" Then
Else
Label1.Text = "label的text值"
End If
End Sub
Private Sub Form1_Load()
Label1.Text = "label的text值"’給Label1.Text賦新值
Timer1.Interval = "你定義的時間"
Timer1.Start()
End Sub
End Class
當然，其實這個是沒有這樣復雜的，
Label1的TextChanged事件就可以處理
呵呵，你自己根據(jù)需要選用吧！
vb 當程序運行60分鐘后無鍵盤或鼠標動作時，如何實現(xiàn)程序自動鎖定？
Dim IOInfo As LASTINPUTINFO'
Dim lngBak As LongDim lngEnd As LongDim lngCnt As Long'Private Sub Form_Load() lngEnd = 3600 '設置停止時間，單位為秒，你可以先設置60秒查看效果 Timer1.Interval = 1000
Timer1.Enabled = True
End Sub'Private Sub Timer1_Timer() IOInfo.cbSize = Len ( IOInfo)
Call GetLastInputInfo (IOInfo) If lngBak IOInfo.dwTime Then '鼠標鍵盤有操作時計數(shù)器清0
lngBak = IOInfo.dwTime
lngCnt = 0
End If
'
lngCnt = lngCnt + 1 ' If lngCnt = lngEnd Then
Timer1.Enabled = False
MsgBox "到了1小時后自動停止計時器", 64
End If
End Sub
在.net里如何鎖定窗體，拖動標題欄，使其不移動？
實現(xiàn)方法如下：
1.引用命名空間
using System.Runtime.InteropServices;
2.聲明如下變量：
public class Form1 : System.Windows.Forms.Form
{
//.....
[DllImport("user32.dll",EntryPoint="GetSystemMenu")]
extern static IntPtr GetSystemMenu(IntPtr hWnd, IntPtr bRevert);
[DllImport("user32.dll",EntryPoint="RemoveMenu")]
extern static int RemoveMenu(IntPtr hMenu, int nPos, int flags);
//.....
}
3.在Form的構造函數(shù)里加入代碼
public Form1()
{
const int MF_BYPOSITION = 0x0400;
const int MF_REMOVE = 0x1000;
FormBorderStyle = FormBorderStyle.FixedSingle;
MaximizeBox = false;
MinimizeBox = false;
RemoveMenu(GetSystemMenu(Handle,IntPtr.Zero),1,MF_BYPOSITION |MF_REMOVE);
}
就OK啦
VB.NET中如何鎖定窗體的大小。讓最大化按鈕點不了。
VisualStudio 2010中的vb.net
鎖定邊框：
代碼輸入Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D
或者在屬性列表里設置FormBorderStyle 為Fixed3D
最大化不可用：
代碼輸入Me.MaximizeBox = False
或者在屬性列表里設置MaximizeBox 為 False
當前文章：vb.net不操作時鎖定的簡單介紹
網(wǎng)址分享：http://m.jiaotiyi.com/article/dseigoe.html