【正文】 除非另有說明，本文的工作是原始性工作?；緦崿F(xiàn)了預(yù)期的功能，目前試運行良好。 字節(jié)/秒 = tmpEnd With 界面實現(xiàn)添加一個窗體，并按照下表設(shè)置窗體的屬性表 測試目的地可達窗體設(shè)置表窗體屬性 取值Name destinationCaption 目的地是否可達該窗體首先添加一個 Combobox 控件(將 textbox 控件和 listbox 控件的特性結(jié)合在一起，既可以在控件的文本框部分輸入信息，也可以在控件的列表框部分選擇一項)，在代碼部分向其中添加幾個地址；然后添加 3 個 text 控件，text 屬性均設(shè)為空，等待接收數(shù)據(jù)。(3)ENUM_SERVICE_STATUS 結(jié)構(gòu)Typedef struct_ENUM_SERVICE_STATUS( LPTSTR lpServiceName； ‘指明了 SCM 數(shù)據(jù)庫中的服務(wù)的名稱 …… SERVICE_STATUS ServiceStatus； ‘指定一個 SERVICE_STATUS 結(jié)構(gòu)，結(jié)構(gòu)中包含了返回的 lpServiceName 指定的服務(wù)狀態(tài)信息)ENUM_SERVICE_STATUS, *LPENUM_SERVICE_STATUS；(4)SERVICE_STATUS 結(jié)構(gòu)Typedef struct_SERVICE_STATUS( DWORD dwServiceType； ‘標明返回的服務(wù)類型 DWORD dwCurrentState； ‘指明服務(wù)的當前狀態(tài) ……)SERVICE_STATUS， *LPSERVICE_STATUS；窗體中使用函數(shù) EnumSystemServices()枚舉系統(tǒng)中的用戶：Private function EnumSystemServices(ct1 as control)as long……If EnumServicesStatus(hSCManager, SERVICE_WIN32, SERVICE_STATE_ALL, pntr(0), cbBuffSize, cbRequired, dwReturned, hEnumResume) Then‘從 pntr()數(shù)組中提取所需的信息 With List1 Clear For i = 0 To dwReturned 1 sDispName = GetStrFromPtrA(ByVal pntr(i).lpDisplayName) sSvcName = GetStrFromPtrA(ByVal pntr(i).lpServiceName) dwState = pntr(i). .AddItem sDispName amp。Bufptr：函數(shù)返回時，它是指向返回的數(shù)據(jù)信息結(jié)構(gòu)的指針。GetPointerToByteStringW()函數(shù)獲取指針所指的字符串信息。 顯示本機用戶信息 功能設(shè)計這個窗體主要用來顯示系統(tǒng)中所有用戶及其相關(guān)信息。 獲取物理地址 功能設(shè)計這個窗體主要用來獲取 MAC 地址，本模塊使用 NetBIOS 網(wǎng)絡(luò)編程接口來獲取網(wǎng)卡的物理地址。函數(shù) gethostbyname 返回一個 HOSTENT 結(jié)構(gòu)的地址，該結(jié)構(gòu)由 Windows 套接字分配。測試目的地是否可達：隨著網(wǎng)絡(luò)的普及，網(wǎng)絡(luò)資源的豐富給很多用戶帶來很大的便利，獲取網(wǎng)絡(luò)的連接狀態(tài)能更高效的利用網(wǎng)絡(luò)資源。我們程序的界面，大部分是在它上面設(shè)計的。2．Inter 功能的增強：Inter 是當今發(fā)展的潮流，Visual Basic 在 Inter 方面的在增強使得它已成為當前最強有力的開發(fā)工具之一。2 需求分析 需求調(diào)研通過對非計算機行業(yè)使用計算機的人調(diào)查，了解他們對計算機使用中需要的功能進行分析。 it also helps realize gaining the link state of the target 。Inter 的發(fā)展是計算機技術(shù)的發(fā)展熱點。（2） Visual 概述Visual Basic 提供了開發(fā) Windows 應(yīng)用程序最迅速、最簡潔的方法。3．控件、語言和向?qū)Х矫娴男略鎏匦裕孩?DataGrid、DataList、DataCombo 等新增的數(shù)據(jù)控件，相當于 DB 版本的 DB Grid、OLEDBList 和 DBCombo，所不同的是它們都支持新的 ADO 控件。 軟件設(shè)計（1）功能模塊初步設(shè)計通過對用戶需求調(diào)研并分析，確定系統(tǒng)應(yīng)具備的功能，包括：獲取主機名和 IP 地址，獲取物理地址，顯示本機用戶信息，顯示工作站信息，列舉本機服務(wù)，測試目的地是否可達，文件查找，各功能設(shè)計如下：獲取主機名和 IP 地址：對用戶而言要想輕松地在網(wǎng)絡(luò)中遨游，首先必須對本地主機的網(wǎng)絡(luò)配置信息有清晰的了解，如主機名、IP 地址、所注冊的域等。模塊使用 WSAGetLastError 函數(shù)返回上次發(fā)生的網(wǎng)絡(luò)錯誤。函數(shù) gethostbyname 可以成功解析由函數(shù) gethostname 返回的主機名字符串。這里主要講述適配器狀態(tài)命令，利用適配器狀態(tài)命令，可取得與本地計算機及其 LANA 編號的有關(guān)信息。該變量中包含了實際枚舉的元素的數(shù)量。主要函數(shù)及結(jié)構(gòu)定義如下：（1）NetWkstaGetInfo 函數(shù)函數(shù)返回工作站的配置信息。其定義如下：Typedef struct_WKSTA_USER_INFO_0( LPWSTR wkui0_username； ‘當前的登陸到工作站的用戶名)WKSTA_USER_INFO_0,*PWKSTA_USER_INFO_0,*LPEKSTA_USER_INFO_0；窗體使用自定義函數(shù) GetWorkstationUserName()顯示登陸到當前工作站的用戶名：Private Function GetWorkstationUserName(ByVal dwWorkstation As Long) As String…… success = NetWkstaUserEnum(dwWorkstation, 0, bufptr, MAX_PREFERRED_LENGTH, dwEntriesread, dwTotalentries, dwResumehandle) …… If dwEntriesread 0 Then CopyMemory wui0, ByVal bufptr, nStructSize GetWorkstationUserName = GetPointerToByteStringW() Call NetApiBufferFree(bufptr) ‘釋放緩存并退出 Exit Function End If……End Function 界面實現(xiàn)添加一個窗體，并按照下表設(shè)置窗體的屬性表 顯示工作站信息窗體設(shè)置表窗體屬性 取值Name detailCaption 網(wǎng)絡(luò)工作站及當前用戶信息該窗體首先添加一個 ListBox 控件，然后在控件上添加 8 個 label 控件，其中 6 個對應(yīng)返回的工作站信息分別設(shè)置其 Caption 屬性，另一個 Label 控件設(shè)置標題為“函數(shù)調(diào)用成功（0）或錯誤次數(shù)：“，剩余一個 Label 控件標題為調(diào)用 NetWkstaGetInfo()函數(shù)出錯的次數(shù)，無錯則返回 0，1 個 mandbotton控件。1 個 mandbutton 控件。其主要函數(shù)定義如下：（1）Dir 函數(shù)返回一個表示文件名、目錄名或文件夾名稱的字符串，它必須與指定的模式或文件屬性、磁盤卷標相匹配。參考文獻[1] basic 程序設(shè)計導(dǎo)學(xué)[M].北京：清華大學(xué)出版社，2022。（5）學(xué)校可以公布學(xué)位論文的全部或部分內(nèi)容（保密學(xué)位論文在解密后遵守此規(guī)定） 。[7] basic 網(wǎng)絡(luò)編程從入門到精通[M].北京：中國鐵道出版社，2022。設(shè)計后運行的界面如圖所示：圖 文件搜索界面用戶輸入關(guān)鍵字，設(shè)置好搜索路徑、是否搜索子文件夾后，單擊‘運行’按鈕，執(zhí)行搜索功能，若單擊‘退出’按鈕，則退出搜索功能。其中主要的函數(shù)及結(jié)構(gòu)定義如下：（1）IsDestinationReachable 函數(shù)BOOL IsDestinationReachable( LPCSTR lpszDestionation, LPCSTR lpQOCInfo)；lpszDestination：一個指向表示目的地字符串的指針。其中主要的函數(shù)及結(jié)構(gòu)定義如下：（1）函數(shù) OpenSCManagerSC_HANDLE OpenSCManager( LPCTSTR lpMachineName, ‘機器名地址 LPCTSTR lpDatabaseName, ‘數(shù)據(jù)庫名地址 DWORD dwDesireAccess， ‘訪問類型,本程序使用SC_MANAGER_ENUMERATE_SERVICE 類型，允許調(diào)用 EnumServicesStatus 函數(shù)來列舉數(shù)據(jù)庫中的服務(wù)） ；（2）函數(shù) EnumServicesStatusBOOL EnumServiceStatus( SC_HANDLE hSCManager, DWORD dwServiceType, DWORD dwServiceState, LPENUM_SERVICE_STATUS lpServices, …… LPDWORD lpServicesReturned, LPDWORD lpResumeHandle)；hSCManager：SCM 數(shù)據(jù)庫的句柄。（2）WKSTA_INFO_102 結(jié)構(gòu)該結(jié)構(gòu)包含了工作站環(huán)境信息，包括工作平臺、域名、本機名稱以及與操作系統(tǒng)有關(guān)的信息。username: 一個指向 Unicode 字符串的指針，該字符串給出了將返回信息的用戶名稱。 amp。h_addr_lis：一個以 NULL 結(jié)尾的主機地址列表。主機名的形式取決于 Windows Sockets 的實現(xiàn)，也就是說，它可以是一個簡單的主機名，也可以是一個域名。任何行為都直接與它的用戶賬號相聯(lián)系。Visual Basic 集成了 Visual Component Manager(VCM,可視化模塊設(shè)計器)。專業(yè)人員可以用 Visual Basic 實現(xiàn)其他任何 Windows 編程語言的功能，而初學(xué)者只要掌握幾個關(guān)鍵詞就可以建立簡單的應(yīng)用程序。面對形形色色的“助手” ，當務(wù)之急的問題就是針對這些初級用戶開發(fā)一個簡易、快捷、操作方便的應(yīng)用工具。畢 業(yè) 設(shè) 計 (論 文 )Windows 系統(tǒng)輔助管理程序設(shè)計與開發(fā)論文作者姓名：申請學(xué)位專業(yè)：申請學(xué)位類別：指 導(dǎo) 教 師 姓 名 （職 稱 ）：論文提交日期：Windows 系統(tǒng)輔助管理程序設(shè)計與開發(fā)摘 要隨著信息化、網(wǎng)絡(luò)化、數(shù)字化成為社會發(fā)展的大趨勢，信息化浪潮沖擊著人類社會的各個領(lǐng)域，網(wǎng)絡(luò)管理和搜索系統(tǒng)一直以來都是計算機的重要功能。又比如一些本機信息查看工具，如地址、用戶、服務(wù)等信息的查看，一些網(wǎng)絡(luò)工具使那些對操作或信息不熟悉的用戶面臨同樣的捆擾，而且，如何更快、更高效的得到用戶需要的信息，也是工具開發(fā)必須考慮的問題。Visual Basic 在原有 BASIC 語言的基礎(chǔ)上進一步發(fā)展，至今包含了數(shù)百條語句、函數(shù)及關(guān)鍵詞，其中很多和 Windows GUI 有直接關(guān)系。4．高度可移植化的代碼：代碼的可移植性是面向?qū)ο缶幊痰囊粋€重要特點。顯示本機用戶信息：由于 Wind