基于VB.NET的辐射报警仪上位机管理软件设计(18)
Label1.Show()
Label2.Hide()
Label3.Show()
Label4.Hide()
Label5.Show()
Label6.Hide()
Label7.Hide()
Label8.Hide()
Label9.Hide()
Label1.Text = "環境線量率測定"
Label3.Text = "放射能濃度測定"
Label5.Text = "システム設定"
Label1.Location = New Point((Me.Width - Label1.Width) / 2, (Panel1.Height - Label1.Height) / 5 - 20)
Label3.Location = New Point((Me.Width - Label1.Width) / 2, (Panel1.Height - Label1.Height) * 2 / 5 - 20)
Label5.Location = New Point((Me.Width - Label1.Width) / 2, (Panel1.Height - Label1.Height) * 3 / 5 - 20)
Select Case (RecData(2) & RecData(3))
Case "00"
Mode = Mode & "-进入本底测量询问"
Label1.Text = "更新する"
Label2.Text = "はい"
Label3.Text = "いいえ"
Label4.Text = "バックグラウンド値の前回測定時間"
Label1.Location = New Point((Me.Width - Label1.Width) / 2, (Panel1.Height - Label1.Height) / 5 - 20)
Label2.Location = New Point((Me.Width / 2 - Label2.Width) / 2, (Panel1.Height - Label1.Height) * 2 / 5 - 20)
Label3.Location = New Point(((Me.Width / 2) + (Me.Width / 2 - Label3.Width) / 2), (Panel1.Height - Label1.Height) * 2 / 5 - 20)