Visual Basic程序设计
关注
分享
扫一扫
Caleb_Sung
90后辣鸡coder一枚
展开
-
VB：实现图片缩小和还原的程序
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验1-6 作者：Caleb Sung题外话时隔将近十年第一次写VB啦hhh（上一次是在小学……），有点小兴奋(￣▽￣)~* 纯VB只能在老掉牙的vb6.0平台下写，之后的VS都是vb.net，和vb代码还是有很大区别的。电商专业大三学习的也是vb.net 此外之前用的...原创 2018-04-12 10:55:26 · 9354 阅读 · 0 评论 -
VB：编写程序，实现如下规律的5*5矩阵存入数组，并输出该数组
题目来源：大工慕课 链接 作者：Caleb Sung题目要求编写程序，实现如下规律的5*5矩阵存入数组，并输出该数组1 1 1 1 11 2 2 2 11 2 3 2 11 2 2 2 ...原创 2018-04-18 21:59:43 · 7947 阅读 · 0 评论 -
VB：使用子过程随机产生10个2位数，按从大到小递减的顺序排列，并显示排序结果
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验5-4 作者：Caleb Sung题目要求随机产生10个2位数，按从大到小递减的顺序排列，并显示排序结果。要求使用子过程。参考代码不使用子过程的版本Private Sub Form_Click() Dim a(1 To 10) As ...原创 2018-05-02 23:31:39 · 4038 阅读 · 0 评论 -
VB：编一函数过程IsH(n)，对于已知正整数n，判断该数是否是回文数
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验6-5 作者：Caleb Sung题目要求编一函数过程IsH(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在图形框显示输入的数，对于是回文数显示一个”★”，如下图： 提示所谓回文数是指...原创 2018-05-02 23:39:13 · 6412 阅读 · 0 评论 -
VB：验证哥德巴赫猜想
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验6-6 作者：Caleb Sung题目要求验证哥德巴赫猜想：任意一个大于2的偶数都可以表示成两个素数之和。编程将6～100之间的全部偶数表示为两个素数之和，在列表框显示结果，最后Label1显示共有多少对素数之和，效果如图所示。 提示：编一求素数的函数prime...原创 2018-05-02 23:44:38 · 5165 阅读 · 0 评论 -
VB：编一个子过程DeleStr(s1,s2)，将字符串s1中出现的s2子字符串删去，结果存放在s1中
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验6-8 作者：Caleb Sung题目要求编一个子过程DeleStr(s1,s2)，将字符串s1中出现的s2子字符串删去，结果存放在s1中。 例如：s1= “12345678AAABBDFG12345 ” S2= “234 ” 结果：s1= “15678AAABBDFG...原创 2018-05-02 23:47:24 · 6323 阅读 · 0 评论 -
VB：编一个函数过程Mysin(x)并求其近似值
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验6-4 作者：Caleb Sung题目要求编一个函数过程Mysin(x)，求Mysin(x)=x1−x33!+x55!−x77!+⋯Mysin(x)=x1−x33!+x55!−x77!+⋯My\sin (x) = \frac{x}{1} - \frac{{{x^3...原创 2018-05-02 23:57:51 · 5045 阅读 · 0 评论 -
VB：计算1000以内的完数并输出它们的组合
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验6-6 作者：Caleb Sung题目要求如果一个整数的所有因子（包括1，但不包括本身）之和与该数相等，则称这个数为完数。例如6＝1+2+3，所以6是一个完数。编写一个函数IsWs(m)判断m是否为完数，函数的返回值是逻辑型。主调程序显示1000以内的完数，如图所示。 ...原创 2018-04-26 20:12:27 · 4954 阅读 · 1 评论 -
VB：编一子过程MaxLength(s,MaxWord),在已知的字符串s中，找出最长的单词MaxWord。
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验1-6 作者：Caleb Sung题目要求编一子过程MaxLength(s,MaxWord),在已知的字符串s中，找出最长的单词MaxWord。假定字符串s内只含有字母和空格，空格分隔不同的单词。程序运行界面如图所示。 题目提示首先利用Instr函数从s中从左边...原创 2018-04-26 20:26:42 · 2873 阅读 · 0 评论 -
VB：建立一个简单组合框，输入数字加入到组合框的列表框内，并将列表框中最小值项目和第0个项目交换以及最大值与最后项目交换
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验5-8 作者：Caleb Sung题目要求窗体上建立一个简单组合框，在组合框的文本框输入数字字符，按回车键后加入到组合框的列表框内，如图E.8所示；单击“交换”按钮，将列表框中最小值项目和第0个项目交换；最大值与最后项目交换，如图所示： 提示只能输入数字...原创 2018-04-18 21:45:14 · 11269 阅读 · 0 评论 -
VB：随机生成数组并分别计算主对角元素之和与副对角元素之和
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验1-6 作者：Caleb Sung题目要求参照教材例5.3，在通用声明段声明两个数组，利用随机函数形成两个4x4矩阵。要求：① 以下三角形式显示A数组、上三角形式显示B数组。 ② 求A数组主对角线元素之和和B数组副对角线元素之和。参考代码（程序员职...原创 2018-04-12 19:26:28 · 3583 阅读 · 0 评论 -
VB：用InputBox输入一个正实数，用Print方法在一行上显示出它的平方和平方根、立方和立方根，每个数保留三位小数
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验1-6 作者：Caleb Sung题目要求用InputBox输入一个正实数，用Print方法在一行上显示出它的平方和平方根、立方和立方根，每个数保留三位小数，其间有间隔。参考代码在Form上画一个按钮，双击进入代码编辑器： （英语苦手desu 奇怪的变量名什么...原创 2018-04-12 11:08:59 · 8152 阅读 · 0 评论 -
2018年度C语言/VB作业参考解答集合
题目来源：大工慕课 链接 作者：Caleb Sung本页于2018年05月08日10:00更新本周C语言/VB参考解答 大家可以收藏本页以备查看，以后每周更新题目代码时将统一在本页发布！ 部分内附重难点解析与代码，欢迎大家参考学习和交流！ 若您在参考过程中发现有不明白的情况，可以扫描文末小程序QR码向我提问。本周题目索引（第十周）C语言 C语言：程序填空：...原创 2018-04-10 23:12:12 · 6523 阅读 · 4 评论 -
支持Win10：科学安装Visual Basic 6.0教程
VB6.0中文企业版（32/64位）下载地址：链接：https://pan.baidu.com/s/1gfcfprP 密码：sy38注：若Win10系统安装到第13步（或之后）出现无响应情况，请确保此状况出现时间长于一分钟，再打开任务管理器强制关闭安装程序即可，此时程序其实已成功安装到电脑上；安装步骤：1.右击软件压缩包，选择解压到“VB6.0”2.打开visual basic 6.0文件夹。3....原创 2018-04-12 11:40:20 · 69862 阅读 · 15 评论 -
VB：输入字母字符后倒序输出存放
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验4-4 作者：Caleb Sung题目要求筛选在Text1文本框输入的字母字符，并反序在Text2中存放。 效果实例： 提示要考虑字母的大写和小写。首先利用Len函数求Text1.Text字符串长度，然后利用For循环结构和Mid函数逐一取字符进行判断是否为...原创 2018-04-12 18:20:37 · 12204 阅读 · 1 评论 -
VB：使用滚动条控件实现对标签文字字体大小的控制
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验4-9 作者：Caleb Sung题目要求任意改变文本的字号。要求利用滚动条和标签控件实现对标签字体大小的任意改变，如图所示。 提示将滚动条的Min、Max分别设置为字号的最小值和最大值当拖动滑块时，字体取原来值，字号跟着变化。参考代码P...原创 2018-04-12 18:30:18 · 12215 阅读 · 0 评论 -
VB：利用嵌套循环输出塔型星号
题目来源：大工慕课 链接 作者：Caleb Sung题目要求要求输出以下形状：***************参考代码Private Sub Command1_Click() Print For i = 1 To 5 Print String(i, "*") Print String(i, " ") ...原创 2018-04-12 18:40:29 · 4500 阅读 · 0 评论 -
VB：随机生成10个数，递减排序并打印出来
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验5-4 作者：Caleb Sung题目要求随机产生10个2位数，按从大到小递减的顺序排列，并显示排序结果。参考代码Private Sub Form_Click() Dim a(1 To 10) As Integer For i = 1 To 10...原创 2018-04-12 18:56:30 · 6268 阅读 · 0 评论 -
VB：编程实现自定义类型数组，按某一字段排序
题目来源：大工慕课 链接 原题：Visual Basic程序设计教程（第二版）龚沛曾主编，高等教育出版社 实验5-10（改） 作者：Caleb Sung课堂作业 特别感谢某小可爱的资瓷~题目要求界面设计样式： 在模块文件里自定义类型（学号，姓名，成绩1，成绩2），共四个成员。输入按钮功能：将具有5个元素的数组各成员送入自定义数组中。显示输入数据按钮功能...原创 2018-04-18 14:29:09 · 2619 阅读 · 0 评论