Page 1 of 2

กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 5:25 pm
by diamondbom
คือว่าผมต้องการกำหนดผลรวมของจำนวนเชิงซ้อน 2 ค่า

ลงใน TB3 ในรูปของ x+yi แต่ยังไม่ค่อยเข้าใจฟังก์ชัน

ขอคำแนะนำด้วยครับ :D


ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 6:27 pm
by snasui
:D ช่วยยกตัวอย่างข้อมูลและตัวอย่างคำตอบที่ต้องการมาด้วยครับ

เช่น x = 1, Y = 2 คำตอบใน TextBox3 ควรเป็นเท่าใด และคำนวณอย่างไรจึงได้เท่านั้นครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 7:30 pm
by diamondbom
ขอใหม่นะครับ :D

คือว่าผมต้องการกำหนดผลรวมของจำนวนเชิงซ้อน 2 ค่า

ลงใน TB3 ในรูปของ x+yi แต่ยังไม่ค่อยเข้าใจฟังก์ชัน

ขอคำแนะนำด้วยครับ

โดย x=r cos(Ø) y=r sin(Ø)

คำตอบจะเป็น 1+2i ครับ




ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 8:07 pm
by snasui
:D ผมยังไม่ค่อยเข้าใจในส่งที่ถามมาครับ

ลองใช้ฟังก์ชั่น Complex เข้ามาช่วยดูครับ

Code: Select all

Private Sub CommandButton1_Click()
    
    Dim A As Integer
    Dim B As Integer
    
    A = TB1.Value
    B = TB2.Value
    
    TB3.Value = Application.Complex(A, B)
    
End Sub

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 8:38 pm
by diamondbom
ผมถามไม่ค่อยถูกน่ะครับต้องขอโทดด้วย เกี่ยวกับเรื่องที่ผมเรียน

แต่คำตอบช่วยผมได้มากครับ

เด๋วผมจะลองนำไปประยุกต์นะครับ

ขอบคุณครับ ^_^

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 8:44 pm
by snasui
diamondbom wrote:ผมถามไม่ค่อยถูกน่ะครับต้องขอโทดด้วย เกี่ยวกับเรื่องที่ผมเรียน

แต่คำตอบช่วยผมได้มากครับ

เด๋วผมจะลองนำไปประยุกต์นะครับ

ขอบคุณครับ ^_^
:shock: ช่วยแก้ไขคำที่ระบายสีให้ถูกต้องด้วยครับ ที่เขียนมาผิดกฎข้อ 1 ด้านบนครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 9:09 pm
by diamondbom
จากฟังก์ชัน
ฟังก์ชัน IMAGINARY ส่งกลับสัมประสิทธิ์ส่วนจินตภาพของจำนวนเชิงซ้อน

ผมจะสามารถเรียกใช้ฟังก์ชันได้อย่างไรใน VBA ครับ

ซึ่งคำตอบจะมีค่าเท่ากับ 2

ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 9:12 pm
by snasui
:twisted: ได้อ่านในสิ่งที่ผมโพสต์ให้แก้ไขข้อความแล้วยังครับ :?:

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 10:04 pm
by diamondbom
diamondbom wrote:ผมถามไม่ค่อยถูกครับต้องขอโทษด้วย เกี่ยวกับเรื่องที่ผมเรียน

แต่คำตอบช่วยผมได้มากครับ

เดี๋ยวผมจะลองนำไปประยุกต์นะครับ

ขอบคุณครับ ^_^

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 10:37 pm
by snasui
:D ตัวอย่าง Code ตามด้านล่างครับ

Code: Select all

Private Sub CommandButton2_Click()
    Dim C As String
    C = TB3.Value
    TB4.Value = Application.ImAbs(C)
End Sub
ดูคำอธิบาย ImAbs ที่นี่ครับ http://office.microsoft.com/th-th/excel ... P010342656

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 11:10 pm
by diamondbom
ขอบคุณครับผม

Re: กำหนดปริมาณเชิงซ้อน

Posted: Mon Jun 23, 2014 11:41 pm
by diamondbom
ผมต้องการหามุม จาก

ฟังก์ชัน ACOSส่งกลับค่าอาร์กโคไซน์ของจำนวน

แต่ไม่รู้วิธีการใช้งานฟังก์ชัน ขอคำแนะนำด้วยครับ

ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Tue Jun 24, 2014 2:19 am
by diamondbom
สามารถแก้ไขได้แล้วครับ ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Tue Jun 24, 2014 11:32 pm
by diamondbom
ผมออกแบบโปรแกรม ผลคูณ/ผลบวก ของ complexnumber

ไต่ทำไม่ได้ครับ ผมลองใช้สองสูตรแล้ว ขอคำแนะนำด้วยครับ


TB3.Value = (TB1.Value * TB2.Value) / (TB1.Value + TB2.Value)


TB3.Value = (Application.Complex(A, B) * Application.Complex(A, B)) / (Application.Complex(A, B) + Application.Complex(A, B))


คำตอบจะได้ 0.5+1i

ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Wed Jun 25, 2014 12:17 am
by snasui
:D ผมยังไม่ค่อยเข้าใจในสิ่งที่คุณต้องการหา คงไม่สามารถช่วยได้มาก ลองดู Code ตามด้านล่างเป็นแนวในการเขียนให้กระชับลงครับ

Code: Select all

Private Sub CommandButton1_Click()
    With Application
        A = 1
        B = 2
        C = .Complex(A, B)
        TB3.Value = (.ImAbs(C) * .ImAbs(C)) / (.ImAbs(C) + .ImAbs(C))
    End With
End Sub

Re: กำหนดปริมาณเชิงซ้อน

Posted: Wed Jun 25, 2014 12:46 am
by diamondbom
ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Wed Jun 25, 2014 10:28 pm
by diamondbom
ผมออกแบบโปรแกรม ผลคูณ/ผลบวก ของ complexnumber

ไต่ทำไม่ได้ครับ ติดตรง Complex ของ TB2 TB3

ขอคำแนะนำด้วยครับ

คำตอบจะได้ 1+1.5i

ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Wed Jun 25, 2014 11:09 pm
by snasui
:D เปลี่ยนจาก Complex(E, F) เป็น .Complex(E, F) โดยเพิ่ม . เข้าไปด้วยครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Wed Jun 25, 2014 11:11 pm
by diamondbom
ขอบคุณครับ

Re: กำหนดปริมาณเชิงซ้อน

Posted: Fri Jun 27, 2014 10:51 pm
by diamondbom
การกำหนดการแสงผลของ TextBox

TB3 = 1.44+1.44i

TB4 = 2.04

ขอคำแนะนำด้วยครับ


ขอบคุณครับ