VB函数-SetComputerName
API函数"SetComputerName"不是设置新计算机名吗,请看: Private Sub Command2_Click() Dim xm As String xm = "jinfu-111" jj = SetComputerName(xm) If jj > 0 Then MsgBox "设置成功" End Sub 点击后弹出"设置成功" 可计算机名称怎么还是没改???
如果你用的是98系统的话修改完计算机的名字后必须重新启动才能有效。还有就是jj应该显示定义一下为long型，默认是integer的。当然要有函数声明，你应该做了吧
Private Declare Function SetComputerName Lib "kernel32" _Alias "SetComputerNameA" _
(ByVal lpComputerName As String) As Long
参数：lpComputerName参数，指定要设置的计算机的新名字。
答：Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (By...详情>>
答：我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛，你可以自己注册一个用户进去看看，你可以和他们交流也可以寻求他们的帮助，我想没有你解决不了的问题，...详情>>
答：格式化文本区域的段落标记，用于规定文本和层的属性和位置等。比如： 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>
