2011-11-10 4 views
0

私はVB 2008に新しく、モル濃度(化学)を計算するアプリケーションを作成しようとしています。ビジュアルベーシック2008でダイナミックテキストボックスを作成する方法

以下

は、(非化学用)式M1及びM2は、モル濃度及びV1、V2は、体積(すべての変数)がある

   M1V1=M2V2 

あります。

ので、私のアプリケーションのために私がやっていること4つのテキストボックスとbutton.Nowは私がしたい他の三つの値

例えば

   M2=(M1V1)/V2 

を提供する場合のみ、一つの変数M2を見つけることができます私のアプリケーションで作られています私が作ることができる方法を知っているために、このアプリケーションがよりダイナミックな

は私が

M1,M2,V1 or V2 any of these,just providing the other three values 
を見つけたい を言うことができます

は、私はそれがあれば他になステートメントを使用して行うことができると思うが、私はあなたの助け

私はこの方法でこれを処理するでしょう
+1

を...そしてあなたが取得しているヘルプの一部に投票してみてください

私は私の4テキストボックスに名前を付けます。 – LarsTech

+0

親愛なる友人、申し訳ありませんが、私は答えを受け入れる方法を知らない、私は返答のために投票しようとしましたが、スタックオーバーは私に許されませんでした(私の得点は15未満です) – Eka

答えて

0

のためにそれを

アドバンスのおかげを行う方法を知りません。

txtM1 
txtM2 
txtV1 
txtV2 

が、その後

を作成します:

Private Sub textbox_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtM1.TextChanged, txtM2.TextChanged, txtV1.TextChanged, txtV2.TextChanged 
       Select Case True 
     Case txtM1.Text <> "" AndAlso _ 
      txtV1.Text <> "" AndAlso _ 
      txtV2.Text <> "" 
      txtM2.Text = CInt((txtM1.Text * txtV1.Text)/txtV2.Text) 
     Case txtM2.Text <> "" AndAlso _ 
      txtV1.Text <> "" AndAlso _ 
      txtV2.Text <> "" 
      txtM1.Text = "Your formula for M1" 
     Case txtM1.Text <> "" AndAlso _ 
      txtM2.Text <> "" AndAlso _ 
      txtV1.Text <> "" 
      txtV2.Text = "Your formula for V2" 
     Case txtM1.Text <> "" AndAlso _ 
      txtM2.Text <> "" AndAlso _ 
      txtV2.Text <> "" 
      txtV1.Text = "Your formula for V1" 
    End Select  End Sub 
関連する問題