• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Sóng âm thanh hình sine

Các ví dụ nho nhỏ và những thứ linh tinh không thuộc nhóm nào
Hình đại diện của người dùng
alexanderdna
Guru
Guru
Bài viết: 214
Ngày tham gia: T.Ba 14/07/2009 11:13 am
Đến từ: Sài Gòn
Has thanked: 3 time
Been thanked: 15 time

Sóng âm thanh hình sine

Gửi bàigửi bởi alexanderdna » T.Bảy 24/10/2009 11:39 am

Tên chương trình: Tone
Ngôn ngữ lập trình: VB6
Tác giả: David M.Hitchner
Chức năng: Phát âm thanh với tần số tùy chọn.



tone.jpg
Giao diện chương trình
tone.jpg (11.39 KiB) Đã xem 2284 lần

Frequency là tần số. Audio Mode là số kênh. Sample rate là tần số trích mẫu. Bits là chiều sâu bit.

Lưu ý: các nút DTMF và Train sau khi bấm thì hãy chờ cho tới khi phát xong âm thanh, vì nó sẽ làm chương trình có vẻ tê liệt tạm thời.
Tập tin đính kèm
tone.zip
(6.14 KiB) Đã tải 755 lần



nghia_tdh21
Bài viết: 7
Ngày tham gia: T.Bảy 26/04/2008 9:28 am
Đến từ: TP Hồ Chí Minh
Liên hệ:

Re: Sóng âm thanh hình sine

Gửi bàigửi bởi nghia_tdh21 » T.Năm 18/02/2010 8:07 am

dùng doevent có khả năng hết bị "tê liệt". Nếu muốn delay ở tầm ms tốt nhất là dùng hàm gettickcount.

Mã: Chọn hết

dim m_delay as long
dim inint as long
innit=gettickcount 'hàm này phải khai báo
m_delay=45 'trễ 45mili giây
do
DoEvents
loop until (innit+m_delay)<GetTickCount

robotihon711
Bài viết: 1
Ngày tham gia: T.Hai 31/10/2011 11:28 am

Re: Sóng âm thanh hình sine

Gửi bàigửi bởi robotihon711 » T.Hai 31/10/2011 8:41 pm

bạn ơi!mình có một bài tập lớn là lập trình chương trình thu âm, có thể chỉnh đc tần số lấy mẫu.Bạn có thể giúp mình dc ko?chuyên ngành của mình ko phải lập trình nên hơi khó khăn!!


Quay về “[VB] Mã nguồn linh tinh”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.1 khách