VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/09/05(Fri) 19:17 |
| 投稿者 | ： Pana |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： 配列の構造体の一部のデーターを渡す |
この掲示板でかなり勉強させて頂いております。
構造体を配列で宣言して時間ごとのデーターを蓄積して、一定時間ごとに平均化したいのです。
ソースは
モジュール内で
Public Type Ch
No1 As Integer
No2 As Integer
No3 As Integer
End Type
Public Type Temp
Kikan As Ch
Zikuuke As Ch
Reikyaku As Ch
End Type
フォームで
Option Explicit
Dim Kikan_Temp As Temp
Dim Kikan_Ave(100) As Temp
Private Function Ave(Data() As Integer) As Integer
Dim Temp As Long
Dim Cont As Integer
For Cont = 0 To 100
Temp = Temp + Data(Cont)
Next Cont
Ave = Temp / 100
End Function
Private Sub Command1_Click()
Label1.Caption = Ave(Kikan_Ave().Kikan.No1) ←このような形で渡したい
End Sub
修節子が不正です。 とエラーでデーターを渡すことが出来ません。
このような渡し方は出来ないのでしょうか？
よろしくお願いします。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）