VB print source

【文件属性】：
文件名称：VB print source
文件大小：1.1MB
文件格式：ZIP
更新时间：2014-05-01 03:23:38
打印 打印控件，可转化为PDF文件 XX_NN(0) = ss If NormName_No <= 1 Then GoTo ll7 For ii = 1 To NormName_No - 1 If Not EOF(1) Then Input #1, ss XX_NN(ii) = ss Else GoTo ll1 End If Next ii ll7: If Not EOF(1) Then Input #1, ss Else GoTo ll1 End If If ss = "" Then GoTo ll7 XX_UN(0) = ss If NormName_No <= 1 Then GoTo ll8 For ii = 1 To NormName_No - 1 If Not EOF(1) Then Input #1, ss XX_UN(ii) = ss Else GoTo ll1 End If Next ii ll8: If Not EOF(1) Then Input #1, ss Else GoTo ll1 End If If ss = "" Then GoTo ll8 If NormName_No <= 1 Then GoTo ll9 For ii = 1 To NormName_No - 1 If Not EOF(1) Then Input #1, ss Else GoTo ll1 End If Next ii ll9: If Not EOF(1) Then Input #1, ss Else GoTo ll1 End If If ss = "" Then GoTo ll9 kk = 0 ll10: If ss = "[DATA END]" Then GoTo ll11 'If NormName_No >= 1 Then Form15.Text1(kk).Text = ss If NormName_No = 1 Then GoTo ll11 NN_Value(kk, 0) = ss For ii = 1 To NormName_No - 1 If Not EOF(1) Then Input #1, sss(ii) NN_Value(kk, ii) = sss(ii) Else Close #1 GoTo ll11 End If Next ii kk = kk + 1 Input #1, ss GoTo ll10 ll11: NXX = kk

【文件预览】：
setUpPrvPrnOcx.exe