調べた結果.Captionでなくて.Textぽいです
そして次なる問題を投下してみる
次のプログラムコードを説明に従って完成させなさい
秒 ==> 時間 ・分・秒
Private Sub Command1_Click()
Dim nyu As Long,jikan As integer '入力秒、時間数
Dim fun As Integer,byo As Integer,amari As Integer '分数、秒数、時間で割ったあまり
’入力処理
nyu = _____________________________________ ’Text1から数値を変数nyuへ入力する
jikan = ____________________________________ ’入力秒を3600で割った商という式
amari = ___________________________________ ’入力秒を3600で割ったあまりという式
fun = ______________________________________ ’あまりを60で割った商という式
byo = _____________________________________ ’あまりを60でわったあまりという式
’出力処理
_____________________________________________ ’Label1に時間数を表示
_____________________________________________ ’Label2に分数を表示
_____________________________________________ ’Label3に秒数を表示
End Sub
Private Sub Command2_Click()
'Text1,Label1,Label2,Label3 をブランクにする。
_______________
_______________
_______________
_______________
End Sub
Private Sub Command3_Click()
_____________________________________________ '終了処理
End Sub
長くてごみんなさい_| ̄|○