国产国语对白一区二区三区,五月婷婷五月天,国产精品亚洲色婷婷99久久精品,神马不卡一区二区三级,亚洲V日韩V无码一区二区
,爱豆传媒AV片,亚洲日韩欧洲无码AV夜夜摸,狠狠色噜噜狠狠色综合久 


          遠東無損檢測資訊網
          
標題: 直通波與底面反射波的時差，與工件厚度成正比么？ [打印本頁]
          

          
作者: 李濟科    時間: 2012-9-11 10:20
          
標題: 直通波與底面反射波的時差，與工件厚度成正比么？
          問題如題目，請用數理方法證明。
          
作者: 糟老頭子    時間: 2012-9-11 14:12
          
沙發
          
因為AC+BC不等于AD+DB，所以不成正比 
          

          
作者: 糟老頭子    時間: 2012-9-11 14:15
          
不好意思，沒看清題目。再想想
          
作者: 糟老頭子    時間: 2012-9-11 14:24
          
AD+DB-AB不等于AE+EC-AC，所以不成比例
          
作者: 李濟科    時間: 2012-9-11 16:23
          
 本帖最后由 李濟科 于 2012-9-11 16:32 編輯 
          

          
謝謝參與討論。探頭間距2S，通常應先考慮:符合JB/T4730.10第8.2.2條要求，探頭對的聲束交點位于......2/3深度處。希望再想想。
          
作者: 丁偉臣    時間: 2012-9-11 18:20
          
{:soso_e179:}
          
作者: 李濟科    時間: 2012-9-12 09:27
          

          例如 2S=(4/3).tgα.T，式中:α---聲束(軸線折射)角度。那么，直通波與底面反射波的時差(時間間隔)tb，和工件厚度T成正比么？
          
作者: 李濟科    時間: 2012-9-13 09:52
          
 本帖最后由 李濟科 于 2012-9-13 09:54 編輯 
          

          

               TOFD非平行檢測技術，在下述兩個前提條件下:
              (1)探頭對中心距2S設置與工件厚度T有固定關系，比如，
                 2S=(4/3).tgα.T
              (2) 聲束(軸線折射)角度α為定值，比如α=60度或70度。
                那么，直通波與底面反射波的時差(時間間隔)tb，和工件厚度T成正比么？
          
作者: gongcg    時間: 2012-10-15 00:08
          
 本帖最后由 gongcg 于 2012-10-15 00:15 編輯 
          

          
[attach]3647[/attach]
          
送大家一個自己編寫的excel軟件，計算3波到達時間的。和實踐對比，還是比較準確的。這個東西很容易解釋樓主的問題。
          

          
樓主，結果表明成正比的。
          
作者: gongcg    時間: 2012-10-15 23:47
          
我把源代碼發出來，其實這個很簡單，厚度改變，其實就是一個相識三角形。所以，成正比的。
          

          
Const pi = 3.1415916
          
Public gjhd As Single, xkjd As Single, zbss As Single, hbss As Single
          
Sub PCSJS_Click()
          
Dim pcsjs As Single
          
gjhd = Range("F4")
          
xkjd = Range("F5")
          
pcsjs = 2 * gjhd * (2 / 3) * Tan(Application.Radians(xkjd))
          
Range("F8") = pcsjs
          
End Sub
          
Sub SJJS_Click()
          
Dim ztb As Single, db As Single, bxb As Single, pcs As Single
          
Dim zbjd As Single, hbjd As Single, jdjd As Single, jingdu As Single, i As Long, hbhd As Single, zbhd As Single, szbh As Single
          
gjhd = Range("F4")
          
xkjd = Range("F5")
          
zbss = Range("F6")
          
hbss = Range("F7")
          
pcs = Range("F8")
          
'計算直通波
          
ztb = 1000 * pcs / zbss
          
Range("C15").Value = ztb
          
'計算底波
          
db = 1000 * 2 * ((pcs / 2) ^ 2 + gjhd ^ 2) ^ (1 / 2) / zbss
          
Range("D15").Value = db
          
'計算變形波
          
jdjd = Range("G11").Value
          
jingdu = Range("G12").Value
          
If jdjd > 1 Or jdjd < 0.001 Then
          
MsgBox "請輸入正確的角度步進：0.001-1"
          
GoTo 1
          
End If
          
If jingdu > 1 Or jdjd < 0.0001 Then
          
MsgBox "請輸入正確的精度步進：0.0001-1"
          
GoTo 1
          
End If
          
