超高精度科学计算器VB源程序_第1页
超高精度科学计算器VB源程序_第2页
超高精度科学计算器VB源程序_第3页
超高精度科学计算器VB源程序_第4页
超高精度科学计算器VB源程序_第5页
已阅读5页,还剩266页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

□CC-超高精度科学计算超Elf®

复制©粘贴里)面积计宜®体积计邕⑦素数判断@)麦森索数判断®)的精度也1特殊函数G帮助QP

364位

20HH-11-710:3n:1*»DEC

12地0.

256位

_®_I_I—£_I_q」\5126

2ad|DRG|'回山回.

■.„(,/「:画1024位

服川|—WPJ三了…_JKJjmjjBj_«jjJtJ51111r|卜「,1•」[-u1L1一口

j*j।।;j[一(

&」RHB!如「上I_7j_8j_9j_LJ_±J

_4j5j_6jI-I

£9+E3K9DUB3Kl^i

EEEE“向EE3K31E———G——

■-i->―/•—・-'j—-----------.~r〜--十~*"**

EH巨小即目3™E0HBIaffimurai

VERSION5.00

BeginVB.FormForml

BackColor=&H00FF0000&

Caption="HPC-超高精度科学计算器(2010)”

ClientHeight=3090

ClientLeft=1260

ClientTop=5250

Clientwidth13080

DrawWidth=12

FillColor&H00C00000&

BeginPropertyFont

Name=nArialBlack11

Size=9

Charset=0

Weight=700

Underline=0Talse

Italic==0Talse

Strikethrough=0Talse

EndProperty

ForeColor=&H8000000A&

Icon=nchen.frxn:0000

LinkTopic=“Forml”

MaxButton=0Talse

MousePointer=141ArrowandQuestion

PaletteMode=2'Custom

Picture=Hchen,frxn:0CCA

ScaleHeight=192.523

ScaleMode=0'User

ScaleWidth=12800

BeginVB.TextBoxxPics

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=8

Left=6120

Tabindex=126

Tag=$Hchen.frx":78AC

Text=“由200”

Top=5520

Msible=01FaIse

Width=735

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack"

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height405

Index=7

Left=5280

Tabindex=125

Tag=$nchen.frx":9020

Text=,/180”

Top=5520

Visible=0Talse

Width735

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack'1

Size=10.5

Charset二0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=6

Left=4680

Tabindex=124

Tag=$Mchen.frx":A794

Text="2/

Top=5520

Visible=0'False

Width=495

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack1'

Size=10.5

Charset=0

Weight=400

Underline=0'False

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=5

Left=3720

TabIndex=123

Tag=$nchen.frxM:BF08

Text=Hln(V2TT)/2n

Top=5520

Visible=0Talse

Width=855

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack1'

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=4

Left=3000

Tabindex=122

Tag=$nchen.frx":D67C

Text=“V2TT”

Top-5520

Visible-0'False

Width=615

End

BeginVB.CommandButtonCommand30

Caption=MFFTn

Height=375

Left=6240

Tabindex=121

Top1680

Width=1215

End

BeginVB.CommandButtonRUNc

BackColor=&H00C0C000&

Caption=“RUN”

BeginPropertyFont

Name="ArialBlack”

Size=7.5

Charset=0

Weight=400

Underline=0'False

Italic=0'False

Strikethrough0Talse

EndProperty

Height=255

Left=12240

MaskColor=&H80000012&

Style=1'Graphical

Tabindex=120

TabStop=0Talse

ToolTipText="重复运行”

Top=1680

Width=615

End

BeginVB.CommandButtonClear

BackColor=&H0000FFFF&

Caption=

BeginPropertyFont

Name=nArialBlack”

Size=7.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Left=12240

MaskColor=&H80000012&

Style=1'Graphical

Tabindex=119

TabStop=0Talse

ToolTipText=”清当前数据”

Top=1320

Width=615

End

BeginVB.CommandButtonClss

BackColor=&H000000C0&

Caption=”CLS“

BeginPropertyFont

Name="ArialBlack”

Size=7.5

Charset=0

Weight=400

Underline=0Talse

Italic==0Talse

Strikethrough=0Talse

EndProperty

Height255

Left=12240

MaskColor=&H000040C0&

Style=1'Graphical

Tabindex=118

TabStop=0Talse

ToolTipText=”数据初始化”

Top=960

Width=615

End

BeginVB.CommandButtonCommand27

BackColor=&H0080C0FF&

Caption=“OFF”

BeginPropertyFont

Name="@Gulim”

Size=7.5

Charset=0

Weight=700

Underline=0Talse

Italic-0,False

Strikethrough-0Talse

EndProperty

Height=255

Left=11640

MaskColor-&H00FFFFFF&

Style-1'Graphical

Tabindex=117

TabStop=0'False

ToolTipText-”关闭程序”

Top960

UseMaskColor--1'True

Width=495

End

BeginVB.CommandButtonCommand52

Caption=»»A»»

BeginPropertyFont

Name="ComicSansMS"

Size=9

Charset=0

Weight=700

Underline=0Talse

Italic==0'False

Strikethrough=二0Talse

EndProperty

Height255

Left=8040

Tabindex=116

Top=2760

Width495

End

BeginVB.CommandButtonNum

BackColor=&H00C0FFC0&

Caption=

BeginPropertyFont

Name="Verdana"

Size=10.5

Charset=0

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height-255

Index=10

Left=3480

MaskColor&H80000018&

Style=1'Graphical

Tabindex=115

TabStop=0Talse

ToolTipText=“数字“6”“

Top-2760

UseMaskColor=-1'True

Width=495

End

BeginVB.TextBoxTextl

Appearance=0Tlat

BackColor=&H00C0FFFF&

BorderStyle=01None

Enabled=0Talse

BeginPropertyFont

Name="Fixedsys”

Size=12

Charset=134

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough二0Talse

EndProperty

Height=240

Left=3000

Tabindex=114

TabStop=0'False

Top=120

Width二2385

End

BeginVB.TimerTimer1

Interval=500

Left=6600

Top=2280

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0,False

Strikethrough=0Take

EndProperty

Height=405

Index=3

Left=2280

Tabindex=113

Tag=$nchen.frx":EDF0

Text=

Top=5520

X^sible=0*False

Width=615

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic==0Talse

Strikethrough=0Talse

EndProperty

Height405

Index=2

Left=1680

Tabindex=112

Tag=$nchen.frx":10564

Text=“JTT”

Top=5520

Visible=0Talse

Width495

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name="ArialBlack"

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0*False

Strikethrough=0Talse

EndProperty

Height=405

Index=1

Left=1200

Tabindex=111

Tag=$Hchen.frx":llBBC

Text=”/2”

Top-5520

Visible=0Talse

Width=495

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough:0Talse

EndProperty

Height=405

Index=9

Left=8880

TabIndex=110

Tag=$nchen.frx":13213

Text=”LN(10)-1”

Top=5040

Visible=0Talse

Width=1095

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough二0Talse

EndProperty

Height=405

Index=8

Left=8040

Tabindex=109

Tag=$nchen.frx":14869

Text="LN(10)H

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TcxtBoxInes

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough==0Talse

EndProperty

Height=405

Index=7

Left=7320

Tabindex=108

Tag=$nchen.frx":15EC0

Text=“LN(9)”

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic==0Talse

Strikethrough=:0Talse

EndProperty

Height=405

Index=6

Left=6600

Tabindex=107

Tag=$nchen.frx":17517

Text=HLN(8)n

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=5

Left=5880

Tabindex=106

Tag=$nchen.frx":18B6E

Text=“LN⑺”

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=4

Left=5160

Tabindex=105

Tag=$nchen.frx":lAlC5

Text=HLN(6)n

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0'False

Italic=01False

Strikethrough==0Talse

EndProperty

Height=405

Index=3

Left=4440

Tabindex=0

Tag=$,'chen.frx":lB81C

Text=”LN(5)”

Top=5040

Visible=0Talse

Width735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic==0Talse

Strikethrough==0Talse

EndProperty

Height405

Index=2

Left=3720

Tabindex=104

Tag=$nchen.frx":lCE73

Text=”LN(4)”

Top=5040

Visible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name=nArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=1

Left=3000

Tabindex=103

Tag=$Mchen.frx":lE4CA

Text="LN(3)”

Top=5040

X^sible=0Talse

Width=735

End

BeginVB.TextBoxInes

BeginPropertyFont

Name="ArialBlack"

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height405

Index=0

Left=2280

Tabindex=102

Tag=$nchen.frx":lFB21

Text=“LN⑵”

Top=5040

Visible=0Talse

Width735

End

BeginVB.TextBoxxExcs

BeginPropertyFont

Name=nArialBlack"

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height-405

Left=1200

Tabindex=101

Tag-$"chen.frxn:21178

Text=”自然对数底”

Top=5040

Visible-0Talse

Width—1124

End

BeginVB.TextBoxxPics

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic=0'False

Strikethrough=0Talse

EndProperty

Height=405

Index=0

Left=240

Tabindex=100

Tag=$nchen.frx":227Dl

Text=”圆周率TT”

Top=5520

Msible0Talse

Width=975

End

BeginVB.TextBoxEles

BeginPropertyFont

Name="ArialBlack”

Size=10.5

Charset=0

Weight=400

Underline=0Talse

Italic二0Talse

Strikethrough=0Talse

EndProperty

Height=405

Index=0

Left=240

MaxLength=20

Tabindex=99

Tag=$nchen.frx":23E2C

Text=$nchen.frxn:25484

Top=5040

Visible=0'False

Width=920

End

BeginVB.CommandButtonCommand29

Caption="MOD”

BeginPropertyFont

Name=”宋体”

Size=9

Charset=0

Weight=400

Underline=0*False

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Left=240

Style=1'Graphical

Tabindex=98

TabStop=0Talse

ToolTipText="取模(XMODP)"

Top=1320

Width=495

End

BeginVB.CommandButtonCommand28

BackColor=&H0000C000&

Caption=“32”

BeginPropertyFont

Name="Terminal”

Size=9

Charset=134

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Left=11040

MaskColor=&H00FFFFFF&

Style=1'Graphical

Tabindex=97

Top=960

Width=495

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=

BeginPropertyFont

Name="System”

Size=12

Charset=134

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Index=6

Left=8640

Style=1'Graphical

Tabindex=50

TabStop=0Talse

ToolTipText=“半径”

Top=840

Width=855

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=HR"

BeginPropertyFont

Name="System”

Size=12

Charset=134

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0'False

EndProperty

Height=255

Index=5

Left=7680

Style=1'Graphical

Tabindex=49

TabStop=0Talse

ToolTipText=”半径”

Top840

Width855

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=nhn

BeginPropertyFont

Name="System”

Size=12

Charset=134

Weight=700

Underline=0Talse

Italic=0'False

Strikethrough=0Talse

EndProperty

Height=255

Index=4

Left=6720

Style=1'Graphical

Tabindex=48

TabStop=0Talse

—«

ToolTipText回

Top=840

Width=855

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=

BeginPropertyFont

Name="System”

Size=12

Charset=134

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Index=3

Left=5760

Style=1'Graphical

Tabindex=47

TabStop=0Talse

ToolTipText="边长d"

Top=840

Width=855

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=

BeginPropertyFont

Name="System”

Size=12

Charset=134

Weight=700

Underline=0Talse

Italic=0'False

Strikethrough=0Talse

EndProperty

Height=255

Index=2

Left=4800

Style=1'Graphical

Tabindex=46

TabStop=0Talse

ToolTipText=”边长c或边数nn

Top=840

Width=855

End

BeginVB.CommandButtoncommand64

BackColor=&H000040C0&

Caption=

BeginPropertyFont

Name="System”

Size=9.75

Charset=0

Weight=700

Underline=0Talse

Italic=0Talse

Strikethrough=0Talse

EndProperty

Height=255

Index=1

Left=3840

Style=1'Graphical

Tabindex=45

TabStop=0Talse

ToolTipText="边长bn

Top840

Width855

End

BeginVB.CommandButtonCommand21

Caption=

BcginPropertyFont

Name=”宋体”

Size=9

Charset=134

Weight=400

Underline=0Talse

Italic=0*False

Strikethrough=:0Talse

EndProperty

Height=255

Left=5400

MaskColor=&H80000012&

Tabindex=1

ToolTipText=于

Top=2760

Width=495

End

BeginVB.CommandButtonsub2

Caption=

BeginPropertyFont

Name=”宋体”

Size=9

Charset=134

Weight=700

Underline=0Talse

Italic==0Talse

Strikethrough=0Talse

EndProperty

Height=255

Index=1

Left=5400

MaskColor=&H80000012&

Tabindex=96

TabStop=0Talse

Top=2400

Width=495

End

BeginVB.CommandButtonsub2

Caption=

BeginPropertyFont

Name="宋体"

Size=9

Charset=134

Weight=700

Underline=0Talse

Italic=0'False

Strikethrough=0,False

EndProperty

Height=255

Index=0

Left=4800

MaskColor=&H80000012&

Tabindex=95

TabStop=0'False

Top=2400

Width=495

End

BeginVB.TextBoxText3

Appearance=0'Flat

BackColor=&H00C0FFFF&

BorderStyle=01None

BeginPropertyFont

Name="Tahoma”

Size=8.25

Charset=0

Weight=700

Underline=0'False

Italic==0Talse

Strikethrough=0Talse

EndProperty

Height=195

Left=7000

Locked=-1'True

Ta

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论