航空券の簡易予約で困っています。
- 10 個のテキストボックスがフォームに追加されます
- 1-5 テキストボックスは喫煙者専用です
- 6-10 テキストボックスは禁煙エリアのみです。
ねじれは、Inputbox を使用してユーザー入力 1 を喫煙者として、2 を非喫煙者として入力することです。
ユーザーがタイプ 1 の場合、座席のテキストボックスはユーザーが設定するのではなく、コンピューターによってランダムに配置される必要があります (テキストボックス 1 ~ 5)。非喫煙者にも同じことが当てはまります。
私たちの先生は、テキストボックスの作成配列についてヒントを与えましたが、それがどのように機能するかについては本当に無知のようです.
基本的に座席指定。
このコードでは、何を追加する必要があるかわかりません。
Dim reserve() As TextBox = {smokingtxt1, smokingtxt2, smokingtxt3, smokingtxt4, smokingtxt5}
Dim reserve1() As TextBox = {nonsmokingtxt1, nonsmokingtxt2, nonsmokingtxt3, nonsmokingtxt4, nonsmokingtxt5}
Dim notification As Integer
notification = InputBox("Enter 1 or 2")
If notification = 1 Then
For Each i As TextBox In reserve
i.Text = "Reserve"
Next
ElseIf notification = 2 Then
For Each j As TextBox In reserve1
Randomize()
Next
Else
MessageBox.Show("Invalid operation")
End If