0

誰かがクリックするラジオ ボタン ( ごとに 1 つのボタンのみGroupBox) と合計 5 つの異なるグループ ボックスに応じて、プログラムを作成したいと考えています。入力された num1Textbox 値に特定の値が追加されます。

問題は、それができるかどうかです。それとも私はそれを学ぼうとして時間を無駄にしていますか. 私はVBに非常に慣れていません..パッティング用のゴルフプログラムの値を加算-乗算-除算および減算するcplプログラムのみを実行しました..今回はもっと複雑になります。

以下はプログラムの写真です。

誰かがヤードからホールに入る = 145 (毎回異なる数値になります)

次に、(5 つの異なるオプション)ごとに 1 つのラジオ ボタンを選択し、GroupBox選択されたオプションに応じて値 145 が増減します。

申し訳ありませんが、ここに写真をアップロードすることはできません:(だから私はここにアップロードしました。

申し訳ありませんが、フォームを表示するにはアカウントが必要であることを知りませんでした.. 新しい場所を見つけようと思います. 1分

ここで試してみましょう http://i1311.photobucket.com/albums/s667/Steve_Lunney/design_zps9c2f89da.jpg

どんな助けでも大歓迎です...事前にありがとう

これは私が試していたものです..誰かの提案として

しかし、これらの各ステートメント spinGroupBox.spin1RadioButton.Checked の下に波線が表示され、その上にマウスを置くと、「upRadioButton」は「System.Windows.Forms.Groupbox のメンバーではありません」と表示されます

Private Sub calculateButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles calculateButton.Click
    Dim spinGroupBox As New GroupBox()
    Dim spin1RadioButton As RadioButton
    Dim spin2RadioButton As RadioButton
    Dim spin3RadioButton As RadioButton
    Dim spin4RadioButton As RadioButton
    Dim spin5RadioButton As RadioButton
    Dim num1TextBox As Integer
    Dim num2TextBox As Integer
    Dim spin1b As Decimal
    Dim resultA As Integer

    Select Case True
        Case spinGroupBox.spin1RadioButton.Checked
            spin1b = 0.095
        Case spinGroupBox.spin2RadioButton.Checked
            spin1b = 0.085
        Case spinGroupBox.spin3RadioButton.Checked
            spin1b = 0.08
            'etc
    End Select
    resultA = spin1b

    ' Create and initialize a GroupBox and a Button control. 
    Dim windGroupBox As GroupBox
    Dim upRadioButton As RadioButton
    Dim ulRadioButton As RadioButton
    Dim urRadioButton As RadioButton
    Dim downRadioButton As RadioButton
    Dim dlRadioButton As RadioButton
    Dim drRadioButton As RadioButton
    Dim leftRadioButton As RadioButton
    Dim rightRadioButton As RadioButton
    Dim wind1b As Decimal
    Dim resultb As Integer
    Select Case True
        Case windGroupBox.upRadioButton.Checked
            wind1b = 0.095
        Case windGroupBox.ulRadioButton.Checked
            wind1b = 0.085
        Case windGroupBox.urRadioButton.Checked
            wind1b = 0.075
        Case windGroupBox.downRadioButton.Checked
            wind1b = 0.07
        Case windGroupBox.dlRadioButton.Checked
            wind1b = 0.065
        Case windGroupBox.drRadioButton.Checked
            wind1b = 0.06
        Case windGroupBox.leftRadioButton.Checked
            wind1b = 0.055
        Case windGroupBox.rightRadioButton.Checked
            wind1b = 0.05

    End Select
    resultb = wind1b
End Sub
4

1 に答える 1

0

私は今それをテストしました、そしてコメントに投稿したように、upRadioButton（そして他のすべてのものは）（おそらく）フォームの直接の子です。つまり、デザイナーでコントロールをフォームにプルした場合は、それらの行を削除
Case Me.upRadioButton.Checked
する必要があります。コントロールは、デフォルトで非表示になっている別のファイルで宣言されています。あなたの行は、実際のフォーム コントロールへのアクセスをシャドウする変数を再度宣言します。Me.dim ...Me.

于 2012-12-23T19:58:43.360 に答える