VB常见问题及解决
如何用VB建立快捷方式
Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName AsString, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long
Sub Command1_Click()
Dim lReturn As Long
’添加到桌面
lReturn = fCreateShellLink("..\..\Desktop", "Shortcut to Calculator", "c:\windows\calc.exe", "") ’添加到程序组
lReturn = fCreateShellLink("", "Shortcut to Calculator", "c:\windows\calc.exe", "")
’添加到启动组
lReturn = fCreateShellLink("\Startup", "Shortcut to Calculator", "c:\windows\calc.exe", "")
End Sub
如何让程序在Windows 启动时自动执行？
有以下二个方法：
方法1: 直接将快捷方式放到启动群组中。
方法2:
在注册档HKEY_LOCAL_MACHINE 中找到以下机码
\Software\Microsoft\Windows\CurrentVersion\Run
新增一个字串值，包括二个部份
1. 名称部份：自己取名，可设定为AP名称。
2. 资料部份：则是包含’全路径档案名称’ 及’执行参数’
例如：
Value Name = Notepad
Value Data = c:\windows\notepad.exe
在TextBox中如何限制只能输入数字？
参考下列程序：
Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End Sub
我希望TextBox 中能不接受某些特定字符，例如’@#$%"，有没有简单一点的写法？
方法有好几种, 以下列举二种：
方法1: 可以使用IF 或Select Case 一个个判断, 但如果不接受的字符多时, 较麻烦!
方法2: 将要剔除的字符统统放在一个字串中，只要一个IF 判断即可!! 如下：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim sTemplate As String
sTemplate = "!@#$%^&*()_+-=" ’用来存放不接受的字符
If InStr(1, sTemplate, Chr(KeyAscii)) > 0 Then
KeyAscii = 0
End If
End Sub
如何让鼠标进入TextBox 时自动选定TextBox 中之整串文字？
这个自动选定反白整串文字的动作，会使得输入的资料完全取代之前在TextBox 中的所有字符。
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1)
End Sub
如何检查软盘驱动器里是否有软盘？
使用：
Dim Flag As Boolean
Flag = Fun_FloppyDrive("A:")
If Flag = False Then MsgBox "A:驱没有准备好，请将磁盘插入驱动器！", vbCritical
’-------------------------------
’函数:检查软驱中是否有盘的存在
’-------------------------------
Private Function Fun_FloppyDrive(sDrive As String) As Boolean
On Error Resume Next
Fun_FloppyDrive = Dir(sDrive) <> ""
End Function
如何弹出和关闭光驱托盘？
Option Explicit
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Command1_Click()
mciExecute "set cdaudio door open" ’弹出光驱
Label2.Caption = "弹出"
End Sub
Private Sub Command2_Click()
Label2.Caption = "关闭"
mc iExecute "set cdaudio door closed" ’合上光驱
Unload Me
End
End Sub
如何让你的程序在任务列表隐藏
Private Declare Function RegisterServiceProcess Lib "kernel32" (ByVal ProcessID As Long, ByVal ServiceFlags As Long) As Long
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long
’请你试试Ctrl+Alt+Del 是不是你的程序隐藏了
Private Sub Command1_Click()
i = RegisterServiceProcess(GetCurrentProcessId, 1)
End Sub
如何用程序控制滑鼠游标(Mouse Cursor) 到指定位置？
以下这个例子，当User 在Text1 中按下’Enter’ 键后，滑鼠游标会自动移到Command2 按钮上方
请在声明区中加入以下声明：
’16 位版本：( Sub 无传回值)
Declare Sub SetCursorPos Lib "User" (ByVal X As Integer, ByVal Y As Integer)
’32 位版本：( Function 有传回值，Integer 改成Long )
Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
’在Form1 中加入以下程序码：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
x% = (Form1.Left + Command2.Left + Command2.Width / 2 + 60) / Screen.TwipsPerPixelX
y% = (Form1.Top + Command2.Top + Command2.Height / 2 + 360) / Screen.TwipsPerPixelY
SetCursorPos x%, y%
End If
End Sub
如何用鼠标移动没有标题的Form，或移动Form 中的控制项？
在声明区中放入以下声明：
’16 位版本：( Sub 无返回值)
Private Declare Sub ReleaseCapture Lib "User" ()
Private Declare Sub SendMessage Lib "User" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, lParam As Long)
’32 位版本：( Function 有返回值，Integer 改成Long )
Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
’共用常数：
Const WM_SYSCOMMAND = &H112
Const SC_MOVE = &HF012
’若要移动Form，程序码如下：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim i As Long
i = ReleaseCapture
i = SendMessage(Form1.hwnd, WM_SYSCOMMAND, SC_MOVE, 0)
End Sub
’以上功能也适用于用鼠标在Form 中移动控制项，程序码如下：
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim i As Long
i = ReleaseCapture
i = SendMessage(Command1.hwnd, WM_SYSCOMMAND, SC_MOVE, 0)
End Sub
检查文件是否存在？
Function FileExists(filename As String) As Integer
Dim i As Integer
On Error Resume Next
i = Len(Dir$(filename))
If Err Or i = 0 Then FileExists = False Else FileExists = True
如何设置对VB数据库连接的动态路径
我个人因为经常作一些数据库方面的程序，对于程序间如何与数据库进行接口的问题之烦是深有体会，因为VB在数据库链接的时候，一般是静态，即数据库存放的路径是固定的，如用VB的DATA，adodc,DataEnvironment 等到作数据库链接时，如果存放数据库的路径被改变的话，就会找不到路经，真是一个特别烦的事。
笔者的解决方法是利用app.path 来解决这个问题。
一、用data控件进行数据库链接，可以这样：
在form_load()过程中放入：
private form_load()
Dim str As St ring ’定义
str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If
data1.databasename=str & "\数据库名"
data1.recordsource="数据表名"
data1.refresh
sub end
这几句话的意为，打开当前程序运行的目录下的数据库，你只要保证你的数据库在你程序所在的目录之下就行了。
二、利用adodc（ADO Data Control)进行数据库链接：
private form_load ()
Dim str As String ’定义
str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If
str = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & str & "\tsl.mdb"
Adodc1.ConnectionString = str
https://www.wendangku.net/doc/af18287928.html,mandType = adCmdText
Adodc1.RecordSource = "select * from table3"
Adodc1.Refresh
end sub
三、利用DataEnvironment进行数据库链接
可在过程中放入：
On Error Resume Next
If DataEnvironment1.rsCommand1.State <> adStateClosed Then
DataEnvironment1.rsCommand1.Close ’如果打开，则关闭
End If
’i = InputBox("请输入友人编号:", "输入")
’If i = "" Then Exit Sub
DataEnvironment1.Connection1.Open App.Path & "\userdatabase\tsl.mdb"
DataEnvironment1.rsCommand1.Open "select * from table3 where 编号=’" & i & "’"
’Set DataReport2.DataSource = DataEnvironment1
’Data Report2.DataMember = "command1"
’DataReport2.show
end sub
四、利用ADO(ActiveX Data Objects)进行编程：
建立连接：
dim conn as new adodb.connection
dim rs as new adodb.recordset
dim str
str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If
str = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & str & "\tsl.mdb"
conn.open str
rs.cursorlocation=aduseclient
rs.open "数据表名",conn,adopenkeyset.adlockpessimistic
用完之后关闭数据库：
conn.close
set conn=nothing
如何让用户自行输入方程式，并计算其结果？
假设我们要让使用者在“方程式”栏位中自由输入方程式，然后利用方程式进行计算，则引用ScriptControl控件可以很方便地做到。
( ScriptControl 控件附属于VB 6.0，如果安装后没有看到此一控件，可在光盘的\Common\Tools\VB\Script 目录底下找此一控件，其.文件名为Msscript.ocx。) 假设放在窗体上的ScriptControl控件名称为ScriptControl1，则在“计算”按钮的Click事件中编写如下代码：
Dim Statement As String Statement = "X=" + Text1.Text + vbCrLf + _ "Y=" + Text2.Text + vbCrLf + _ "MsgBox ""计算结果="" & Y " ScriptControl1.ExecuteStatement( Statement
如何让一个App 永远保持在最上层( Always on Top )
请在声明区中加入以下声明
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Const SWP_NOMOVE = &H2 ’不更动目前视窗位置
Const SWP_NOSIZE = &H1 ’不更动目前视窗大小
Const HWND_TOPMOST = -1 ’设定为最上层
Const HWND_NOTOPMOST = -2 ’取消最上层设定
Const FLAGS = SWP_NOMOVE Or SWP_NOSIZE
’将APP 视窗设定成永远保持在最上层
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, FLAGS
’取消最上层设定
SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, FLAGS
我要如何在程序中开启网页？
在声明区中声明如下(在.bas 档中用Public, 在Form 中用Private)
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As
Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
在程序中
Intranet：
ShellExecute Me.hWnd, "open", "http://Intranet主机/目录", "", "", 5
Internet：
ShellExecute Me.hWnd, "open", "https://www.wendangku.net/doc/af18287928.html,", "", "", 5
如何把小图片填满MDIForm 成为背景图？
以下这个范例，要：
1、一个MDIForm：不必设定任何属性。
2、一个Form1：不一定是MDIChild，最好MDIChild 为False，但是AutoRedraw 设成True。
3、Form1 上面放一个隐藏的PictureBox：名称为Picture1，不必设定Picture 属性。
4、一张图片的完整路径。
’将以下模组放入MDIForm 的声明区中：
Sub TileMDIBkgd(MDIForm As Form, bkgdtiler As Form, bkgdfile As String)
If bkgdfile = "" Then Exit Sub
Dim ScWidth%, ScHeight%
ScWidth% = Screen.Width / Screen.TwipsPerPixelX
ScHeight% = Screen.Height / Screen.TwipsPerPixelY
Load bkgdtiler
bkgdtiler.Height = Screen.Height
bkgdtiler.Width = Screen.Width
bkgdtiler.ScaleMode = 3
bkgdtiler!Picture1.Top = 0
bkgdtiler!Picture1.Left = 0
bkgdtiler!Picture1.Picture = LoadPicture(bkgdfile)
bkgdtiler!Picture1.ScaleMode = 3
For n% = 0 To ScHeight% Step bkgdtiler!Picture1.ScaleHeight
For o% = 0 To ScWidth% Step bkgdtiler!Picture1.ScaleWidth
bkgdtiler.PaintPicture bkgdtiler!Picture1.Picture, o%, n%
Next o%
Next n%
MDIForm.Picture = bkgdtiler.Image
Unload bkgdtiler
End Sub
以下为一应用实例：
Private Sub MDIForm_Load()
TileMDIBkgd Me, Form1, "c:\windows\Tiles.bmp"
End Sub
关闭指定的程序
要做到像Task Manager 一样，可以关闭指定的程序，方法如下：
在声明区中放入以下声明：(16位改成win31 API)
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const WM_CLOSE = &H10
以下之范例示范如何关闭一个视窗标题(Caption) 为【小算盘】的程序：
Dim winHwnd As Long
Dim RetVal As Long
winHwnd = FindWindow(vbNullString, "小算盘")
Debug.Print winHwnd
If winHwnd <> 0 Then
RetVal = PostMessage(winHwnd, WM_CLOSE, 0&, 0&)
If RetVal = 0 Then
MsgBox "Error posting message."
End If
Else
MsgBox "并未开启小算盘程序."
End If
如何隐藏及再显示鼠标
很简单，只用到了一个ShowCursor API，参数也很简单，只有一个bShow，设定值如下：
True：显示鼠标/ False：隐藏鼠标
Declare Function ShowCursor Lib "user32" Alias "ShowCursor" (ByVal bShow As Long) As Long 如何从您的应程序中结束Windows 重开机？
很多软件在Setup 完之后都会自动关机重开机，以便让某些设定值可以生效，其实这个功能很简单，只要几行指令就可以做到了！
关键就是要使用ExitWindowsEx 这个API，这个API 只有二个参数，第一个参数是一个Flag，目的是要告诉Windows 要以什么方式关机，在下面的声明中会列出可用的Flag 常数值，至于第二个参数则是一个保留值，只要设定成0 就可以了。
很重要的一点是：如果您想要让关机动作更顺利，记得要Unload 您的程序！
’在声明区中(Bas Module / Form Module) 加入以下声明：
Public Const EWX_LOGOFF = 0 ’这四个常数值可以并用
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4
Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
’实例：如果您想强迫关机重开机，程序码如下：
ret = ExitWindowsEx(EWX_FORCE OR EWX_REBOOT, 0)
如何用VB 启动其他程序或开启各类文件？
要在VB 中启动其他程序或开启各类文件，最简单的方法就是使用Shell 函数，例如：要开启C:\Test.txt 这个文字文件，则要启动记事本来开启这个文件案，程序如下：
Dim RetVal As Long
RetVal = Shell("C:\Windows\Notepad.exe C:\Test.txt", 3) ’3代表视窗会最大化，并具有驻点，细节请查Help
以上的语法虽然很简单，但有一个风险，若是我们不知道开启文件的执行文件位置，则程序便会有错误产生，尤其一般软件在安装的时候都可以让使用者自行选择安装目录，所以执行文件的路径不能写死在程序中，要解决这个问题，就是在注册文件中找到该副文件名之启动程序位置，再放入Shell 中。
但是以上的作法必须熟悉注册文件，而且必须使用Windows API 来Call (注册文件的存取以后会有专文来说明)，如果您对注册文件的存取及API 的使用都很纯熟的话，当然没问题，但是有些人对于注册文件会有畏惧，这时候，您可以使用下面的方法：Shell("Start C:\Test.txt")
您完全不用知道这份文件的启动程序是什么？它放在什么地方？参数Start 便会自动依照附文件名到注册文件中找到启动程序来开启该份文件案！不赖吧！
注一：在Windows 95/98/NT 平台中, 什么副文件名之文件案, 该由什么执行文件来启动, 都设在关联中,
代码为HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Extensions
例如: 名称为".DOC" 之资料为"C:\Progra~1\Micros~2\Office\WINWORD.EXE ^.DOC"
名称为".TXT" 之资料为"notepad.exe ^.txt"
注二：使用Start 之唯一缺点为"会比直接指定执行文件稍为慢0.5-1 秒钟."
如何找出Windows 目录的正确路径？
有时候我们在程序中必须用到Windows 的目录，以存取Windows 目录下的文件，照理说，这应该是最简单的功能，前提是每个人在Setup Windows 必须采用Windows 的预设目录名称，也就是C:\Windows，但是常常不是这样，有时候由於要使新旧版本共存，或者其他原因，有人会将Windows 目录改成c:\win95、c:\win98、Windows95 或Windows98......
若是程序中必须用到Windows 目录，要找到正确的路径，做法如下：
’在声明区中加入以下声明：
Const MAX_PATH = 260
Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Public Function GetWinPath()
Dim strFolder As String
Dim lngResult As Long
strFolder = String(MAX_PATH, 0)
lngResult = GetWindowsDirectory(strFolder, MAX_PATH)
If lngResult <> 0 Then
GetWinPath = Left(strFolder, InStr(strFolder, Chr(0)) - 1)
Else
GetWinPath = ""
End If
End Function
’在程序中使用方法如下：
Private Sub Command1_Click()
Call MsgBox("您电脑中Windows 目录的正确路径是：" & GetWinPath, vbInformation) End Sub
让您的文字框有Undo / Redo 的功能
很多软件都有提供Undo / Redo 的功能，Microsoft 的产品都可以提供多次Undo 反悔，功能更强大！
在VB 的程序中，我们也可以提供这样的功能！不过只能Undo / Redo 一次
’在声明区中加入以下声明：’32位元
’Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
’Const EM_UNDO = &HC7
’16位元
Private Declare Function SendMessage Lib "User" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, lParam As Any) As Long
Const WM_USER = &H400
Const EM_UNDO = WM_USER + 23
’在程序中使用的方式如下：( Undo Text1 中的输入)
Private Sub Command1_Click()
Dim UndoResult As Long
UndoResult = SendMessage(Text1.hwnd, EM_UNDO, 0, 0)
’传回值UndoResult = -1 表示Undo 不成功
End Sub
’使用以上的方法，第一次是Undo ，第二次就等于是Redo
如何得到某年每个月的第一天是星期几
Private Sub Command1_Click()
Dim i As Integer, A As Integer, B As Integer, C As String
A = InputBox("请输入年份", "某年每个月的第一天是星期几")
Form1.Cls
For i = 1 To 12
C = A & "-" & i & "-1"
B = Weekday(C)
Select Case B
Case vbSunday
Print A & "年" & i & "月1日是星期日"
Case vbMonday
Print A & "年" & i & "月1日是星期一"
Case vbTuesday
Print A & "年" & i & "月1日是星期二"
Case vbWednesday
Print A & "年" & i & "月1日是星期三"
Case vbThursday
Print A & "年" & i & "月1日是星期四"
Case vbFriday
Print A & "年" & i & "月1日是星期五"
Case vbSaturday
Print A & "年" & i & "月1日是星期六"
End Select
Next i
End Sub
如何隐藏及显示任务栏？
有时候，我们希望在我们的程序执行中，将任务栏隐藏，让桌面变得比较清爽，等到我们的程序执行完毕之后，再将任务栏显示出来，这时就要用到SetWindowPos 这个API 了！
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName
As String, ByVal lpWindowName As String) As Long
Const SWP_HIDEWINDOW = &H80 ’隐藏视窗
Const SWP_SHOWWINDOW = &H40 ’显示视窗
’在程序中若要隐藏任务栏
Private Sub Command1_Click()
Dim Thwnd As Long
Thwnd = FindWindow("Shell_traywnd", "")
Call SetWindowPos(Thwnd, 0, 0, 0, 0, 0, SWP_HIDEWINDOW)
End Sub
’在程序中若要再显示任务栏
Private Sub Command2_Click()
Dim Thwnd As Long
Thwnd = FindWindow("Shell_traywnd", "")
Call SetWindowPos(Thwnd, 0, 0, 0, 0, 0, SWP_SHOWWINDOW)
End Sub
模拟Windows 的资源回收站！
您现在将屏幕上所有的视窗全部缩小，找到资源回收站，按鼠标右键，选择【属性】，便会出现【资源回收站】的属性问话框。
其中有几个选项如下：
1、不要将文件移到资源回收站，删除时立即移除文件。
2、显示删除确认对话框？
根据以上之状况，文件之删除有三种情形：
1、删除文件，出现确认对话框，文件移到资源回收站。
2、删除文件，出现确认对话框，文件不移到资源回收站。
3、删除文件，不出现确认对话框，文件也不移到资源回收站。
模拟程序如下：
’在模组的声明区中加入以下声明：
Public Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long
End Type
Public Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Public Const FO_DELETE = &H3
Public Const FOF_ALLOWUNDO = &H40 ’可以还原
Public Const FOF_NOCONFIR MATION = &H10 ’不出现确认对话框
Public Const FOF_SILENT = &H4
’在程序中之使用方法如下：
’以下之例子会出现确认对话框，文件也会移到资源回收站。
Private Sub Command1_Click()
Dim SHop As SHFILEOPSTRUCT
Dim strFile As String ’要删除的文件(含全路径)
strFile = "c:\test.txt"
With SHop
.wFunc = FO_DELETE
.pFrom = strFile
.fFlags = FOF_ALLOWUNDO
End With
SHFileOperation SHop
End Sub
’若要调整，只要更改fFlags 之值即可，如下：
.fFlags = FOF_SILENT ’删除文件，出现确认对话框，文件不移到资源回收站。
.fFlags = FOF_NOCONFIRMATION ’删除文件，不出现确认对话框，文件也不移到资源回收站。
如何得到文件路径的文件名
Dim sFilePath As String
sFilePath = "C:\Windows\System\sytem.dll"
Dim lGetLen As Long, lNum As Long
Dim sGetFile As String, sTemp As String
lGetLen = Len(sFilePath) ’得到文件路径长度
sTemp = lGetLen
For lNum = 1 To lGetLen
If Left(sGetFile, 1) = "\" Then Exit For
sGetFile = Mid(sFilePath, sTemp, lNum)
sTemp = sTemp - 1
Next lNum
sGetFile = Mid(sGetFile, 2) ’得到文件名
MsgBox sGetFile
如何防止使用者按下CTRL + ALT + DEL
有些时候，我们的应用程序执行时，不希望使用者按下CTRL + ALT + DEL 来异常结束程序或关机，这时候我们可以在启动程序时，将CTRL + ALT + DEL 功能键之功能取消，然后在结束程序之前，再从新恢复CTRL + ALT + DEL 之功能。
在模组声明区中加入以下声明及模组：
Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SCREENSA VERRUNNING = 97
Public Sub Disable_Ctrl_Alt_Del()
’让CTRL+ALT+DEL 失效
Dim AyW As Integer
Dim TurFls As Boolean
AwY = SystemParametersInfo(SPI_SCREENSA VERRUNNING, True, TurFls, 0)
End Sub
Public Sub Enable_Ctrl_Alt_Del()
’让CTRL+ALT+DEL 恢复功能
Dim AwY As Integer
Dim TurFls As Boolean
AwY = SystemParametersInfo(SPI_SCREENSA VERRUNNING, False, TurFls, 0)
End Sub
’实际使用时，在Form 中加入以下程序码：
Private Sub Form_Load()
Disable_Ctrl_Alt_Del
End Sub
Private Sub Form_Unload(Cancel As Integer)
Enable_Ctrl_Alt_Del
End Sub
如何取得文件大小？
VB6 提供了一个新的物件模型，叫做FSO (File System Object) 物件模型，运用它，我们可以很方便的处理磁盘、资料夹和文件的一些动作。
FSO 物件模型含有好几个物件，其中有一个File 物件是用来求得文件的相关资讯，在目前这个主题，我们就可以使用File 物件！它有一个属性是Size，对文件来说就是指文件的大小(单位为位元组)。(注一)
虽然使用File 物件的Size 属性就可以求得文件的大小，但是它有以下二个缺点：
1、只能用于VB6 以后的版本。
2、它不是VB6 内定的功能，必须另外引用Scrrun.dll (Microsoft Scripting Runtime) 才可以！
以下的二个方法就可以使用在所有的VB 版本中(含VB6)，而且是VB 内定的功能：
1、FileLen 函数：返回一个Long，代表一个文件的长度，单位是位元组。
语法：FileLen(pathname) ’ pathname 是全路径之文件名称
适用：取得一个尚未开启的文件的长度大小(注二)
2、LOF 函数：返回一个Long ，单位为位元组，用来代表由Open 陈述式所开启的文件之大小。
语法：LOF(filenumber) ’ filenumber 是一个文件代码
适用：取得一个已开启的文件的长度大小
注一：File 物件的Size 属性除了可以求得一个文件的大小，也可以用来取得整个目录的所有文件大小！
注二：使用FileLen 函数时，如果所指定的文件正在开启中，则所返回的值是这个文件在开启前的大小。
如何移除或更改桌面背景的底色图案(Wallpaper)？
SystemParametersInfo 这个API 可以设定许多Windows 系统的功能参数，而其中一个参数就是桌面底图！通常一般的使用者会透过控制面板中的【显示器】来设定桌面底图。
在底下的范例中，我们使用SPI_SETDESKWALLPAPER 这个参数及图片文件名称来设定新的桌面底图，同时使用SPIF_SENDWININICHANGE 来通知各个视窗这个改变。
’在表单的声明区中加入以下声明及常数：
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As String, ByVal fuWinIni As Long) As Long
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_UPDATEINIFILE = &H1
Const SPIF_SENDWININICHANGE = &H2
’在表单上加入一个CommandButton (Command1) 来移除桌面底图，程序码如下：
Private Sub Command1_Click()
Dim X As Long
X = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, "(None)", SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)
MsgBox "桌面底图(Wallpaper) 已经被移除"
End Sub
’在表单上加入另一个CommandButton (Command2) 来更改桌面底图，程序码如下：
Private Sub Command2_Click()
Dim FileName As String
Dim X As Long
FileName = "c:\windows\test.bmp"
X = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, FileName, SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)
MsgBox "桌面底图(Wallpaper) 已经被更改"
End Sub
一个快速注册DLL 及OCX 的方法
有时候我们在VB 中要引用某一个DLL 或OCX 时，会出现文件未注册的讯息，这
时，我们可以使用人工注册的方法，也就是直接在命令列中使用regsvr32.exe 来做，做法如下：
文件注册：C:\Windows\System\Regsvr32.exe C:\Windows\System\Test.ocx
取消注册：C:\Windows\System\Regsvr32.exe /u C:\Windows\System\Test.ocx
这些动作我们也可以直接写到程序中，使用Shell 来执行，但是我现在要说的，都不是上面提到的方法！
注意看罗！方法如下：
1、在资源管理器中找到C:\Windows\System\Regsvr32.exe 并【复制】( 按鼠标右键选复制)
2、将目录移到C:\Windows\SendTo 后，执行【贴上快捷方式】( 按鼠标右键选贴上快捷方式)
3、将快捷方式名称改成【REGISTER】
4、OK
现在，如果您想替某一个文件做注册动作，例如：C:\Windows\System\Test.ocx，您只要打开资源管理器，找到C:\Windows\System\Test.ocx，按鼠标右键选【传送到】【REGISTER】即可完成注册动作了！
注：有一个地方要注意的是，Regsvr32.exe 只能注册32 位的文件！如果要用它来注册16 位的文件，会有错误讯息产生。
如何用TextBox打开和保存文件
作为轻量级的控件，TextBox控件使用率很高，但相关的资料极少谈及如何用TextBox 控件打开和保存文件，大都采用回避的态度，对VB初学者带来很多不便。笔者近日为友人做一个英文朗读软件，按友人的要求，软件要能象MS的记事本那样能打开和保存文档。其实实现方法并不复杂，现将心得写出来，希望对大家有帮助。如果您有更好的方法，请来信：handanfang@https://www.wendangku.net/doc/af18287928.html,。
’新建标准EXE，加入一个TextBox控件，一个公共对话框，两个菜单。
’打开
Private Sub mnuOpen_Click()
CommonDialog1.Filter = "文档文件(*.txt)|*.txt|所有文件(*.*)|*.*"
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #1
Text1.Text = StrConv(InputB$(LOF(1), 1), vbUnicode)
Close #1
End Sub
’保存
Private Sub mnuSave_Click()
On Error Resume Next
CommonDialog1.Filter ="文档文件(*.txt)|*.txt|所有文件(*.*)|*.*"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Print #1, Text1.Text
Close 1
End Sub
TextBox只支持打开64K以下的文件，建议最好设置出错处理。以上程序在PWin98、VB6.0下调试通过。
如何判断目前文件资源管理器中，文件名称之扩展文件名是显示或隐藏？
由于我在集团性的资讯处工作，所负责的公司系统有的是属于外点，例如润泰建设有个单位是行销业务处，他们的工作是卖公司盖的房子，所以他们的业务人员平常都是待在各工地的接待中心，我替他们开发的销售系统在工地的部份是属于单机作业的，使用Access 资料库，每一个星期资料回传总公司一次。
业务人员由于流动性大，不太了解系统，有时候，系统出了问题，业务人员又搞不清楚状况，于是我会要求他们将资料库sale.mdb 回传公司，结果，常闹笑话，原来他们回传公司的，常常不是sale.ldb 就是sale.exe，为什么呢？原因很简单，因为他们的文件资源管理器中，设定了将扩展文件名隐藏起来，结果只看到三个不同图示的sale 文件(分别是Sale.mdb、Sale.ldb、Sale.exe)，不太会操作的业务人员根本分不清楚那一个图示的sale 文件才是资料库文件案！
我们在VB 的程序中要如何判断，目前文件资源管理器中的设定是否显示扩展文件名呢？
Private Declare Function GetFileTitle Lib "comdlg32.dll" Alias "GetFileTitleA" (ByVal lpszFile As String, ByVal lpszTitle As String, ByVal cbBuf As Integer) As Integer
Private Function HasExtension(sFileName As String) As Long
Dim sTemp As String
Dim lTemp As Long
sTemp = String(1, 0)
lTemp = GetFileTitle(sFileName, sTemp, Len(sTemp))
If lTemp < 0 Then HasExtension = -1: Exit Function
sTemp = String(lTemp, 0)
信息系统常见问题解决方案
管理信息系统 常见问题解决方案 1.保存时【解析XML数据失败】 2.点运行时提示【格式错误】 3.与【服务器连接失败】 4. .netframework 2.0安装时【版本冲突】问题. 5.登陆不上.提示返回的【数据集为空】 6.点运行时显示【无法启动应用程序,请与应用程序提供商】问题1.解析XML数据失败问题:
如果出现上图提示，大多都是输入数字的时候用的是全角。 解决方法：使输入法在半角状态重新输入即可。 全角与半角切换方法如图。 https://www.wendangku.net/doc/af18287928.html, framework 问题。 这个是系统自动将.net framework 2.0 自动升级到3.0或者3.5的状态。 解决方法：进入控制面板， 先卸载.net framework 3.5，从高版本到低版本卸载。卸载完后重新装下.net framework 2.0就可以了。关闭电脑的自动更新功能.(我的电脑-属性—自动更新-关闭) 3.网络问题
主要是网络原因，请检查网络情况.建议使用电信网络. 4…netframework版本问题 这个问题的原因是系统内安装了.netframework其它或者更高的版本. 解决:在控制面板—添加或删除程序里找到如图 把.netframework从下往上全部卸载,重新安装2.0版本 5.防火墙问题. 登陆时候登陆不上.见截图 网络情况差的时候也会出现这个问题. 但是网络情况良好,ping 服务器地址正常.
原因是windows防火墙阻止了登陆.关闭windows防火墙即可. 6.无法启动应用程序 点运行时出现错误如截图: 解决办法.: 出现这个问题的原因有可能是windows防火墙或者360防火墙屏蔽了地址.如果将所有防火墙和杀毒软件关闭以后仍然出现这个问题- 打开C盘,在工具,文件夹选项里,选中显示所有文件和文件夹, 打开C:\Documents and Settings\Administrator\Local Settings,下的apps文件夹( 红颜色的表示当前电脑登陆用户名) ,将apps文件夹删除. 然后在系统网页里点运行,重新下载程序.
施工中常见问题及解决方案
1、存在问题：外墙铺贴外墙砖，阴阳角的嵌缝剂吸水导致窗框周围渗水 解决措施：外墙砖改为涂刷质感漆，在上窗框处预留滴水槽 2、存在问题：现浇混凝土板内预埋PVC电管时，混凝土板经常沿管线出现裂缝。解决措施：钢筋混凝土板中预埋PVC等非金属管时，沿管线贴板底（板底主筋外侧）放置钢丝网片，后期内墙、棚顶等满铺纤维网格布，刮腻子抹平。 3、存在问题：首层隔墙自身发生沉降，墙身出现沉降裂缝。 解决措施：首层隔墙下应设钢筋砼基础梁或基础，不得直接将隔墙放置在建筑地面上，不得采用将原建筑地面中的砼垫层加厚(元宝基础)作为隔墙基础的做法。 4、存在问题：凸出屋面的管道、井、烟道周边渗漏。 解决措施：凸出屋面的管道、井、烟道周边应同屋面结构一起整浇一道钢筋混凝土防水反梁，屋面标高定于最高完成面以上250mm。 5、存在问题：门窗耐候胶打胶不美观 解决措施：门窗预留洞口尺寸跟现场测量尺寸存在误差，造成窗框与墙垛的间隙不均匀，打胶不美观。建议在抹灰过程中安装窗户副框，副框对门窗起到一个定尺、定位的作用。弥补门窗型材与墙体间的缝隙,利于防水;增强门窗水平与垂直方向的平整度。有利于门窗的安装,使其操作性更好。 6、存在问题：室内地面出现裂纹 解决措施：出现裂纹的原因是施工中细石混凝土的水灰比过大，混凝土的坍落度过大，分格条过少。在处理抹光层时加铺一道网格布，网格布分割随同分格条位置一同断开。 7、存在问题：内墙抹灰出现部分空鼓 解决措施：空鼓原因，内墙砂浆强度较低，抹灰前基层清理不干净,不同材料的墙面连接未设置钢丝网;墙面浇水不透，砂浆未搅拌均匀。气温过高时,砂浆失水过快;抹灰后未适当浇水养护。解决办法，抹灰前应清净基层，基层墙面应提前浇水、要浇透浇匀，当基层墙体平整和垂直偏差较大时，不可一次成活，应分层抹灰、应待前一层抹灰层凝结后方可涂抹后一层的厚度不超过15mm。 9、存在问题：吊顶顶棚冬季供暖后出现凝结水，造成吊顶发霉 原因：冬季供暖后，管道井内沙层温度升高，水蒸气上升遇到温度较低的现浇板，形成凝结水，凝结水聚集造成吊顶发霉。解决措施：管道井底部做防水层截断水蒸气上升渠道。 10、存在问题：楼顶太阳能固定没有底座，现阶段是简单用钢丝绳捆绑在管道井上固定 解决措施：建议后期结构施工中，现浇顶层楼板时一起浇筑太阳能底座。 11、存在问题：阳台落水管末端直接通入预留不锈钢水槽，业主装修后，楼上的垃圾容易堵塞不锈钢水槽，不易清扫。 解决措施：建议后在阳台上落水管末端预留水簸萁，益于后期的清扫检查。12、存在问题：卫生间PVC管道周围出现渗水现象 原因，出现渗漏的卫生间PVC管道，周围TS防水卷材是冬季低于5℃的环境下施工的，未及时浇筑防水保护层，防水卷材热胀冷缩，胶粘剂开裂，造成PVC
常见问题及解决方法
重庆电子招投标常见问题 目录 一、常见问题说明......................................................................................................... ３ 二、投标人注意事项6? 1、投标函 (6) 2、导入wｏｒｄ目录乱得问题6? 3、资格标制作?７ 4、技术标 (7) 5、填报“清单数据"中分部分项清单综合单价与综合合价 (7) 5、填报措施项目费9? 6、填报主要材料........................................................................................................... ９ 三、招标人注意事项 (10) １、填写项目基本信息10? 2、模版得应用............................................................................................................. 1０ 3、清单数据 (10) 4、添加补遗、答疑或者最高限价文件..................................................................... １2 五、标盾使用说明12? 六、开标............................................................................................................................... 1３一、常见问题说明 《金润电子标书生成器》软件需安装在WiｎｄｏwｓXｐ系统上,暂不支持Ｖista与Wiｎ7系统,安装时不能插入任何加密锁,同时关闭所有杀毒软件与防火墙 1、安装了“重庆电子标书生成器(重庆)”,导入标书一闪而过,却没有导入任何文件？ 答:金润电子标书生成器没有正确安装,若安装正常可在“打印机与传真"瞧到“金润电子标书生成器"得虚拟打印机,如下图:
Windows7常见问题解决方案
Windows7常见问题解决方案 问题1：我的笔记本电脑有无线上网的功能，为什么我上不了网？ 现在的笔记本电脑大都可以无线上网，但买回来后却上不了网，访问什么网页都无法找到该页。想要用无线上网，要做的准备工作很多： （1）部分笔记本电脑会在机身两旁设置独立的无线功能开关，将开关调至“on”的状态，才能打开笔记本电脑的无线功能；如果没有独立的无线功能开关，可以通过两种方法：1. 摁住“Win”+“X”键，即可打开Windows移动中心找到“无线网络”，摁下“打开无线”就完成了；2.笔记本电脑都有“Fn”键，摁住“Fn”+“F2”（有些电脑不同，如LenovoTinkpad，只需找到无线标识，然后摁“Fn”+无线标识所在的键），启用之后，大多会在屏幕上显示无线功能以开启。Ok，现在你已经完成了笔记本电脑上的准备工作，接下来要搜索网络。 （2）在此之前请先确定路由器和线的连接没有问题（如果在公共场所即可跳过）。之后搜索附近可供连接的无线点，有些须要密码，有些咖啡厅、连锁快餐店、火车站、机场等地有设置可连接上网的无线点。如果你在特殊的地点，如公司，要连接请询问公司网络管理员即可。问题2：无线网络应该怎么连接？ 请先确认问题1中上网前先准备的工作，之后请看以下步骤。 【1】单击通知区域内的网络图标。 【2】单击要连接的无线点（如出现“通过此网络发送的信息可能对其他人可见”，即说明该无线点未加密，这是不安全的网络），在右上角可以看信号强度，若连接信号强度强的网速就快，反之，网速越慢。 【3】单击“连接”按钮。 页脚内容1
【4】这时会出现三个选项，分别是：家庭网络、工作网络、公用网络。如果是用户连接到家中或公司的无线点，有时需要与其他计算机共享文件，因此单击“家庭网络”。如 果连接到公用网络，请单击公用网络，可以不与其他计算机共享文件。 【5】确认操作完毕后请单击“关闭”按钮。 【6】接着把鼠标指针移动至通知区域的无线网络图标处，稍微停留，就会出现一个白色的框，若显示“Internet访问”就可以上网了。 问题3：有“可以使用”的无线点，连接上了却无法上网，还出现了一个黄色的感叹号？ 现象：笔记本电脑显示“未连接-连接可用”，连接后虽显示连接，还出现了“未识别的网络-无网络访问”。 在此之前应先明白一个真理：无线上网的连接稳定性比不上传统的有线宽带，易受干扰，请参考以下说明，排除故障。 （1）先单击网络图标，把鼠标指针移动至已连接的无线点上，停留1秒左右，会显示出一白色框，查看其安全类型，若显示安全类型为“WEP”，则说明这个无线点有密码， 无法随意连接，一般的密码是连接不上的。 （2）由于无线网络属于开放式网络连接，为避免陌生人随意连接，许多非公用无线上网的无线点会设置各种安全验证，其中就有一选项是“指定的电脑才能连接”功能，所 以用户无法直接连接至这个无线点。 （3）虽然检测到该无线点，但由于信号过弱，就需要选择信号强的无线点进行连接，如果搜索到的无线点信号都不是很好，请到空旷的地点再试试。 建议：【1】请把无线路由器放在距离电脑较近的地点，且该地点要空旷，无较厚的遮挡物。 页脚内容2
项目管理常见问题解决办法
当前项目管理中的问题非常复杂，问题的多样性可以用五彩缤纷来形容，可能是不一而足的。我们且对一些有针对性的具体问题及其建议的解决方案尝试汇总如下： 1、问题一：如何修订不合理的项目目标 问题描述：很多项目在签约的阶段就定义了不合理的目标，这往往是由于销售人员的过度承诺或给客户主动建立或被动接受过高的期望值。 建议的解决方案：要使项目成功实施，就必须在合同约定目标基础上对项目目标进行再次定义，项目经理需要运用必要的办法在项目管理生命周期内不断去寻求客户或用户可接受的最小或最优的目标边界。当然，项目经理一上任就想动项目或合同的边界，显然会容易引起客户的反感。比较好的策略是先在项目实施过程中做出必要的业绩，在与此同时和客户之间建立彼此的基本信任。在充分了解客户所在企业的核心需求后，适时拿出有理有据的方案一点一点地说服客户调整项目目标边界。 2、问题二：如何处理用户强烈坚持需要的需求 问题描述：用户有时很强烈表示需要一个功能，态度很坚决，应该如何应对 建议的解决方案：从项目所要实现的业务全局出发，考虑用户这个需求到底要解决的是什么问题，然后再和用户探讨真正解决问题的办法，这样用户不但可能收回自己的想法，还会建立对你分析能力的信任。这就是所谓的比用户多想一步，并站在更高的角度去解决当前存在的问题。除此之外，如果用户提出的需求非常到位，确实指出项目所交付的产品的严重不足，项目经理要高度重视，及时调用公司资源予以解决，切记关键性需求绝对不可以绕过或采取临时解决方案。针对用户潜在的或尚未发现的需求，需要提前拟定预案，而不是等这些潜在需求发生后再考虑客户化开发解决，这样就很有可能使项目产生不必要的延期和徒增用户对项目延期所产生的不满情绪。 3、问题三：如何处理来自用户的需求变更 问题描述：用户的需求往往随着项目的深入而有所变化，项目验收标准的不断更改，导致项目验收延期或成本超支等诸多不可控的情况发生。 建议的解决方案：在项目一开始就需要定义变更流程，一般是要求用户内部意见一致后再统一以正式项目文件的方式提交给项目经理做评估分析，项目经理综合考虑此需求的变更对实施成本和项目进度可能造成的影响。必要时寻求公司高层或变更控制委员会(CCB)反馈
ACCUMARK常见操作问题与解决方法
ACCUMARK 常见问题与解决方法
目录 一资源管理器 1-1ACCUMARK资源管理器打不开，但是其他的模块都能打开。（P2） 1-2ACCUMARK资源管理器里的储存区出错，不能打开和保存排版图或样片。（P2） 1-3 ACCUMARK资源管理器中储存区被上锁，不能打开。（P3） 1-4 ACCUMARK资源管理器中的工具栏无法显示出来。（P3） 二读图板 2-1 读图板的图标丢失（P4） 2-2 读图完成后，读图板文件夹中没有样片。（P4） 2-3 在资源管理器中的读图板中有一些资料无法删除，也无法核对。（P5） 2-4读图板的图标丢失（P6） 2-5读图途中出现游标器没法响应或读图完成后，读图板文件夹中没有样片（P6） 三绘图 3-1绘制排版图或者样片时，提交错误。绘图机不能绘图，不能连接。（P7） 3-2在打开INFINITY型号绘图机时，在INFINITY绘图机屏幕上出现以下错误：“013 FAILED ATTEMPT TO CLOSE ESTCP LOOK。”（P8） 3-3如何设置网络绘图机。（P8） 3-4发生绘图机列序中的工作无法删除。（P10） 四资料的转换 4-1如何打开后缀名为TMP的文件。（GERBER生成的ZIP文件解压后的文件后缀名是TMP格式）（P11） 4-2如何打开AAMA格式的DXF文件。（P13） 4-3如何打开AUTOCAD格式的DXF文件。（P14） 4-4如何打开TIIP格式的DXF文件（P15） 4-5如何打开HPGL文件。（P15） 4-6如何绘制HPGL文件。（P16） 4-7在转换力克软件导出的DXF文件时，出现放缩规则大于9999的错误提示。（P17）4-8如何打开后缀名为MDL的文件，（MDL文件是力克CAD的款式文件）（P18） 4-9如何将排版图导出成HPGL绘图文件。（P19） 4-10经样片转换向导转换出来的样片大小不对（P21） 4-11如何打开力克的PLX文件（P22） 五排版 5-1排版系统中无法显示排版图资料栏（P24） 六样片 6-1样片设计中图象单的字体大小设置（P26）
软件开发项目管理中的常见问题和解决方案(精)
软件项目管理常见问题及解决方案资料来源:互联网整理人:class4117 软件行业是一个极具挑战性和创造性的行业, 软件开发是一项复杂的系统工程, 牵涉到各方面的因素, 在实际工作中, 经常会出现各种各样的问题, 甚至面临失败。如何总结、分析失败的原因,得出有益的教训,对一个公司来说,是在今后的项目中取得成功的关键。 1 .项目管理在软件开发中的应用的成因 目前我国大部分软件公司,无论是产品型公司还是项目型公司,都没有形成完全适合自己公司特点的软件开发管理模式, 虽然有些公司根据软件工程理论建立了一些软件开发管理规范,但并没有从根本上解决软件开发的质量控制问题。这样导致软件产品质量不稳定, 软件后期的维护、升级出现麻烦, 同时最终也会损害用户的利益。 2. 软件项目管理常见问题及解决方案 (1缺乏项目管理系统培训 在软件企业中, 以前几乎没有专门招收项目管理专业的人员来担任项目经理, 被任命的项目经理主要是因为他们能够在技术上独当一面, 而管理方面特别是项目管理方面的知识比较缺乏。 解决方案:项目经理接受系统的项目管理知识培训是非常必要的, 有了专业领 域的知识与实践, 再加上项目管理知识与实践和一般管理的知识和经验的有机结合,必能大大提高项目经理的项目管理水平。 (2项目计划意识问题 项目经理对总体计划、阶段计划的作用认识不足, 因此制定总体计划时比较随意, 不少事情没有仔细考虑; 阶段计划因工作忙等理由经常拖延, 造成计划与控制管理脱节,无法进行有效的进度控制管理。
解决方案:计划的制定需要在一定条件的限制和假设之下采用渐近明细的方式进行不断完善。提高项目经理的计划意识, 采用项目计划制定相关知识、技术、 工具,加强对开发计划、阶段计划的有效性进行事前事后的评估。 (3管理意识问题 部分项目经理不能从总体上把握整个项目, 而是埋头于具体的技术工作, 造成 项目组成员之间忙的忙、闲的闲,计划不周、任务不均、资源浪费。有些项目经理没有很好的管理方法,不好安排的工作只好自己做,使项目任务无法有效、合理地分配给相关成员,以达到“负载均衡”。 解决方案:加强项目管理方面的培训,并通过对考核指标的合理设定和宣传引导项目经理更好地做好项目管理工作。技术骨干在担任项目经理之前, 最好能经过系统的项目管理知识,特别是其中的人力资源管理、沟通管理的学习, 并且在实际工作中不断提高自己的管理素质, 丰富项目管理经验, 提高项目管理意识。 (4沟通意识问题 在项目中一些重要信息没有进行充分和有效的沟通。在制定计划、意见反馈、情况通报、技术问题或成果等方面与相关人员的沟通不足, 造成各做各事、 重复 劳动,甚至造成不必要的损失 ; 有些人没有每天定时收邮件的习惯,以至于无法 及时接收最新的信息。 解决方案:制定有效的沟通制度和沟通机制, 提高沟通意识 ; 采取多种沟通方式, 提高沟通的有效性。通过制度规定对由于未及时收取邮件而造成损失的责任归属 ; 对于特别重要的内容要采用多种方式进行有效沟通以确保传达到位, 例如:除发送 邮件外还要电话提醒、回执等, 重要的内容还要通过举行各种会议进行传达。 (5风险管理意识问题
计算机网络常见故障及解决方案
一、计算机网络常见故障及解决方案 1 无法连接上网的故障 解决方案：检查调制解调器的驱动是否正常。检查调制解调器是否处于可以使用状态：双击“控制面板→系统→设备管理”，在列表中选择调制解调器并单击“属性”，确认是否选中“设备已存在，请使用”选项。检查端口的正确性：双击“控制面板→调制解调器”，单击选择调制解调器，然后单击“属性”，在“通用”选项卡上，检验列出的端口是否正确。如果不正确。请选择正确的端口，然后单击“确定”按钮。确认串口的I/O地址和IRQ设置是否正确：双击“控制面板→系统→设备管理”，再单击“端口”，选取一个端口，然后单击“属性”。单击“资源”选项卡显示该端口的当前资源设置，请参阅调制解调器的手册以找到正确的设置，在“资源”对话框中。检查“冲突设备列表”以查看调制解调器使用的资源是否与其它设备发生冲突，如果调制解调器与其它设备发生冲突，请单击“更改设置”，然后单击未产生资源冲突的配置。检验端口设置：双击“控制面板→调制解调器”，单击选择调制解调器，然后单击“属性”，在出现的菜单中选择“连接”选项卡以便检查当前端口设置，如波特率、数据位、停止位和校验等。 2 无法浏览网络 解决方案：第一是因为在Windows启动后，要求输入Microsoft网络用户登录口令时，点了“取消”按钮所造成的，如果是要登录NT服务器。必须以合法的用户登录，并且输入正确口令。第二种是与其它的硬件产生冲突。打开“控制面板→系统→设备管理”。查看硬件的前面是否有黄色的问号、感叹号或者红色的问号。如果有，必须手工更改这些设备的中断和 I/O地址设置。第三是防火墙导致网络不通。在局域网中为了保障安全，安装了一些防火墙。这样很容易造成一些“假”故障，例如Ping不通但是却可以访问对方的计算机，不能够上网却可以使用QQ等。判断是否是防火墙导致的故障很简单，你只需要将防火墙暂时关闭。然后再检查故障是否存在。例如用户初次使用IE访问某个网站时，防火墙会询问是否允许该程序访问网络，一些用户因为不小心点了不允许这样以后都会延用这样的设置，自然导致网络不通了。比较彻底的解决办法是在防火墙中去除这个限制。 3 IE默认的搜索引擎被篡改 在IE工具栏中有一个搜索引擎的工具按钮，点击之可以进行网络搜索。IE默认使用微软的搜索引擎。如果IE的搜索引擎被恶意网站篡改，只要你点击那个“搜索”按钮，就会链接到恶意网站。 解决方案：单击“开始/运行”，输入“Regedit”打开注册表，定位到 HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Search分支，找到“SearehAssistant”键值名，在右面窗口点击“修改”，将其值改为某个搜索引擎的网址，然后再找到“CustomizeSeareh”键值名，将其键值改为某个搜索引擎的网址。 4 上网速度慢 解决方案：
常见问题及解决方法
重庆电子招投标常见问题
目录 一、常见问题说明 (3) 二、投标人注意事项 (6) 1、投标函 (6) 2、导入word目录乱的问题 (6) 3、资格标制作 (7) 4、技术标 (7) 5、填报“清单数据”中分部分项清单综合单价与综合合价 (7) 5、填报措施项目费 (9) 6、填报主要材料 (9) 三、招标人注意事项 (10) 1、填写项目基本信息 (10) 2、模版的应用 (10) 3、清单数据 (10) 4、添加补遗、答疑或者最高限价文件 (12) 五、标盾使用说明 (12) 六、开标 (13)
一、常见问题说明 《金润电子标书生成器》软件需安装在Windows Xp系统上，暂不支持Vista和Win7系统，安装时不能插入任何加密锁，同时关闭所有杀毒软件和防火墙 1、安装了“重庆电子标书生成器（重庆）”，导入标书一闪而过，却没有导入任何文件？ 答：金润电子标书生成器没有正确安装，若安装正常可在“打印机和传真”看到“金润电子标书生成器”的虚拟打印机，如下图： 解决方法：A：运行以下命令安装打印机不包含引号 “C:\WINDOWS\system32\BJPrinter\PrinterSet.exe”，点击“安装打印机”，如（图一）。此后如弹出提示框都选择继续、信任、通过等按钮，如（图二）：倘若被阻止则程序安装不完整，电子标书生成器软件无法正常使用。 图一图二 或者 B：卸载金润电子标书生成器并且重新安装。 2、安装了“重庆电子标书生成器（重庆）”，却无法双击打开或者报错？ 答：金润软件相关程序可能被防火墙或者杀毒软件默认阻止了。 解决方法：查看杀毒防护软件，在阻止列表将其设为信任，以360安全卫士为例
电脑常见问题即解决方案
?浏览：10268 ?| ?更新：2014-03-01 21:21 ?| ?标签：计算机 计算机已经变成我们生活中不可或缺的工具，在日常使用中，难免会出现很多问题而没有办法解决。在这里根据平时积累的一些经验，加上在网上搜索的一些资料，在这里晒出来，希望能给大家的学习和工作带来一些帮助。 我们日常使用计算机中出现的问题一搬可以分为硬件问题和软件问题两大类。我们在处理计算机问题的时候，一搬遵守以上原则：首先怀疑软件问题，再怀疑硬件问题。 桌面常见问题 1. 1 一、当把窗口最大化后，任务栏被覆盖，不是自动隐藏，怎么回事？ 最佳答案 1.在任务栏上右击,在弹出的菜单中单击“属性”, 2.然后在弹出的"任务栏和开始菜单属性"对话框中选择下面两个选项: "锁定任务栏"和"将任务栏保持在其它窗口的前端"
二、IE窗口的大小在哪里设置？ 最佳答案： 先把所有的IE窗口关了;只打开一个IE窗口;最大化这个窗口;关了它;O K，以后的默认都是最大化的了也可以用鼠标直接将IE窗口拖动为最大或最小） 三、桌面不显示图标，但有开始任务栏？ 最佳答案： 1、右击桌面---->排列图标---->显示桌面图标把它选上！ 2、右击桌面---->属性---->桌面（标签）---->自定义桌面--->把需要的显示项目前打勾，应用确定！ 四、桌面IE图标不见了（桌面上自定义桌面没有IE选项） 最佳答案： 右键点击我的电脑->资源管理器->在窗口左侧选择“桌面”->把这里的I E图标拖到桌面上即可。 五、任务栏的快速启动图标不见了？ 最佳答案： 右键任务栏---工具栏---快速启动---打勾. 六、显示桌面的快捷键丢失了，怎么找回？ 最佳答案 打开“记事本”： 把下面内容复制上去：
常见问题及解决方法
电子招投标常见问题
目录 一、常见问题说明 (3) 二、投标人注意事项 (6) 1、投标函 (6) 2、导入word目录乱的问题 (6) 3、资格标制作 (7) 4、技术标 (7) 5、填报“清单数据”中分部分项清单综合单价与综合合价 (7) 5、填报措施项目费 (9) 6、填报主要材料 (9) 三、招标人注意事项 (10) 1、填写项目基本信息 (10) 2、模版的应用 (10) 3、清单数据 (10) 4、添加补遗、答疑或者最高限价文件 (12) 五、标盾使用说明 (12) 六、开标 (13)
一、常见问题说明 《金润电子标书生成器》软件需安装在Windows Xp系统上，暂不支持Vista和Win7系统，安装时不能插入任何加密锁，同时关闭所有杀毒软件和防火墙 1、安装了“电子标书生成器（）”，导入标书一闪而过，却没有导入任何文件？ 答：金润电子标书生成器没有正确安装，若安装正常可在“打印机和传真”看到“金润电子标书生成器”的虚拟打印机，如下图： 解决方法：A：运行以下命令安装打印机不包含引号 “C:\WINDOWS\system32\BJPrinter\PrinterSet.exe”，点击“安装打印机”，如（图一）。此后如弹出提示框都选择继续、信任、通过等按钮，如（图二）：倘若被阻止则程序安装不完整，电子标书生成器软件无常使用。 图一图二 或者 B：卸载金润电子标书生成器并且重新安装。 2、安装了“电子标书生成器（）”，却无法双击打开或者报错？ 答：金润软件相关程序可能被防火墙或者杀毒软件默认阻止了。 解决方法：查看杀毒防护软件，在阻止列表将其设为信任，以360安全卫士为例
运维常见问题详细解决方案
运维工作及常见解决方案
1.概述 1.1编写目的 编写本解决方案的目的是对运维人员在遇到问题的时候提供一个可参考的依据。运维人员以此解决方案作为今后在运维工作中遇到相同问题的一个指南和依据，指导运维人员如何去解决类似问题。也为新来运维人员熟悉运维工作。本解决方案主要从问题类型、问题描述和解决方案等方面进行说明。 1.2适用范围 适用于运维人员、新来运维人员及相关人员。 2.运维工作流程 ?客户打找运维服务，接到电话，先判断是由运维做还是的 人做； ?运维分机号为1，，先记录房间号，报修时间，服务开始时 间，故障现象及记录接线人。 ?负责人先想解决方法，告知运维人员大体方向，运维人员 根据了解的情况想解决方案，在去见客户的时候知道如何 操作； ?负责人给运维人员派工单，运维人员去执行； ?执行完之后跟负责人交待此次工作结果；
?回复，双方接收 ?每周的运维工作数据及运维工作报告的电子档须在下周一 十点前发送到负责人邮箱中。 3.运维工作内容 1)终端软件维护 2)网络调整 3)电话调整 4)机房巡检 5)服务器操作：应用系统包括安全系统、移动执法系统、备份系 统、机房监控系统；网络设备包括交换机、路由器、防火墙、 流量控制系统。 6)机房清洁 7)空调维护 8)其他 4.常见问题解决方案 4.1电脑装应用软件的步骤 新台式机和笔记本： ●内网：装内外必要软件外网：按客户需求装 ●杀毒软件：内网装趋势杀毒软件外网装安全防护软件
●360安全卫士，修复系统漏洞，点击修复，在安装路径中产生 一个hotfix文件夹，然后把工具中的hotfix文件夹里面所有文 件拷贝到安装路径下的hotfix文件夹； ●装常用的工具：内网 、以及用户要求的软件外网：根据用户的需求来装 旧电脑： ●IP设置，每次都要记录IP，在用完之后把IP设置为原来的IP ●旧机器在装系统之前，我的文档及桌面上的文件要备份，用U 盘拷贝出来再装系统（要特别注意财物室的机器重装系统， 在装系统之前还需要把C盘里面的某些文件给拷贝出来） 注意事项： 1.保证OA系统所以功能都能用 2.不安装盗版软件
房屋建筑工程施工中常见问题与解决方法
房屋建筑工程施工中常见问题与解决方法
房屋建筑工程施工中常见问题与解决方法 一、结构设计容易出现的设计问题 【一】因施工原因造成问题 1、部门、专业间配合类 存在问题1：女儿墙、沉厕管井侧墙、屋面天窗壁等，大多是在钢筋混凝土板上为砌筑的砖或砌块墙体，砌体和混凝土2种不同材料界面处易形成裂缝，造成漏水。解决措施：所有建筑要求做泛水处，均采用现浇混凝土泛水，泛水高度如建筑无特定要求的，按200mm高。 存在问题2：梁与板混凝土强度等级不同，施工不便。解决措施：同时浇筑的梁、板混凝土强度等级应一致。 存在问题3：地下室后浇带要在至少60d后方可浇筑，但地下室外墙的防水及基坑回填工程却需要先行施工，如何处理。 解决措施：地下室外墙后浇带处，在外侧设一通高预制钢筋混凝土板，该板置于地下室外墙防水层内侧，建筑设计需考虑该处的防水做法，结构设计需考虑该板在后浇带尚未浇筑前用于拦挡回填土。 存在问题4：有些墙垛的尺寸太小，不便于砌筑且质量不宜保证。 解决措施：与混凝土墙、柱相连的墙垛尺寸≤120mm×120mm或某一边长小于120mm时，采用现浇混凝土墙垛。
2、现浇混凝土楼板裂缝类 存在问题1：屋面板混凝土强度等级偏高，易产生裂缝而漏水。 解决措施：屋面结构混凝土强度等级尽可能≤C25级。 存在问题2：地下室底板混凝土强度等级偏高，易产生裂缝而漏水。 解决措施：施工周期较长的大体积混凝土(如地下室底板、外墙等)，设计时宜考虑混凝土的后期强度，可采用不少于60d龄期的混凝土强度。 存在问题3：地下室底板及侧墙后浇带新旧混凝土界面处易产生裂缝，经常出现渗漏。 解决措施：后浇带接缝处应做成企口;主筋在后浇带处按断开处理;采用膨胀止水带。 存在问题4：现浇混凝土板内预埋PVC电管时，混凝土板经常沿管线出现裂缝。 解决措施：钢筋混凝土板中预埋PVC等非金属管时，沿管线贴板底(板底主筋外侧)放置300mm宽?1.0×10×10钢丝网片。 存在问题5：现电梯间前室有大量设备管线暗埋在混凝土板内，造成结构隐患，易出现裂缝。 解决措施：预埋管线非常多的板(如高层建筑电梯前室等)，板厚宜按结构设计所需板厚+30mm。 存在问题6：屋面等有防水要求的混凝土板，对裂缝控制要求较严，如何控制裂缝。 解决措施：有防水要求的屋面板结构混凝土内添加抗裂纤维。添加量由招标中心或总承包提供中标产品参数，由设计单位确定。 3、防止首层地坪沉陷类
项目管理常见问题解决办法
项目管理常见问题解决 办法 Company Document number：WTUT-WT88Y-W8BBGB-BWYTT-19998
当前项目管理中的问题非常复杂，问题的多样性可以用五彩缤纷来形容，可能是不一而足的。我们且对一些有针对性的具体问题及其建议的解决方案尝试汇总如下：1、问题一：如何修订不合理的项目目标 问题描述：很多项目在签约的阶段就定义了不合理的目标，这往往是由于销售人员的过度 承诺或给客户主动建立或被动接受过高的期望值。 建议的解决方案：要使项目成功实施，就必须在合同约定目标基础上对项目目标进行再次 定义，项目经理需要运用必要的办法在项目管理生命周期内不断去寻求客户或用户可接受 的最小或最优的目标边界。当然，项目经理一上任就想动项目或合同的边界，显然会容易 引起客户的反感。比较好的策略是先在项目实施过程中做出必要的业绩，在与此同时和客 户之间建立彼此的基本信任。在充分了解客户所在企业的核心需求后，适时拿出有理有据 的方案一点一点地说服客户调整项目目标边界。 2、问题二：如何处理用户强烈坚持需要的需求 问题描述：用户有时很强烈表示需要一个功能，态度很坚决，应该如何应对 建议的解决方案：从项目所要实现的业务全局出发，考虑用户这个需求到底要解决的是什
么问题，然后再和用户探讨真正解决问题的办法，这样用户不但可能收回自己的想法，还 会建立对你分析能力的信任。这就是所谓的比用户多想一步，并站在更高的角度去解决当 前存在的问题。除此之外，如果用户提出的需求非常到位，确实指出项目所交付的产品的 严重不足，项目经理要高度重视，及时调用公司资源予以解决，切记关键性需求绝对不可 以绕过或采取临时解决方案。针对用户潜在的或尚未发现的需求，需要提前拟定预案，而 不是等这些潜在需求发生后再考虑客户化开发解决，这样就很有可能使项目产生不必要的 延期和徒增用户对项目延期所产生的不满情绪。 3、问题三：如何处理来自用户的需求变更 问题描述：用户的需求往往随着项目的深入而有所变化，项目验收标准的不断更改，导致 项目验收延期或成本超支等诸多不可控的情况发生。 建议的解决方案：在项目一开始就需要定义变更流程，一般是要求用户内部意见一致后再 统一以正式项目文件的方式提交给项目经理做评估分析，项目经理综合考虑此需求的变更
常见问题及解决方案41831
常见问题及解决方案 1无法搜索到驱动 1.1现象 电子钥匙驱动安装成功后，第一次插入电子钥匙长时间搜索不到驱动。1.2解决方案 电子钥匙插入的时候，当系统弹出“找到新的硬件向导”对话框时，选择“从列表或指定位置安装（高级）”如下图所示： 点击“下一步”，弹出如下所示对话框，选择“不要搜索。我要自己选择要安装的驱动程序”，并点击“下一步”；
选择“GFA SEAL”，并点击“下一步”，如下图所示： 系统设置硬件驱动后，弹出如下图所示的对话框，选择“完成”即可。
2智能卡服务故障 2.1现象 驱动安装成功，而当插入电子钥匙时，没有“eSEAL被插入”或则“导入证书成功”的提示。 2.2解决方案 1、打开服务列表：打开控制面板->管理工具->服务。 2、确认服务列表中是否已经有智能卡服务(英文名称为”Smart Card”，中文名称为”智能卡”)的存在。 3、判断智能卡服务是否存在 （1）如果智能卡服务不存在，请到第4步； （2）如果智能卡服务存在，确定启动类型为“自动”以及登录身份为” NT AUTHORITY\LocalService”：双击智能卡服务，打开智能卡服务的属性，如果启动类型不是“自动”，设置启动类型为“自动”，如果是XP或则2003的系统，还
需要将登录身份账户名设置为“NT AUTHORITY\LocalService”，密码，确认密码设为空，如下图所示： 设置开机自动启动智能卡服务
设置智能卡服务的登录身份(密码部分请不要输入信息) 并重启计算机。 4、如果智能卡服务不存在, 则需要安装智能卡服务 A、如果系统System32目录下面不存在此三个文件：scarddlg.dll, scardssp.dll, scardsvr.exe，则需要拷贝相应的文件到用户的系统System32目录下。 B、打开控制台：（同时按键盘的Windows键和‘r’键）打开运行对话框，在打开右边的输入框中输入“cmd”，点击确定，即可打开控制台。 C、在控制台中运行”regsvr32 scardssp.dll”，然后运行“scardsvr.exe /install”注册智能卡服务，如果失败请运行” scardsvr.exe /reinstall”。 D、再次确认智能卡服务是否存在，如果存在，请转到第3步（2）。 设置智能卡服务的登录身份提示: 在以上第4步中，设置智能卡服务的登录身份时，如果不记得输入的用户名，可以通过如下步骤输入用户名：
Win7系统常见问题解决方案大全.doc
Win7系统常见问题解决方案大全 以下就是win7系统下常见故障的解决方法： 一、Win7蓝屏故障解决方案 出现此类故障的表现方式多样，有时在Windows启动时出现，有时在Windows下运行一些软件时出现，出现此类故障一般是由于用户操作不当促使Windows系统损坏造成，此类现象具体表现在以安全模式引导时不能正常进入系统，出现蓝屏故障。有时碎片太多也会引发此类故障，有一次笔者在整理碎片后就解决了该故障，如若排除此项可能则有以下几种原因可能引发该故障。 1、内存原因。由于内存原因引发该故障的现象比较常见，出现此类故障一般是由于芯片质量不佳所造成，但有时我们通过修改CMOS设置中的延迟时间CAS(将其由3改为2)可以解决该问题，倘若不行则只有更换内存条。 2、主板原因。由于主板原因引发该故障的概率较内存稍低，一般由于主板原因出现此类故障后，计算机在蓝屏后一般不会死机，而且故障出现频繁，对此唯有更换主板一途。 3、CPU原因，由于CPU原因出现此类故障的现象比较少见，一般常见于cyrix的CPU上，对此我们可以降低CPU频率，看能否解决，如若不行，则只有更换一途。 推荐阅读：蓝屏代码查询器 二、win7保护错误解决方案 出现此类故障的原因一般有以下几点： 1、内存条原因。倘若是内存原因，我们可以改变一下CAS延迟时间看能否解决问题，倘若内存条是工作在非66MHz 外频下，例如75MHz 、83MHz 、100MHz甚至以上的频率，我们可以通过降低外频或者内存频率来试一下，如若不行，只有将其更换了。 2、磁盘出现坏道。倘若是由于磁盘出现坏道引起，我们可以用安全模式引导系统，再用磁盘扫描程序修复一下硬盘错误，看能否解决问题。硬盘出现坏道后，如不及时予以修复，可能会导致坏道逐渐增多或硬盘彻底损坏，因此，我们应尽早予以修复。 3、Windows系统损坏。对此唯有重装系统方可解决。 4、在CMOS设置内开启了防病毒功能。此类故障一般在系统安装时出现，在系统安装好后开启此功能一般不会出现问题。三、win7随机性死机解决方案 死机故障比较常见，但因其涉及面广，是以维修比较麻烦，现在我将逐步予以详解。 1、病毒原因造成电脑频繁死机 由于此类原因造成该故障的现象比较常见，当计算机感染病毒后，主要表现在以下几个方面： ①系统启动时间延长; ②系统启动时自动启动一些不必要的程序;
常见问题及解决方法
常见问题汇总 1、在点开（计算）工作底稿时，提示如下图： 图1 然后点“继续”才能进入。 解决方法： Office2003：打开任意一张excel表格，点击“工具”菜单，点击“选项”—“编辑”—将“请求自动更新链接”勾去掉。 Office2007（office 2010设置类似）：打开任意一张excel表格，点击“”按钮，点击“高级”，然后将常规中的“请求自动更新链接”勾选去除。 2、打开工作底稿时，进不去底稿的现象（其实已经打开，再次双击会提示已经打开）、计算报告时，提示请关闭excel：这个现象有两个可能（a、如“图1”的提示隐藏与显示界面后面；b、excel进程可能卡机,c、excel设置问题） 解决方法：首先查看是否提示隐藏与界面后面，可以同时按住快捷键：“ALT+TAB”键，查询是否有提示框，如果没有，可以同时按下热键：“CTRL+ALT+DEL”，进入进程，将excel.exe进程结束，之后再重新打开工作底稿。如果上述方法不行，那么设置excel： Office2003：点开电脑上任意excel表格，然后点工具——加载宏——HZJZ模版打钩 Office2007：点击左上角圆圈——excel选项——加载项——转到——HZJZ模版打钩。 3、打开工作底稿是提示如下图（或者选择计算的工作表之后，点击开始计算没反应）：
图2 解决方法： Office2003:打开excel，点击“工具”-加载宏-将“HZJZ模板”打钩(如果没有HZJZ模版，请参考13点)。 Office2007（office2010设置类似）:打开excel，点击“”按钮，点击“excel 选项”-“加载项”-“转到”-将HZJZ“模板打钩”。 4、打开或关闭工作底稿时，会跳出提示： 图3 解决方法： （1）、先将开着的office文件全部关闭（word和excel） （2）、打开“我的电脑” XP系统： 点击“工具”菜单——文件夹选项：
初中生常见问题及解决方案
中学生常见学习问题及解决方案 一：课前不预习-知识导学 古人云，凡事预则立，不预则废。预就是提前对事情有所打算，有所计划，做到心中有数，并对事情结果加以预测。同样在学习中也需要提前准备，提前思考，先解决一些自己能解决的问题，疑难杂症留待上课时老师解决，这样减少问题，听课效果会更好。这就是预习。预习是有计划、按计划学习的一种表现，是良好学习习惯的重要组成部分。对于学习自然也是这样的 想要学好一门课 仅凭课堂上有限的45分钟是不够的，更重要的是在课外。如果平时能养成课前预习这一良好习惯，对学习会有很大帮助。 (一)不预习的危害 1.不预习无法掌握一节的重点.难点，导致听课效率不高 首先，学生要知道下节课要学习的内容，了解主要讲的是什么，不预习是无法知道的，所以我们要提前预习课文。通过预习，学生就可以对课堂上的内容有大致的了解，从另外一方面可做到心中有数. 重点、难点突出，旧的知识和新的知识的联系，衔接。 2.不预习会导致学习的盲目性 预习可以使学习目的明确，清晰，学生的思维脉络会处于“高度快速反应”之中，接受、吸收、领会各种知识、技能全面而深刻 其效果不言而喻。加之课堂上对目标多次认知、操练和运用，加深了学生对目标的识记和再现。这样学生在课堂上根据自身的特点和课堂的目标要求有目的地学习、掌握、理解、分析、应用 避免了学习的盲目性，使学习具有目标性、针对性。 3.不预习会导致听课疲劳 由于人的精力是有限的 因此学生在每一节课里不可能自始自终地保持旺盛的精力 注意力和思维 一定会有走神的时候 这是人的生理机能所决定的。如果课前不预习 那么学生在课堂上的学习就带有盲目性 机械地围绕着老师的指挥棒疲惫地运转 ，到了自己需要集中注意力时却已使大脑处于疲惫状态而不能集中注意力，学生的主体作用就很难充分发挥。要想有效地、合理地分配课堂学习的注意力和思维，节省能力，这就要通过预习来完成。 （二）那么如何去预习呢?我们可以从以下几点入手: 1. 要有明确的预习目标。对预习的内容要做到心中有数，要明确预习什么，预习多少 需多长时间 采用什么方式，做到有的放矢。 2. 要有明确的预习内容。对预习的内容要积极理解，认真思考，争取记忆、消化其中的一部分。一些生词、短语、句型，尤其是生词和短语应该力争在上新课以前背下来。至于对话、课文，可以借助词典或对照课文注释，初步理解其大意。 3. 在预习的过程中要善于发现新问题.。然后带着这些问题有目的、有重点地去听课，养
计算机常见故障及处理方法
计算机常见故障及处理方法 (总5页) -CAL-FENGHAI.-(YICAI)-Company One1 -CAL-本页仅作为文档封面，使用请直接删除
计算机在使用了一段时间后，或多或少都会出现一些故障。总结出计算机使用和维护中常遇到的故障及简单的排除方法介绍给大家。也许有人会认为：“既然不是搞计算机专业维修的，当然不可能维修计算机！”这倒不一定。况且如果只是遇到一点小小的故障，就要请专业的维修人员来维修，不免有些“劳民伤财”。只要根据这里的计算机故障处理方法，就可以对简单的故障进行维修处理。 一、电源故障 电源供应器担负着提供计算机电力的重任，只要计算机一开机，电源供应器就不停地工作，因此，电源供应器也是“计算机诊所”中常见的“病号”。据估计，由电源造成的故障约占整机各类部件总故障数的20％～30％。所以，对主机各个部分的故障检测和处理，也必须建立在电源供应正常的基础上。下面将对电源的常见故障做一些讨论。 故障1：主机无电源反应，电源指示灯未亮。而通常，打开计算机电源后，电源供应器开始工作，可听到散热风扇转动的声音，并看到计算机机箱上的电源指示灯亮起。 故障分析：可能是如下原因： 1.主机电源线掉了或没插好； 2.计算机专用分插座开关未切换到ON； 3.接入了太多的磁盘驱动器； 4.主机的电源（Power Supply）烧坏了； 5.计算机遭雷击了。 故障处理步骤： 1.重新插好主机电源线。 2.检查计算机专用分插座开关，并确认已切到ON。 3.关掉计算机电源，打开计算机机箱。 4.将主机板上的所有接口卡和排线全部拔出，只留下P8、P9连接主板，然后打开计算机电源，看看电源供应器是否还能正常工作，或用万用表来测试电源输出的电压是否正常。 5.如果电源供应器工作正常，表明接入了太多台的磁盘驱动器了，电源供应器负荷不了，请考虑换一个更高功率的电源供应器。 6.如果电源供应器不能正常工作或输出正常的电压，表明电源坏了，请考虑更换。 故障2：电源在只向主板、软驱供电时能正常工作，当接上硬盘、光驱或插上内存条后，屏幕变白而不能正常工作。 故障分析：可能是因为电源负载能力差，电源中的高压滤波电容漏电或损坏，稳压二极管发热漏电，整流二极管已经损坏等。