讀入可以用讀寫文件的函數(shù)open

1、讀入可以用讀寫文件的函數(shù)openfile...asbinary。。寫出時(shí)將字段讀出用寫二進(jìn)制文件的方法寫到硬盤的臨時(shí)文件后再顯示具體函數(shù)我記得不太清楚了，很久沒有用了對(duì)應(yīng)該保存為二進(jìn)制文件用open函數(shù)Open語句示例本示例示范Open語句的不同用法來做到文件的輸出與輸入。下列代碼以順序輸入模式打開TESTFILE文件。Open“TESTFILE“FInputAs#1若要以其他方式打開文件，必需先關(guān)閉此文件。Close#1下列代碼以只允

2、許寫操作的二進(jìn)制方式打開文件。Open“TESTFILE“FBinaryAccessWriteAs#1若要以其他方式打開文件，必需先關(guān)閉此文件。Close#1下列代碼以隨機(jī)方式打開文件，文件中含有用戶自定義數(shù)據(jù)類型Recd的記錄。TypeRecd定義用戶自定義數(shù)據(jù)類型。IDAsIntegerNameAsString20EndTypeDimMyRecdAsRecd聲明變量。Open“TESTFILE“FRomAs#1Len=Len(MyR

3、ecd)若要以其他方式打開文件，必需先關(guān)閉此文件。Close#1下列代碼以順序輸出方式打開文件；任何過程都可以讀寫該文件。Open“TESTFILE“FOutputSharedAs#1若要以其他方式打開文件，必需先關(guān)閉此文件。Close#1下列代碼以只允許讀的二進(jìn)制方式打開文件；其他過程不可以讀該文件。Open“TESTFILE“FBinaryAccessReadLockReadAsEndSubPrivateSubcmdExit_Cli

4、ck()EndEndSubPrivateSubcmdLast_Click()OnErrResumeNextrsImage.MoveLastCallShowPicEndSubPrivateSubcmdNext_Click()OnErrResumeNextrsImage.MoveNextCallShowPicEndSubPrivateSubcmdPrev_Click()OnErrResumeNextrsImage.MovePrevious以

5、上是ACCESS的數(shù)據(jù)庫只要把連接字符改成SQ的就可以了一、實(shí)現(xiàn)思路：用戶添加或修改圖片時(shí)控制使用COMMONDIALOG的SHOWOPEN對(duì)話框，然后記錄通用對(duì)話框的FILENAME到變量A，再使用APP.PATH找到到特定目錄下的該圖片文件，改變窗體上放置圖片控件的屬性即可顯示。數(shù)據(jù)庫中只使用一文本型字段記錄下變量A，圖片文件保存在程序目錄下，此法可同時(shí)使用GIF、JPG和BMP等等圖像文件。二、實(shí)現(xiàn)方法：1、在窗體上建立IMAGE