如何用VB编写一个自然数阶乘的程序
用vb编写自然数阶乘程序,在程序中输入任何一个自然数便可轻松得出其相应的阶乘答案。
操作方法
(01)首先启动VB程序,在“新建工程”界面选择【标准 EXE】,点击【打开】按钮,进入工程页面后再将最右端下方属性窗口中Form1的“Caption”的内容改为“自然数的阶乘”,如图所示
(02)单击最左端工具栏中的【TextBox】,在窗体上拖动变成十字线的鼠标指针画出合适的文本框大小,或者是双击【TextBox】,会在窗体中自动出现文本框,自己拖动文本框调节大小和位置即可,重复操作建立两个文本框,如图所示。
(03)单击最左端工具栏中的【Label】,在窗体上拖动变成十字线的鼠标指针画出合适的标签大小,或者是双击【Label】,会在窗体中自动出现标签,自己拖动标签调节大小和位置即可,重复操作建立两个标签,如图所示。
(04)单击最左端工具栏中的【CommandButton】,在窗体上拖动变成十字线的鼠标指针画出合适的控制按钮大小,或者是双击【CommandButton】,会在窗体中自动出现控制按钮,自己拖动控制按钮调节大小和位置即可。
(05)单击“Text1”,在最右端下方的属性窗口中将“Text"的内容“Text1”删除并置空,还可单击“Font”的内容“宋体”后面的“...”按钮,调节文本框中内容的字体、字形和大小,重复操作Text2文本框。
(06)单击“Label1”,在最右端下方的属性窗口中将“Caption"的内容“Label1”改为“请输入自然数N”,还可单击“Font”的内容“宋体”后面的“...”按钮,调节标签中内容的字体、字形和大小;Label2标签“Caption”的内容“Label2”改为“阶乘结果为”,其余操作相同。
(07)单击“Command1”,在最右端下方的属性窗口中将“Caption"的内容“Command1”改为“计算”,还可单击“Font”的内容“宋体”后面的“...”按钮,调节控制按钮中内容的字体、字形和大小,如图所示。
(08)双击“计算”按钮,进入编辑程序:Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Double a = Val() c = 1 For b = 1 To a c = c * b Next b = cEnd Sub
(09)点击上方工具栏中的“运行”,再点击“启动”,在运行过程中譬如输入自然数5,点击“计算”按钮得出阶乘结果120,如图所示。
(10)最后再点击“文件”,选择“保存工程”或者“生成工程(k)”,保存即可。
-
qq手机密保怎么解绑
在更换新手机号后qq上面绑定的之前的手机号就不能用了,那qq手机密保怎么解绑呢?请看下面解析。操作方法(01)登录qq,点击左下角“主菜单”》点击“安全”》点击“安全中心首页”。(02)进入安全中心页面后,点击右侧密保手机“更换”。(03)输入新的手机号码进行原手机密保解...
-
360系统重装大师装的是什么系统?怎么重装系统
360系统重装大师目前是360安全卫士功能大全下的功能之一,要使用360系统重装大师必须先安装最新版360安全卫士。下面小编为你介绍如何用360系统重装大师重装系统操作方法(01)打开360系统重装大师后见到如下主界面:(02)点击"重装环境检测"按钮,程序将开始检测您的系统是...
-
如何设置路由器IP地址
大部分家用路由器的默认IP地址是,如果我们想给路由器换个IP,怎么设置呢?操作方法(01)首先打开网络连接,双击本地连接,查看计算机IP地址(02)如果是192.168.1.x,则跳过后续步骤,如果不是的,则手动修改为(03)然后在网页上打开,输入路由器登录账号和密码【可以在路由器上面查看初...
-
斐讯(phicomm)无线路由器怎么设置
无线路由器的种类有很多,WiFi对人类生活越来越重要,每种无线路由器的设置不同,小编在这里给大家介绍一下斐讯(phicomm)无线路由器怎么设置。操作方法(01)将插在电脑上的网线拔掉,用额外准备的网线一头连接电脑一头连接路由器数字口,下面的“LAN口”都可以,把刚刚从电脑...