songhoanhtin
Thành viên mới

- Tham gia
- 6/10/09
- Bài viết
- 2
- Được thích
- 0
Riêng tư cmd_Chen_anh_Click()
Dim x Là số nguyên
Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = Sai
x = Application.FileDiadlog(msoFileDialogOpen).Show '
Nếu x <> 0 Thì 'Chưa an hạt
FPATH = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)
Hình ảnh1.PictureSizeMode = 1
Kết thúc nếu
Kết thúc phụ
đối tượng không hỗ trợ thuộc tính hoặc phương thức này
Dim x Là số nguyên
Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = Sai
x = Application.FileDiadlog(msoFileDialogOpen).Show '
Nếu x <> 0 Thì 'Chưa an hạt
FPATH = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)
Hình ảnh1.PictureSizeMode = 1
Kết thúc nếu
Kết thúc phụ
Bài đã được tự động gộp:
đối tượng không hỗ trợ thuộc tính hoặc phương thức này