校园chinanet认证失败:VB菜鸟 求助 在拼凑代码时出现的问题

Private Sub cmdScannen_Click()
Dim err As Integer
Dim FehlerMeldung As String
On Error Resume Next
ScannedImage = App.Path & "\TestImage.bmp"
TWAIN_SetHideUI (ShowUI)
TWAIN_OpenDefaultSource
TWAIN_SetCurrentUnits (TWUN_CENTIMETERS)
TWAIN_SetImageLayout 0, 0, 21, 29.7
TWAIN_SetXResolution (Aufl鰏ung)
TWAIN_SetYResolution (Aufl鰏ung)
TWAIN_SetCurrentPixelType (FarbModus)
TWAIN_SetBrightness (HelligZ锋ler)
TWAIN_SetContrast (KontrastZ锋ler)
err = TWAIN_AcquireToFilename(frmMain.hWnd, ScannedImage)
If err = 0 Then
ImgInPicturebox
Else
Select Case err
Case -1
FehlerMeldung = "Benutzer hat abbrechen gedr点kt."
Case -2
FehlerMeldung = "Die Image-Datei konnte nicht ge鰂fnet werden."
Case -3
FehlerMeldung = "Die Image-Datei ung黮tig, oder kann " & _
"in diesem Format nicht geschrieben werden."
End Select
MsgBox FehlerMeldung & Chr(13) & _
"Error-Code: " & err, , "Fehler beim Scannen"
End If
End Sub

谁能解释一下这段代码的具体意思？我还是不太明白
这个不是最主要的，关键是代码里主要描述的是什么内容，我不是很明白~~