1、利用公式求出Y值 第一列設(shè)置表頭為x,下面依次填入取值, 比如 x 1 2 3 4 ...... 第二例表頭設(shè)置為y,在下面表格中填入計(jì)算公式 如 =2*x+1 然后選中點(diǎn)右下角的十字型標(biāo)記,拖下去,和前面x數(shù)量一致。 2、然后選中數(shù)據(jù)源(即選中要進(jìn)行操作的數(shù)據(jù)區(qū)域,這里指XY值所在區(qū)域。) 3、執(zhí)行菜單命令插入——圖表——XY散點(diǎn)圖 執(zhí)行命令,打開圖表向?qū)?duì)話框選XY散點(diǎn)圖--選平滑線散點(diǎn)圖--完成 最后使用圖表向?qū)г跈M坐標(biāo)填入x值,縱坐標(biāo)填入y值,生成圖即可 將一次函數(shù)的Y列用公式編輯出來,分別填寫出當(dāng)取不同的X值時(shí)得到不的函數(shù)值,選擇函數(shù)值所在列,插入——圖表按提示操作。執(zhí)行菜單命令 執(zhí)行菜單命令
我們提供的服務(wù)有:做網(wǎng)站、成都做網(wǎng)站、微信公眾號(hào)開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、貴南ssl等。為超過千家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù),是有科學(xué)管理、有技術(shù)的貴南網(wǎng)站制作公司
VB系統(tǒng)的坐標(biāo)原點(diǎn)在左上角,X軸的正方向是水平向右,而Y軸的正方向是垂直向下。所以,要繪制三角函數(shù)的曲線,自己可以通過改變點(diǎn)坐標(biāo)的方法來實(shí)現(xiàn),當(dāng)然,VB.NET提供了相應(yīng)的方法可以來實(shí)現(xiàn)坐標(biāo)變換,也可以通過VB.Net的Graphics類提供的平移、旋轉(zhuǎn)等轉(zhuǎn)換來實(shí)現(xiàn)。
下面是我通過自己變換實(shí)現(xiàn)的示例,提供參考;我的環(huán)境是VB.NET 2010
Imports System.Math
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
? '1,獲得一個(gè)Graphics對(duì)象
? Dim MyGraphics As Graphics
? MyGraphics = PictureBox1.CreateGraphics
? '2,定義一個(gè)Pen對(duì)象,用于繪制圖形(輪廓線)
? Dim MyPen As New Pen(Color.Black, 1)
? '3,定義一個(gè)Brush對(duì)象,用于填充圖形(如果需要填充的話)
? Dim MyBrush As New SolidBrush(Color.Orange)
? MyGraphics.DrawLine(MyPen, 0, 200, 700, 200)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
? '1,獲得一個(gè)Graphics對(duì)象
? Dim MyGraphics As Graphics
? MyGraphics = PictureBox1.CreateGraphics
? '2,定義一個(gè)Pen對(duì)象,用于繪制圖形(輪廓線)
? Dim MyPen As New Pen(Color.Black, 1)
? '3,定義一個(gè)Brush對(duì)象,用于填充圖形(如果需要填充的話)
? Dim MyBrush As New SolidBrush(Color.Orange)
? '聲明橫向和縱向比例變量
? Dim Heng As Integer = 20
? Dim Zong As Integer = 50
? '先獲得正弦值,保存到點(diǎn)坐標(biāo)數(shù)組
? Dim MyPoints(700) As Point
? Dim i As Integer
? For i = 0 To 700
? ? ? MyPoints(i) = New Point(i * Heng, 200 + Sin(i) * Zong)
? Next
? '采用繪制光滑線連接點(diǎn)的方式繪制曲線
? MyGraphics.DrawCurve(MyPen, MyPoints)
End Sub
End Class
顯示的效果圖:
絕對(duì)值是“|”,可以直接顯示,同理對(duì)數(shù)可用log(x)代替,根號(hào)和其他不支持顯示。
如果要顯示數(shù)學(xué)式子,只能畫吧。
計(jì)算時(shí)可用“^”求冪或求根,“/”表示除法和分?jǐn)?shù)線,還有math類。
分享名稱:vb.net繪圖函數(shù) vb畫圖形
路徑分享:http://jinyejixie.com/article30/ddojeso.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供軟件開發(fā)、網(wǎng)站內(nèi)鏈、網(wǎng)站營銷、品牌網(wǎng)站制作、營銷型網(wǎng)站建設(shè)、面包屑導(dǎo)航
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)