VB2008で開発したアプリの不可解な現象
2年前にVB6からの移行が終りアプリとして１００ヶ所位に
配布していますが今回初めて解決できない現象が発生しました。
他の配布先では問題は無く稼動しています。
納入先は遠方なので電話とメールでの対応しかできなくて
お客様のパソコン操作レベルは電話でCopy&Pasteができるレベルです。
functionキーは使えません。
※開発環境 VB2008 .NET FrameWork 3.5.1
お客様のパソコンはWindows7でXP,Vistaからのアップグレードではない
下記の２点のアドバイスよろしくお願いいたします。
[No1]
塗り潰し印刷ができない。
エラーにはなりません。
[No2]
NET FrameWorkのエラーとなります。
詳細なエラーメッセージは不明です。
Text書き出しはやめて他の方法で対処しましたが
なぜエラーになるのか経験のある方宜しくお願いします。
[No1]--------------------------------------------------------------------------
Private Sub PrintDocument1_PrintPage(ByVal sender As Object,
ByVal e As System.Drawing.Printing.PrintPageEventArgs)
Handles PrintDocument1.PrintPage
Dim drawbrushWhiteSmoke As New SolidBrush(Color.WhiteSmoke)
With e.Graphics
.FillRectangle(drawbrushWhiteSmoke, 15 , 80, 180, 6) '塗り潰し
End With
[No2]--------------------------------------------------------------------------
Private Sub XXXXX()
Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding("Shift_JIS")
Dim File_Name As String = フォルダー名 & "Data\Prev.txt"
System.IO.File.WriteAllText(File_Name, Out_MitumoriNo, enc)
お礼
回答ありがとうございます。システムフォルダの内容チェックを 行ってみます。