Advertisement
Tony041010

購物系統(Form 2)

Jul 7th, 2021
459
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Dim a As Integer
  2.  
  3. '第4題
  4. Private Sub Form_Activate()
  5.     a = 0
  6.     Image1.Picture = LoadPicture(Form1.衣服號碼)
  7. End Sub
Advertisement
RAW Paste Data Copied
Advertisement