张世豪_vb获取开机运行时间
VB 获取系统启动时间的方法
简单易学的相术
五十个经典网站--你逛...
经济危机，我们能逃过6...
震撼人心的2008视觉...
[美容美发]极好的女人...
中印关系或因领土争端而...
京ICP证090625号 京ICP备05038915号 京网文【2010】0370-002号 京公网安备110105001118号
中国最受委屈的十所大学...
服务条款 | 设360doc为首页 | 留言交流 | 联系我们 | 友情链接 北京六智信息技术有限公司
Copyright © 2005-2011 , All Rights Reserved
VB 获取系统启动时间的方法2011年10月14日 星期五 设为主页 加入收藏帮助 | 留言交流 | 登录
首 页 阅览室 馆友 我的图书馆
VB 获取系统启动时间的方法 （转载）
nxhujiee 收藏于 2011-03-13 阅读数：98 被转藏：1
VB考试2008-12-12 夜兰桥
用VB轻松调用其他程序 - 编程街 - 技术文章2009-10-22 a_cheng
查看更多文章>>
发表评论：
已注册用户请 登录 后再发表评论
Dim Hour As Integer ' 时
Dim Minute As Integer ' 分
Dim Second As Integer ' 秒
Long
Private Declare Function GetTickCount Lib "kernel32" () As
Long
Private Sub Form_Load()
vb6.0计算自己程序段所用时间的方法
文章标题：探索VB6.0程序段时间计算的方法在计算机编程领域，对程序段的执行时间进行准确测量和评估是非常重要的。
在VB6.0编程中，我们常常需要了解自己的程序段所用时间，以便对程序性能进行优化和改进。
本文将深入探讨VB6.0程序段时间计算的方法，帮助读者全面理解这一重要主题。
一、介绍在VB6.0编程中，要计算程序段所用时间，我们常常使用计时器(Timer)函数。
该函数返回从午夜以来的当前系统时间，以秒为单位。
我们可以通过记录程序段开始前和结束后的时间值，再求差来得到程序段的执行时间。
具体来说，可以用以下代码进行实现：```vbaDim startTime As SingleDim endTime As SingleDim elapsedTime As SinglestartTime = Timer' 执行需要计算时间的程序段endTime = TimerelapsedTime = endTime - startTime```以上代码中，我们先定义了三个变量startTime, endTime和elapsedTime分别用来存储开始时间、结束时间和执行时间。
我们利用Timer函数来获取当前系统时间，并通过求差来计算程序段的执行时间。
二、方法在实际编程中，我们也可以封装上述计时方法为一个函数，以便在需要的地方进行调用。
以下是一个示例函数：```vbaFunction CalculateElapsedTime() As SingleDim startTime As SingleDim endTime As SinglestartTime = Timer' 执行需要计算时间的程序段endTime = TimerCalculateElapsedTime = endTime - startTimeEnd Function```通过将计时逻辑封装为函数，我们可以在程序中更灵活地使用，提高代码的复用性和可读性。
怎样在Windows系统中查看系统开机时间
怎样在Windows系统中查看系统开机时间Windows系统是目前使用最广泛的操作系统之一，它提供了丰富的功能和选项，其中之一是能够查看系统的开机时间。
了解系统的开机时间对于诊断故障、优化性能以及进行系统维护都非常重要。
本文将介绍在Windows系统中如何查看系统的开机时间。
Windows系统提供了多种方式来查看系统的开机时间，包括使用系统工具、命令提示符以及注册表编辑器。
下面将分别介绍这三种方法。
一、使用系统工具查看开机时间Windows系统中的“任务管理器”工具提供了一个简单方便的方法来查看系统的开机时间。
按下“Ctrl + Shift + Esc”组合键来打开“任务管理器”。
在“任务管理器”窗口中，点击“性能”选项卡，在下方的“系统”一栏中可以看到“已运行时间”，该数值即为系统的开机时间。
点击“性能”选项卡中的“查看完整版”链接，可以查看更详细的性能信息，包括系统的开机时间和最后一次启动时间。
二、使用命令提示符查看开机时间Windows系统中的命令提示符提供了一个更加灵活的方式来查看系统的开机时间。
按下“Win + R”组合键来打开“运行”对话框，输入“cmd”并点击“确定”按钮来打开命令提示符窗口。
在命令提示符窗口中，输入以下命令并按下回车键：```systeminfo | find "启动时间"```系统会显示出系统的开机时间。
三、使用注册表编辑器查看开机时间Windows系统中的注册表编辑器也可以用来查看系统的开机时间。
按下“Win + R”组合键来打开“运行”对话框，输入“regedit”并点击“确定”按钮来打开注册表编辑器。
在注册表编辑器窗口中，依次展开以下路径：```HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Win dows```在右侧窗格中，找到名称为“EnableLUA”的键，并双击打开。
在弹出的编辑窗口中，可以看到键值的数据，该数据即为开机时间。
VB开机、关机、重启代码
VB 关机，待机，重启代码今天刚写了一个基于VB的计算机关机，待机，重启等的程序，和大家分享一下！只需要把控件添加上，把程序粘贴上就可以实现了！一、控件：六个command控件，一个timer控件，一个text控件，一个label控件，二、程序：Option ExplicitDim t, k As IntegerPrivate Declare Function SetSuspendState Lib "Powrprof" (ByVal Hibernate As Boolean, ByVal ForceCritical As Boolean, ByVal DisableWakeEvent As Boolean) As BooleanPrivate Sub Command6_Click() '取消EndEnd SubPrivate Sub Form_Load() '初始化Command1.Caption = "注销"Command2.Caption = "重启"Command3.Caption = "关机"Command4.Caption = "待机"Command5.Caption = "定时关机"Command6.Caption = "取消"Timer1.Interval = 1000Timer1.Enabled = FalseLabel1.Caption = "定时关机"End SubPrivate Sub Command4_Click() '待机SetSuspendState False, False, FalseEnd SubPrivate Sub Command5_Click() '定时关机If Command5.Caption = "定时关机" ThenCommand5.Caption = "取消定时"t = Val(Text1.Text) * 60Timer1.Enabled = TrueElseIf Command5.Caption = "取消定时" ThenCommand5.Caption = "定时关机"Timer1.Enabled = FalseEnd IfEnd SubPrivate Sub Command1_Click() '注销用户Shell "shutdown -l" '-l 是shutdown 的一个参数意思是注销用户End SubPrivate Sub Command2_Click() '重启Shell "shutdown -R -t 3" '-r 是重启等待时间为0秒End SubPrivate Sub Command3_Click() '关机Shell "shutdown -S -t 3" '-s 是关闭系统End SubPrivate Sub Timer1_Timer() '计时器t = t - 1k = t \ 60Label1.Caption = "系统将在" & Text1.Text & "分钟后关机! 离关机还有" & k & "分钟" If t = 0 ThenTimer1.Enabled = FalseCall Command3_ClickEnd IfEnd Sub三、界面1、未启动定时关机2、启动定时关机。
WIN7电脑如何在任务管理器中查看开机运行时间？
WIN7电脑如何在任务管理器中查看开机运行时间？
WIN7电脑如何在任务管理器中查看开机运行时间？
对于咱们的win7 64位旗舰版下载电脑来说，任务管理器窗口是一个非常重要的功能，同时，也是一个非常实用的功能，因为在这个窗口中，咱们不仅可以对win7旗舰版系统中的程序进行管理操作，还能查询到关于win7旗舰版系统的一些详细信息，例如咱们就可以在这个win7旗舰版电脑的任务管理器窗口中查询到自己的电脑运行了多长的时间，这个功能似乎很少有用户使用过，下面，小编就将详细的操作方法给大家分享一下吧!
1.首先，咱们将win7旗舰版电脑的鼠标移动到下方的任务栏窗口中，然后在任务栏窗口中找到一个空白处，点击鼠标右键，之后就会出现一个下滑菜单，咱们选择这个下滑菜单中的启动任务管理器选项，这样就可以打开win7旗舰版电脑的任务管理器窗口了，当然，咱们也可以直接按下win7旗舰版电脑键盘上的Ctrl+alt+del三个组合键来打开任务管理器窗口。
2.在打开的窗口中，咱们将界面切换到性能这一栏中，窗口下方会有一个运行时间，这里显示的便是咱们win7旗舰版电脑目前的开机时间了。
任务管理器中可以快速查看电脑开机运行时间
任务管理器中可以快速查看电脑开机运行时间
使用电脑过程中，通常会使用上比较长时间，如果不知系统启动时间的话，就不知电脑运行了多久的时间，如果好奇电脑到底运行多久时间，怎样查看呢？下面电脑实用技术网小编告诉大家Win7系统任务管理器中快速查看电脑开机运行时间，感兴趣的用户请一起来了解下吧。
1、在“任务栏”空白处右键，选择“启动任务管理器”；
2、在打开资源管理器界面中，切换到“性能”标签页，就能看到“开机时间”。
以上就是关于Win7操作系统任务管理器中快速查看电脑开机运行时间介绍了，如果想清楚知道电脑一天下来开机时间的用户，请参照以上方法操作吧。
如何在Linux系统中查看系统运行时间
如何在Linux系统中查看系统运行时间在Linux系统中，查看系统的运行时间是一项常见的操作。
下面将介绍几种简单的方法，帮助你轻松了解Linux系统的运行时间。
1. 使用uptime命令uptime命令可用于查看系统的运行时间以及负载情况。
在终端中输入以下命令：```uptime```系统将显示如下信息：```18:27:48 up 10 days, 17:45, 3 users, load average: 0.08, 0.04, 0.01 ```其中，"up 10 days, 17:45" 表示系统已经运行了10天17小时45分钟。
2. 使用who命令who命令可以显示当前登录系统的用户信息以及登录时间。
在终端中输入以下命令：```who -b```系统将显示如下信息：```system boot 2021-10-01 16:41```这里的"2021-10-01 16:41"表示系统启动的时间。
3. 使用last命令last命令可以列出最近登录的用户信息，其中包含登录时间和注销时间。
在终端中输入以下命令：```last reboot```系统将显示如下信息：```reboot system boot 4.4.0-150-generic Mon Aug 13 14:15 still running```"Mon Aug 13 14:15"表示系统的启动时间。
4. 查看/proc/uptime文件在Linux系统中，/proc目录是一个特殊的虚拟文件系统，其中包含了许多与系统相关的信息。
通过查看/proc/uptime文件，可以获取系统的运行时间。
在终端中输入以下命令：```cat /proc/uptime```系统将显示如下信息：```413355.55 408906.57```第一个数字表示系统从启动到现在的时间（以秒为单位），第二个数字表示系统空闲时间。
开机启动设置计划任务查看开关机时间计算机基础
开机启动设置计划任务查看开关机时间计算机基础在计算机基础中，开机启动设置、计划任务以及查看开关机时间是非常重要的操作。
这些功能可以帮助用户按照自己的需求有效地管理计算机的运行时间，并且提高计算机的效率和使用体验。
在本文中，我们将详细介绍这些功能的使用方法。
一、开机启动设置在计算机启动时，有一些应用程序或服务是会自动启动的。
这些应用程序或服务会占用计算机的资源，从而影响计算机的性能和启动速度。
为了提高计算机的启动速度，以及避免不必要的资源占用，我们可以对开机启动进行设置。
在Windows系统中，我们可以通过以下步骤设置开机启动项：1. 打开任务管理器：按下Ctrl + Shift + Esc组合键，或者右键点击任务栏，选择“任务管理器”。
2.切换到“启动”选项卡：在任务管理器中，选择“启动”选项卡，可以看到当前所有开机启动的程序和服务。
3.禁用不必要的开机启动项：在“启动”选项卡中，可以看到每个启动项的名称、发布者以及启动类型。
对于那些不必要启动的程序，右键点击，选择“禁用”。
4.设置开机启动项：对于希望开机自动启动的程序，右键点击选择“启用”。
请注意，禁用和启用开机启动项需要管理员权限。
二、计划任务计划任务可以帮助用户在指定的时间或条件下执行特定的任务。
通过合理设置计划任务，可以实现自动备份数据、定时运行程序、自动关机等功能。
在Windows系统中，我们可以通过以下步骤设置计划任务：1. 打开任务计划程序：按下Win + R组合键，输入“taskschd.msc”，点击“确定”打开任务计划程序。
2.创建任务：在任务计划程序中，点击“任务计划程序库”，选择“创建任务”。
在“常规”选项卡中，输入任务名称和描述。
3.设置触发器：切换到“触发器”选项卡，点击“新建”设置任务触发的时间或事件。
可以选择计划运行一次、每天、每周、每月或特定事件等。
4.设置操作：切换到“操作”选项卡，点击“新建”选择要执行的操作。
查询电脑开关机时间的vbs代码
查询电脑开关机时间的vbs代码核⼼代码：strComputer = "."Set objWMIService = GetObject("winmgmts:" _& "{impersonationLevel=impersonate}!\\" _& strComputer & "\root\cimv2")Set colLoggedEvents = objWMIService.ExecQuery _("Select * from Win32_NTLogEvent " _& "Where Logfile = 'System' And EventCode = '6005' Or EventCode = '6006'")For Each objEvent In colLoggedEventsFlag = Flag + 1If Flag = 1 ThenWscript.Echo "本次开机时间: " & FormatWMIUTC(objEvent.TimeWritten)ElseIf Flag = 2 ThenWscript.Echo "上次关机时间: " & FormatWMIUTC(objEvent.TimeWritten)ElseIf Flag = 3 ThenWscript.Echo "上次开机时间: " & FormatWMIUTC(objEvent.TimeWritten)Exit ForEnd IfNext'FormatUTCFunction FormatWMIUTC(WMIDateString)DS = " // :: "FormatWMIUTC = Left(WMIDateString,2)For i = 2 To 7FormatWMIUTC = FormatWMIUTC & Mid(WMIDateString, i * 2 - 1, 2) & Mid(DS,i,1)Next'FormatWMIUTC = Mid(WMIDateString, 1, 4) & "年" _' & Mid(WMIDateString, 5, 2) & "⽉" _' & Mid(WMIDateString, 7, 2) & "⽇ " _' & Mid (WMIDateString, 9, 2) & ":" _' & Mid(WMIDateString, 11, 2) & ":" _' & Mid(WMIDateString,13, 2)End Function将上⾯的代码保存为vbs后缀的⽂件，双击运⾏即可。
统计VB程序的运行时间
/article/61/388/2006/200607 1938847.shtml作者：土人用户退出程序时若能告诉用户程序当次用了多长时间、时间过长的话则提醒用户注意休息，我想这样的创意应是对用户的一种体贴，会使我们的软件更具亲和性，也给我们的软件添色不少。
VB中可利用Now函数或者Timer控件完成此设想。
用Now函数能保证时间统计的准确性。
思路是这样：用CStr(Second(Now)、CStr(Minute(Now))、Cstr(Hour(Now))及CStr(Day(Now))记取程序启动和关闭时系统时钟的秒、分、时、日，然后作些计算即可得出运行时间总和。
因其计算在跨月份的情况下相当复杂，本文不打算对这个思路作讨论。
用Timer控件不失为一种很好的解决方法，它能较为方便地帮助我们统计程序运行的时间。
具体思路是：设置几个变量分别记录秒、分、时、日,让Timer控件控制秒、分、时、日的变化。
当秒数等于60时则分钟加1，当分钟等于60时则小时加1，当小时等于24时则日加1。
这里，秒最为关键，它的精确性决定了时间的统计是否准确。
Timer控件的Interval属性的设置因而变得很重要：我们的秒变量将由它来主宰。
将其Interval属性设为1000的话一个小时可能会误差6秒钟，这应该是无关紧要了吧。
以下是完整的程序代码清单。
作为试验，本程序仅需要一个窗体、一个按钮和一个Timer控件。
程序在PWin98、VB6.0下调试通过。
Private s As Integer '声明秒Private m As Integer '声明分Private h As Integer '声明小时Private d As Integer '声明日'启动程序时设置Timer控件属性并给秒、分、时、日变量赋值Private Sub Form_Load()Timer1.Enabled = TrueTimer1.Interval = 1000s = 0m = 0h = 0d = 0End SubPrivate Sub Timer1_Timer()s = s + 1 '每秒钟给s变量加1If s >= 60 Thens = 0 '重新计算秒m = m + 1 '逢秒为60则分钟加1If m >= 60 Thenm = 0 '重新计算分h = h + 1 '逢分钟为60则小时加1If h >= 24 Thenh = 0 '重新计算小时d = d + 1 '逢24小时则天数加1End IfEnd IfEnd IfEnd Sub'退出时Private Sub cmdExit_Click()If d*24 +h >= 1 Then '使用时间若超过一小时MsgBox "本次使用的时间为：" & d*24 + h & "小时" & m & "分钟" _& s & "秒" & vbCrLf & "谢谢使用!" & vbCrLf & _"但请您注意休息，不要太劳累哦!", vbOKOnly, "再见"Else '若不超过一小时MsgBox "本次使用的时间为：" & h & "小时" & m & "分钟" _& s & "秒" & vbCrLf & "谢谢使用!" & vbCrLf, vbOKOnly, "再见"End IfEndEnd Sub'若用户点击窗体右上角的关闭按钮Private Sub Form_queryunload(Cancel As Integer, Unloadmode As Integer) cmdExit_ClickEnd Sub。
vb记录开机时间(访问txt文档)
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InsertPicT oDb.ClickDim myfilestream As New System.IO.FileS tream( "c:\6.bmp ", IO.FileMode.Open)Dim data() As ByteReDim data(myfilestream.Length - 1)myfilestream.Read(data, 0, myfilestream.Length)myfilestream.Close()DataSet11.T ables(0).Rows(7).Item(3) = dataSqlDataAdapter1.Update(DataSet11.GetChanges())End SubDim a As IntegerFunction GetWD(ByVal num As String) As S tringSelect Case numCase 1GetWD = "日"Case 2GetWD = "一"Case 3GetWD = "二"Case 4GetWD = "三"Case 5GetWD = "四"Case 6GetWD = "五"Case 7GetWD = "六"End SelectEnd FunctionPrivate Sub Form_Load()Me.T op = 5000Me.Left = 8000Label1.Caption = "今天是" & " " & Y ear(Now) & "年" & " " & Month(Now) & "月" & Day(Now) & "日" & " " & "星期" & GetWD(Weekday(Now))Dim T oday As DateDim DayString As StringDim PathString As S tringDim DateRec As IntegerT oday = NowPathString = App.PathIf Right(PathString, 1) <> "\" ThenPathString = PathS tring + "\"End IfIf Dir(PathS tring + "StartPc.log") <> "" ThenDateRec = FreeFileOpen PathString + "S tartPc.log" For Input As #DateRec Line Input #DateRec, DayStringClose #DateRecLabel2.Caption = "你上次开机是:" & Chr(13) & DayString ElseLabel2.Caption = "你第一次使用本计算机"End IfDateRec = FreeFileOpen PathString + "S tartPc.log" For Output As #DateRec DayString = T odayPrint #DateRec, DayStringClose #DateRecEnd SubPrivate Sub Timer1_Timer()a = a + 1If a = 11 ThenUnload MeEnd IfEnd SubPrivate Sub Timer2_Timer()Label6.Caption = Format(Now, "hh:mm:ss")End Sub。
VB-电脑开机时间查询工具--StartSystem
'起始窗体StartSysTeme.frm内容'======================================================= VERSION 5.00 Begin VB.Form StartSysTime Caption = "开机时间" ClientHeight = 3915 ClientLeft = 60 ClientTop = 345 ClientWidth = 4590 LinkTopic = "Form1" ScaleHeight = 3915 ScaleWidth = 4590 StartUpPosition = 1 '所有者中心 Begin VB.Timer ShowTimes Interval = 1000 Left = 3600 Top = 1800 End Begin mandButton ExitSST Caption = "关闭" BeginProperty Font Name = "楷体_GB2312" Size = 14.25 Charset = 134 Weight = 700 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 495 Left = 600 TabIndex = 1 Top = 3120 Width = 3495 End Begin bel CTS Alignment = 2 'Center Caption = "年月日" BeginProperty Font Name = "新宋体" Size = 15.75 Charset = 134 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H000000FF& Height = 375 Left = 480 TabIndex = 5 Top = 960 Width = 3615 End Begin bel Label2 Caption = "当前时间" BeginProperty Font Name = "华文行楷" Size = 21.75 Charset = 134 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H00FF0000& Height = 495 Left = 480 TabIndex = 4 Top = 360 Width = 1815 End Begin bel CurrTime Caption = "当前时间" BeginProperty Font Name = "宋体" Size = 15.75 Charset = 134 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H00FF00FF& Height = 375 Left = 2640 TabIndex = 3 Top = 360 Width = 1455 End Begin bel TheTimes Alignment = 2 'Center BorderStyle = 1 'Fixed Single Caption = "XX小时XX分钟XX秒" BeginProperty Font Name = "隶书" Size = 18 Charset = 134 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H000000FF& Height = 495 Left = 480 TabIndex = 2 Top = 2280 Width = 3615 End Begin bel Label1 Caption = "开机时间已达" BeginProperty Font Name = "华文行楷" Size = 21.75 Charset = 134 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty ForeColor = &H00FF0000& Height = 495 Left = 480 TabIndex = 0 Top = 1680 Width =2895 End End Attribute VB_Name = "StartSysTime" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True AttributeVB_Exposed = False Private Declare Function GetTickCount Lib "kernel32" ( As Long '取得开机到现在的时间,毫秒 Public ExitTime As Integer '退出时间 ' 在固定的框里显示当前开机时间 Public Function GetTheTimes( Dim RunTime As Long '系统已开机时间 Dim Hour As Integer '小时 Dim Minute As Integer Dim Second As Integer RunTime = GetTickCount( \ 1000 '取得开机时间的毫秒数 Hour = RunTime \ 3600 '换算成小时RunTime = RunTime - 3600 * Hour '取得除小时外的剩余时间 Minute = RunTime \ 60 '分钟当选 Second = RunTime - 60 * Minute '秒数 TheTimes.Caption = Hour & " 小时 " & Minute & " 分 " & Second & " 秒" End Function ' 时钟固定自动调用 Private Sub ShowTimes_Timer( '时钟事件自动触发过程 CurrTime.Caption = Time Call GetTheTimes '显示 If ExitTime > 1 Then '如果不到10秒 ExitTime = ExitTime - 1 ExitSST.Caption = "在 " & ExitTime & " 秒后关闭程序！" Else Unload Me '到十秒退出 End If End Sub Private Sub ExitSST_Click( Unload Me End Sub Private SubForm_Load( CTS.Caption = Year(Now & "年" & Month(Now & "月" & Day(Now & "日" & " " & WeekdayName(Weekday(Now CurrTime.Caption = Time Call GetTheTimes ExitTime = 10 ExitSST.Caption = "在 " & ExitTime & " 秒后关闭程序！" End Sub'+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ +++++++++++++++ '工程1.txt内容:'=============================================================== =========================================== Type=ExeForm=StartSysTime.frm Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation IconForm="StartSysTime" Startup="StartSysTime" ExeName32="MyTimes.exe" Command32="" Name="工程1" HelpContextID="0" CompatibleMode="0" MajorVer=1 MinorVer=0 RevisionVer=0 AutoIncrementVer=0 ServerSupportFiles=0 VersionCompanyName="Free Left China" CompilationType=0 OptimizationType=0FavorPentiumPro(tm=0 CodeViewDebugInfo=0 NoAliasing=0 BoundsCheck=0 OverflowCheck=0 FlPointCheck=0 FDIVCheck=0 UnroundedFP=0 StartMode=0 Unattended=0 Retained=0 ThreadPerObject=0 MaxNumberOfThreads=1 [MS Transaction Server] AutoRefresh=1。
如何查看开机启动时间
如何查看开机启动时间
如何查看开机启动时间
如何查看开机启动时间，这就要⽤到命令systemd-analyze了
1. 查看系统启动时间
# systemd-analyze
Startup finished in 1.059s (kernel) + 5.170s (initrd) + 1min 4.977s (userspace) = 1min 11.207s
graphical.target reached after 1min 4.957s in userspace
kernel：在启动第⼀个⽤户态进程（init）前，内核运⾏了多久
initrd：在切⼊时机的根⽂件系统前，initrd运⾏了多久
userspace：进⼊根⽂件系统之后⽤户空间启动花费了多久
2. 查看系统每个单元花费多长启动时间
# systemd-analyze blame
但要注意这些信息可能并不准确，带有⼀定误导性，因为花费时间较长的启动单元有可能只是在等待另⼀个依赖的单元启动完成3. 制作开机时间启动图
# systemd-analyze plot
可输出⼀个 SVG图像，详细显⽰每个单元启动时刻，并且⾼亮显⽰每个单元花费多久才完成启动
# systemd-analyze plot > 1.svg
打开⽅式可选择浏览器，⽅便预览
4. 查看单元间依赖关系
# systemd-analyze dot
此命令除⾮使⽤--order或--require选项限定仅显⽰特定类型的依赖关系，否则输出为所有的依赖关系
# systemd-analyze dot | dot -Tsvg > 2.svg。
开机启动设置、计划任务、查看开关机时间。计算机基础
《计算机组装与维修》
《计算机组装与维修》
这时候复制你想要开启启动程序的快捷方式。然 后再打开的启动文件夹中右键，选择粘贴。这个 时候安全软件提示是否修改开启启动项选择允许 即可
《计算机组装与维修》
方法二：系统配置实用程序 在开始里面选择运行。运行里面输入msconfig即
可以进入开启选项管理了。
计算机组装与维修查看开关机时间计算机组装与维修计算机组装与维修计算机组装与维修计划任务计算机组装与维修计算机组装与维修计算机组装与维修计算机组装与维修计算机组装与维修计算机组装与维修计算机组装与维修计算机组装与维修批处理批处理是一种简化的脚本语言也称作宏
《计算机组装与维护》
计算机日常应用
开机启动
《计算机组装与维修》
《计算机组装与维修》
《计算机组装与维修》
《计算机组装与维修》
方法三：利用注册表功能实现
《计算机组装与维修》
《计算机组装与维修》
选择进入到目录 HKEY_LOCAL_MACHINE\SOFTWARE\Micros
oft\Windows\CurrentVersion\Run
《计算机组装与维修》
《计算机组装与维修》
动手环节 1，计划在某个时刻启动QQ。 2，计划结束某个程序 taskkill /f /im qq.exe 3，计划关机 shutdown /s /c "要关机了"
默认30秒关机，提示信息"要关机了"
《计算机组装与维护》
右键，选择“新建”，选择“字符串值”
《计算机组装与维修》
禁止某些程序的启动， 就是反过程。
“讲述人”
《计算机组装与维修》
长期面对无声的电脑，我们难免疲倦。如果正在 输入的内容被系统一字(字母)不差地念出来，你 还能在无声的疲倦中输入错误的内容吗？以 Windows 2000/XP中一个鲜为人知的“讲述人” 为例教你DIY一个完全免费的语音键盘。在“运行” 中输入“narrator”，点“确定”。点“确定”跳 过后便请出本文的主角──“讲述人”。如果你的 音箱已经打开，听到了什么？不想听的话就按一 下Ctrl键。再按任意键试试，你输入的字母键被系 统用标准的美国英语读了出来，这时一个完全免 费的语音键盘就诞生在你的手中了。
自动获取电脑时间vba代码
自动获取电脑时间vba代码自动获取电脑时间VBA代码在VBA中，我们可以使用一些代码来自动获取电脑的时间。
这个功能在很多情况下都非常有用，比如在编写日志文件时自动记录时间，或者在进行数据分析时需要记录每次操作的时间戳等等。
本文将介绍如何使用VBA代码来实现自动获取电脑时间的功能。
我们需要在VBA编辑器中创建一个新的模块，可以通过按下Alt + F11来打开VBA编辑器。
然后，在模块中插入以下代码：```vbaFunction GetCurrentTime() As StringGetCurrentTime = Format(Now, "yyyy-mm-dd hh:mm:ss") End Function```以上代码定义了一个名为GetCurrentTime的函数，它会返回当前的电脑时间。
在函数内部，我们使用了VBA的Format函数来将当前时间格式化为"yyyy-mm-dd hh:mm:ss"的形式。
你也可以根据自己的需求来修改时间的格式。
接下来，我们可以在Excel中的单元格中调用这个函数来获取当前的电脑时间。
首先，在一个空白的单元格中输入以下公式：`=GetCurrentTime()`然后按下Enter键，即可看到该单元格中显示了当前的电脑时间。
如果你希望在VBA中直接获取电脑时间而不是在Excel中的单元格中显示，可以使用以下代码：```vbaSub GetAndDisplayTime()Dim currentTime As StringcurrentTime = GetCurrentTime()MsgBox "当前时间是：" & currentTimeEnd Sub```以上代码定义了一个名为GetAndDisplayTime的子过程，它会调用GetCurrentTime函数获取当前的电脑时间，并将时间显示在一个消息框中。
VB计算Windows从启动后所运行的总时间1
VB使窗体右上角的X按钮失效删除系统菜单利用Api函数计算窗体右上角的X按钮通常用来关闭一个程序，这个小X按钮实际上是和系统菜单的“关闭”菜单项关联在一起的，什么？不知道什么是系统菜单，系统菜单是指我们点击窗体左上角的小图标时所弹出的菜单，其中好象有“恢复”、“移动”、“最大化”、“最小化”、“关闭”这么几个按钮。
这个菜单用普通的方法是不能编辑和改变的，但是我们可以通过API函数GetSystemMenu来得到它的句柄，然后通过菜单相关的API函数就能改变它了，下面一起看看怎么做吧。
为了学习方便，下面先给出源码，并且已经作了详细的中文注释：程序说明：本例利用API函数GetSystemMenu得到系统菜单的句柄X按钮是系统菜单的一菜单项，然后用RemoveMenu函数删去这一菜单项，也就是使X按钮失效了。
-------------------------------------------【VB声明】Private Declare Function GetSystemMenu Lib "user32" (ByV al hwnd As Long, ByV al bRevert As Long) As Long【说明】取得指定窗口的系统菜单的句柄。
在vb环境，“系统菜单”的正式名称为“控制菜单”，即单击窗口左上角的控制框时出现的菜单【返回值】Long，如执行成功，返回系统菜单的句柄；零意味着出错。
如bRevert设为TRUE，也会返回零（简单的恢复原始的系统菜单）【备注】在vb里使用：系统菜单会向窗口发送一条WM_SYSCOMMAND消息，而不是WM_COMMAND消息【参数表】hwnd ----------- Long，窗口的句柄bRevert -------- Long，如设为TRUE，表示接收原始的系统菜单Private Declare Function GetSystemMenu Lib "user32" ( _ByV al hwnd As Integer, _ByV al bRevert As Integer _) As Integer【VB声明】Private Declare Function RemoveMenu Lib "user32" (ByV al hMenu As Long, ByV al nPosition As Long, ByV al wFlags As Long) As Long【说明】删除指定的菜单条目。
如何查询电脑开关机时间
如何查询电脑开关机时间
想要查询电脑开关机时间，该如何操作呢，那么如何查询电脑开关机时间的呢?下面是店铺收集整理的如何查询电脑开关机时间，希望对大家有帮助~~
查询电脑开关机时间的方法
当然查看电脑现在开机多久了，我们的方法是很多的，比如我们可以打开电脑的任务管理器，按下键盘的“CTRL+ALT+DEL”就可以打开。
在任务管理器的性能中就可以看到当前电脑开机的时间。
我们还可以按下键盘的“微软窗口键+R"打开系统的运行窗口，然后在运行中输入命令”CMD"打开命令提示符界面。
在命令提示符界面中直接输入系统信息命令“systeminfo"，然后回车。
看到的系统信息界面中，大家仔细查找系统启动时间，这里可以看到开机时间!
上面介绍的都是查看当前电脑开机的时间，那么怎么查看上一次电脑开机或者关机的时间呢?这时候我们就需要打开电脑的控制面板了，控制面板中将查看方式改为大图标，然后点击管理工具打开。
管理工具中我们找到这里的事件查看器打开。
事件查看器的windows日志的系统中我们右侧找到事件记录【Eventlog】这里显示为6005的就代表电脑开机的时间。
这里事件记录为6006的就代表上次关机的时间，所以这里大家可以拖动滚动条查找这两个数字，对电脑关机和开机的时间进行查看。
当然如果你认为这样查看不好寻找的话，我们可以点击右侧的筛选当前日志。
然后我们输入6005作为条件，然后进行查找。
这样我们就查找出了所有的开机时间记录，大家可以看下每次电脑开机的时间，当然如果要查找关机时间的话，上面筛选的时候查找6006作为条件就好!。
怎么用命令查看系统的开机时间
怎么用命令查看系统的开机时间
对于一个网络工作人员而言，很多时候管理服务器的日常运行。
不仅要观察进程CPU等情况，系统的运行状态时间也是一个重要的指标。
下面就让店铺教大家怎么用命令来查看系统的开机时间吧。
用命令查看系统开机时间的方法
其实，对于windows系统最简便的方法就是通过命令行cmd查看了(开始----运行输入cmd
打开如下图 cmd命令行界面，输入 systeminfo(针对windows系统都试用)，系统会进行检查需要等待一段时间
接着系统会列出一长串的系统状态信息，往下拉找到如图位置(系统启动时间，对比一下当前时间，就知道启动多久了)
用本地连接查看的方法
每个windows系统计算机右下角都有本地连接，如果没有本地连接找到控制面板---- 网络和internet服务
接着查看网络连接属性---- 本地连接(本图适用于win7系统)xp 2003server直接看网上邻居属性
本地连接状态---常规里面就能查看到持续时间了，如图。