C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 8 を表示中)
■8438 / )  VB6で、イメージの部分に順番に図を表示していきたいのです。
□投稿者/ kirin 二等兵(3回)-(2006/11/21(Tue) 18:20:52)

分類:[VB6以前] 


分類:[VB6以前] 

VB6で、イメージの部分に順番に図を表示していきたいのです。
それと、リストボックスで選択したものをファイルに書き込みたいのです。


以下のようにやってみたのですが、うまくいかずどうしていいか分かりません。
教えていただけないでしょうか。



Public dirl, angele As String
Dim fname(100) As String
Public cot As Integer

'スタートの処理
Private Sub Command1_Click()
cot = 1
Image1.Picture = LoadPicture(Dir1 + fname(cot)) 'イメージを表示
End Sub

'次へを押したときの処理
Private Sub Command2_Click()
Image2.Picture = LoadPicture(Dir1 + fname(cot)) 'イメージを表示
Open "C:\DATA\OrderData.csv" For Append As #1
Write #2, list1.Text, _
list2.Text, _
list3.Text, _
Close #2
End Sub

Private Sub Image1_Click()
Dir1 = "C:\Documents and Settings\karalab\My Documents\ito\図形\0" '表示イメージを読み込みするファイル
For i = 1 To 100
fname(i) = Str(i) + ".jpg"
Next
End Sub


0
返信 編集キー/


管理者用

- Child Tree -