木曜日, 11月 21, 2024
裏紙を活用したメモ用紙の作り方(その2)
TCDW8228
またまた新しいツール発掘への旅に出ることに・・・
水曜日, 11月 20, 2024
Let's start JavaScript 45
HTMLにてマウスでペイント
火曜日, 11月 19, 2024
Studio Oneでwav、mp3をまとめる
月曜日, 11月 18, 2024
フリーのOnline Sequencerはコンバーターには要注意
Online Sequencerの情報は以下を参照してください。
日曜日, 11月 17, 2024
modo〜blender互換考 01
ペイントデータはUV設定が原則
結果、obj形式またはdae形式で書き出せばなんとかなりそうですね。
土曜日, 11月 16, 2024
Visual Studio Basic_41
元金と利率から元利合計が2倍になるのは何年後?
Public Class Form1
Private Sub Button1_Click(sender As Object,
e As EventArgs) Handles Button1.Click
' 入力値を取得
Dim principal As Double = Convert.ToDouble(TextBox1.Text)
Dim rate As Double = Convert.ToDouble(TextBox2.Text) / 100
' 経過年数と元利合計を計算
Dim years As Integer = 0
Dim amount As Double = principal
While amount <= 2 * principal
amount += amount * rate
years += 1
End While
' 結果を表示
Label5.Text = years.ToString()
Label7.Text = amount.ToString("F2")
End Sub
Private Sub Button2_Click(sender As Object,
e As EventArgs) Handles Button2.Click
TextBox1.ResetText()
TextBox2.ResetText()
Label5.ResetText()
Label7.ResetText()
End Sub
Private Sub Button3_Click(sender As Object,
e As EventArgs) Handles Button3.Click
End
End Sub
End Class