'''''----------------
          
i = 0
          
For hbjd = 0 To 90 Step jdjd
          
hbhd = Application.Radians(hbjd)  'RADIANS 角度轉弧度   DEGREES 弧度轉角度
          
szbh = Sin(hbhd) * zbss / hbss
          
If szbh >= -1 And szbh <= 1 Then
          
zbhd = Application.Asin(Sin(hbhd) * zbss / hbss)
          
Else
          
GoTo 2
          
End If
          
zbjd = Application.Degrees(zbhd)
          
If Abs((Tan(hbhd) * gjhd + Tan(zbhd) * gjhd) - pcs) <= jingdu Then
          
i = i + 1
          
Range("G13").Value = hbjd
          
Range("G14").Value = zbjd
          
Range("E15").Value = 1000 * (gjhd / Cos(hbhd) / hbss + gjhd / Cos(zbhd) / zbss)
          

          
End If
          
2
          
Next
          
If i > 1 Then
          
MsgBox "有" & i & "對結果，" & "結果不唯一，請增大角度步進或者減小精度步進，直到答案唯一！"
          
ElseIf i = 0 Then
          
MsgBox "無計算結果，請減小角度步進或者增大精度步進，直到有計算結果！"
          
ElseIf i = 1 Then
          
MsgBox "結果唯一,成功！"
          
End If
          
1
          
End Sub
          

          
作者: gongcg    時間: 2012-10-15 23:58
          
可能你們看不懂這個編程，我上面的這個編程，都是用三角函數求出來的，編程中難的不是直通波低波的時間計算，而是變形波的時間計算，你們可以使用薄板，如8mm厚的板子做實驗，我上面這個東西最少能得出低波后面的兩個變形波的值，而且都是準確的。[attach]3652[/attach]
          
這個是另外一個計算的截圖，計算更精確。
          
作者: ghost    時間: 2013-2-25 22:11
          
{:soso_e181:}
          
作者: lrc2531    時間: 2013-2-26 16:46
          
想請教各位老師問題。。TOFD檢測近表面1mm 、2mm深的縱孔很難檢測，看不到衍射波信號。試塊厚度20mm.但是為什么把試塊翻過來檢測，也就是說檢測18mm、19mm深的能很好的發現呢？能直接看到衍射波信號。
          
作者: 幻想一席微涼    時間: 2013-2-26 18:04
          
探頭及pcs導致的表面盲區
          

          
作者: niatlp    時間: 2013-3-3 14:52
          
學習了謝謝
          
作者: 飛馬踏燕    時間: 2013-4-5 12:36
          
{:soso_e179:}{:soso_e179:}
          
作者: xcb526    時間: 2013-4-15 16:41
          

          lrc2531 發表于 2013-2-26 16:46 
          
想請教各位老師問題。。TOFD檢測近表面1mm 、2mm深的縱孔很難檢測，看不到衍射波信號。試塊厚度20mm.但是為 ...

          
ＴＯＦＤ檢測時，上表面盲區比較大，一般可能有４ｍｍ，甚至7、8mm。
          
而底面盲區比較小，尤其是當缺陷處于探頭對中心線上時的底面盲區較小（只要工藝設置得當，有時候只有零點幾個mm），所以會出現你描述的情況。
          

          
作者: 糟老頭子    時間: 2013-4-15 17:53
          
不成比例，原因見圖
          
作者: wdabll    時間: 2013-4-28 08:28
          
{:soso_e100:}
          
作者: ff99998888    時間: 2013-4-28 10:36
          
△t=tB-tL=(2√((〖(2/3)tgα)〗^2+1)-(4/3)tgα)t/Cl,可見成正比
          
作者: 假面    時間: 2013-4-28 11:28
          

          lrc2531 發表于 2013-2-26 16:46 
          
想請教各位老師問題。。TOFD檢測近表面1mm 、2mm深的縱孔很難檢測，看不到衍射波信號。試塊厚度20mm.但是為 ...

          
個人認為：具體看你PCS的設定，以及探頭聲場的特性
          

          
作者: 薛留軍    時間: 2013-5-3 09:08
          
當然不是正比    和厚度的T的平方 成正比吧 
          
作者: 紫云煙    時間: 2014-9-3 11:05
          
應該是與厚度成正比的，當楔塊角度一定時。
          
圖片式子前提是：工件厚度T小于等于50使用單通道




          

          

          歡迎光臨 遠東無損檢測資訊網 (http://m.jinlidl.com/)

Powered by Discuz! X3.5