時間を数字が書かれているBMPで表示させたいのですが・・・

ActiveBasicでのプログラミングでわからないこと、困ったことなどがあったら、ここで質問してみましょう(質問を行う場合は、過去ログやWeb上であらかじめ問題を整理するようにしましょう☆)。
返信する
メッセージ
作成者
Mario2
記事: 205
登録日時: 2005年5月31日(火) 13:31
お住まい: 大阪市
連絡する:

時間を数字が書かれているBMPで表示させたいのですが・・・

#1 投稿記事 by Mario2 »

現在音楽プレイヤーを作成しているのですが、その再生時間を取得はでき、普通の文字での表示は可能なのですが、数字の変わりにBMPを使いたいのですが、どうすれば可能になるでしょうか?

1桁目は取得した時間の秒を1桁目だけ取得してBMPに表示させることは可能なのですが、2桁目の表示で悩んでいます。

ちなみに、
画像に書かれている数字→ABで定義しているリソース名
0→Nom0
1→Nom1
2→Nom2
 ・
 ・
 ・
9→Nom9
となっています。
(前できていたような感じがするのですが、そのソースがどこにあるか分からなくなってしまったので・・・)
OverTaker
記事: 231
登録日時: 2005年5月31日(火) 17:14
お住まい: 茨城県

#2 投稿記事 by OverTaker »

2桁だけでしたら10で割れば2桁目が取得できるんじゃないですか?
もし3桁以上あるのならば例えば54321の場合
最初10000で割り5を取得し54321から5*10000を引き4321になったところを1000で割り4を取得し4321から4*1000を引き・・・・・
とやっていけばいいんじゃないでしょうか?
もっといい方法もあると思いますので参考までに。
BingoMan
記事: 36
登録日時: 2005年7月17日(日) 09:36
お住まい: 千葉県松戸市

#3 投稿記事 by BingoMan »

こんな関数はどうでしょうか。

コード: 全て選択

Function GetN(Num As Long,Kurai As Long)As Long
	GetN=Int((Num Mod 10^(Kurai+1))/10^(Kurai))
EndFunction
Num
数字を指定します。
Kurai
Numで指定した値のうち、取得したい位を指定します。
ただし、771の場合、

コード: 全て選択

GetN(771,0)=1
GetN(771,1)=7
GetN(771,2)=7
のように1の位を取得するときにKuraiに0を指定することに注意してください。
Mario2
記事: 205
登録日時: 2005年5月31日(火) 13:31
お住まい: 大阪市
連絡する:

#4 投稿記事 by Mario2 »

OverTakerさん、BingoManさん回答ありがとうございます。
BingoManさんのコードで出来ました。
ありがとうございました。
返信する