钻头水力参数的设计.docVIP

钻头水力参数的设计 1.?????? 变量说明 Va——假定环空返速 Dh——钻头直径 Dp——钻杆直径 C——流量系数 Kg——地面管汇 B——常数 dpi——钻杆内径 Lp——钻杆长度 upv ——钻井液塑性黏度 ed ——钻井液泥浆密度 Lc ——钻挺长度 dci ——钻挺内径 dc ——钻挺外径 Pr ——额定泵压 Ps ——实际泵压 Qmin ——最低排量 Kpi ——钻杆内耗系数 Kci ——钻挺内耗系数 Kca ——钻挺环空系数 Kpa ——钻杆环空系数 Kl ——循环压耗系数 Qopt——最优排量 Kp——钻杆压耗系数 m ——单位钻杆长度的压耗系数 Kc ——钻挺压耗系数 a ——常数 Dpc ——第一临界井深 Dpa ——第二临界井深 Qs ——泵的实际排量 pl ——整个循环系统的压耗系数 Pba ——假定钻头水功率 A0 ——喷嘴截面积 Pb——假定钻头水功率 Ps ——实际泵压 Nb ——实际钻头功率 Ns ——实际泵功率 V0——实际环空返速 Kv ——常数 Kf ——常数 Fj ——射流冲击力 Pb ——实际钻头水功率 2.?????? 编程 Private Sub Command1_Click() Va = 0.8 Dh = 21.59 Dp = 17.78 C = 0.98 Kg = 0.00107 B = 0.51655 dpi = 10.86 Lp = 3880 upv = 0.0047 ed = 1.64 Lc = 120 dci = 7.14 dc = 17.78 pr = 16.5 Ps = 14.85 Qr = 35.4 Qmin = 0.1 * 3.14 * (Dh ^ 2 - Dp ^ 2) * Va / 4 Kpi = (ed ^ 0.8 * upv ^ 0.2 * Lp * B) / (dpi ^ 4.8) Kci = (ed ^ 0.8 * upv ^ 0.2 * Lc * 0.51655) / (dci ^ 4.8) Kca = ed ^ 0.8 * upv ^ 0.2 * Lc * ((0.57503) / ((Dh - dc) ^ 3 * (Dh + dc) ^ 1.8)) Kpa = ed ^ 0.8 * upv ^ 0.2 * Lp * ((0.57503) / ((Dh - dc) ^ 3 * (Dh + dc) ^ 1.8)) Kl = Kg + Kpi + Kci + Kca + Kpa Qopt = (Ps / (2.8 * Kl)) ^ (1 / 1.8) If Qopt Qmin Then Qs = Qmin ElseIf Qopt Qr Then Qs = Qr Else Qs = Qopt End If pl = Kl * Qs ^ 1.8 Pb0 = Ps - pl A0 = ((ed * Qs ^ 2) / (20 * C ^ 2 * Pb0)) ^ (0.5) Pb = (ed * Qs ^ 2) / (2 * C ^ 2 * A0 ^ 2) Text1.Text = Pb Ps = Pb + pl Text2.Text = Ps Nb = Pb * Qs Ns = Ps * Qs Text3.Text = Nb Text4.Text = Ns Rj = Nb / Ns Text5.Text = Rj Va = 0.1 * Qs * 4 / (3.14 * (Dh ^ 2 - Dp ^ 2)) Text6.Text = Va Kv = 10 * C * ((20 / ed) ^ 0.5) V0 = Kv * (Ps - pl) ^ 0.5 * 0.001 Text6.Text = V0 Kf = (C * (20 * ed) ^ 0.5) / 100 Fj = Kf * Qs * (Ps - pl) ^ 0.5 Text7.Text = Fj rwj = Nb / (A0 * 10000) Text8.Text = rwj End Sub Private Sub Command2_Click() Text1.Text = Text2.Text = Text3.Text = Text4.Text = Text5.Text = Text6.Text = Text7.Text = Text8.Text = End Sub