Aucune description
Vous ne pouvez pas sélectionner plus de 25 sujets Les noms de sujets doivent commencer par une lettre ou un nombre, peuvent contenir des tirets ('-') et peuvent comporter jusqu'à 35 caractères.

列印選擇.vb 897B

123456789101112131415161718192021
  1. Imports System.IO
  2. Imports System.Text
  3. Public Class 列印選擇
  4. Private Sub 線路選擇_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  5. If 風格啟用 = True Then : 風格() : End If
  6. End Sub
  7. Private Sub 線路選擇_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
  8. If 系統語言 = "繁體中文" Then : Me.Text = "線路選擇"
  9. ElseIf 系統語言 = "English" Then : Me.Text = "Line Selection"
  10. ElseIf 系統語言 = "Indonesian" Then : Me.Text = "Pemilihan Jalur" : End If
  11. End Sub
  12. Private Sub 總部_rbt_Click(sender As Object, e As EventArgs) Handles 總部_rbt.Click
  13. 車廠型態 = True : Me.Close()
  14. End Sub
  15. Private Sub 測試_rbt_Click(sender As Object, e As EventArgs) Handles 測試_rbt.Click
  16. 車廠型態 = False : Me.Close()
  17. End Sub
  18. Private Sub 風格()
  19. End Sub
  20. End Class