ftdi编程

1. 提问+J-LINK，U-LINK和ST-LINK有什么区别

j-link，u-link和st-link有什么区别，item·区别如下：

1、其实就是诺基亚和摩托罗拉的区别，大厂商的管保，小厂商的不管，不过tp-link和d-link都不错，tp-link设置更方便一些，d-link的功能多，但是设置页面比较乱，但是也是一款不错的网络设备

2、 这几款在参数和价格方面很均衡,整体来说都非常不错;。

3、 但是买东西,关键还是要看产品的特点是否符合您的需求,建议认真衡量以后,选择适合自己的。

(1)ftdi编程扩展阅读：

ST-LINK /V2指定的SWIM标准接口和JTAG / SWD标准接口，其主要功能有：

(1)编程功能：可烧写FLASH ROM、EEPROM、AFR等。

(2)仿真功能：支持全速运行、单步调试、断点调试等各种调试方法，可查看IO状态，变量数据等等。

(3)仿真性能：采用USB2.0接口进行仿真调试，单步调试，断点调试，反应速度快！

(4)编程性能：采用USB2.0接口，进行SWIM / JTAG / SWD下载，下载速度快！

2. 如何将一个文件夹内所有Excel的某一单元格（比如C5）的数值都提取出来，并保存为另一个ExceL

新建一个EXCEL,运行此代码，将需合并的文件选中即可
Sub CombineWorkbooksrange()
Dim FilesToOpen, ft
Dim x As Integer
Application.ScreenUpdating = False
On Error GoTo err

FilesToOpen = Application.GetOpenFilename("Excel文件（*.xls & *.xla & *.xlt *.xlsx *.xlsb）,*.xls;*.xla;*.xlt;*.xlsx;*.xlsb", MultiSelect:=True, Title:="要合并的文件")

If TypeName(FilesToOpen) = "boolean" Then
MsgBox "没有选定文件"
GoTo err
End If

x = 1
While x - 1 < UBound(FilesToOpen)
Set wk = Workbooks.Open(Filename:=FilesToOpen(x))
For i = 1 To wk.Sheets.Count
If wk.Sheets(i).Name = "1" Then
Set xlra = wk.Sheets("1").[C5]
Else
Set xlra = wk.Sheets(i).[C5]
End If '注意，引号内的1就是你要的相同工作表名,如果工作表名无要求，则继续，取单元格数值，现在是取C5
Sheet1.Range("a65500").End(xlUp).Offset(1, 0) = xlra
Next
x = x + 1
wk.Close
Wend
MsgBox "合并成功完成！"
err:
End Sub

3. ftdi公司的USB设备通信上位机VC编程问题

哎呀，这个我用过啊，真巧。
不过没遇到这个问题。

void CISM001Dlg::InitUSB()
{
LoadDLL();
FT_STATUS status = OpenBy();
if(status)
{
MessageBox("USB Not Found!");
m_USB="";
}
else
{
m_USB="USB <-> Serial";
ResetDevice();
SetTimeouts(3000, 3000);//extend timeout while board DLP-USB2 finishes reset
Purge(FT_PURGE_RX || FT_PURGE_TX);
SetTimeouts(300, 300);
}
UpdateData(false);
}