大佬分享！拼多多2019秋招提前批编程题（含代码）
题目一: 喝可乐复制问题
有A、B、C、D四个人排成一队喝可乐，每次喝完复制自己，问数字n的人名？
import java.util.*;
public class PinDuoDuo1{
//获得第N个人喝可乐的名字
public static String getName(int num) {
String[]str=new String[]{"A","B","C","D"};
if(num&=1&&num&=4) return str[num-1];
//字符串为ABCD AABBCCDD AAAABBBBCCCCDDDD ....
int sum=4;
while(sum&num){
sum+=Math.pow(2,k);
int average=(int)Math.pow(2,k-2); //总共四份，没份的数量
if(sum-num&=3*average){
return str[0];
}else if(sum-num&=2*average){
return str[1];
}else if(sum-num&=average){
return str[2];
return str[3];
public static void main(String[]args){
// System.out.println("Hello World!");
Scanner sin=new Scanner(System.in);
while(sin.hasNextInt()){
int N= sin.nextInt();
System.out.println(getName(N));
谁是球王？
import java.util.ArrayL
import java.util.A
import java.util.S
public class PinDuoDuo2 {
public static void main(String[] args) {
//输入第一行，读取n和m
Scanner in = new Scanner(System.in);
String s = in.nextLine();
String[] strs = s.split(" ");
int n = Integer.valueOf(strs[0]);
int m = Integer.valueOf(strs[1]);
//读取投票结果，存放在一个数组中，数组中存放的是选票上的信息
String[] str = new String[m];
for (int i = 0; i & i++)
str[i] = in.nextLine();
// System.out.println(str.length);
//创建一个新数组，反转str，这样数组中的每一个元素都是以为球星的投票结果，并对其进行排序
String[] new_str = new String[n];
for (int i = 0; i & i++) {
char[] c = new char[m];
for (int j = 0; j & j++) {
c[j] = str[j].charAt(i);
Arrays.sort(c);
new_str[i] = new String(c);
// for (String s : new_str) {
// System.out.println(s);
//使用比较字符串的大小，判断是否存在球星，如果有最大值且大于一个，则不存在球星。
int max = 0;
for (int i = 1; i & i++) {
if (new_str[max].compareTo(new_str[i]) & 0) {
if (new_str[max].compareTo(new_str[i]) == 0) {
System.out.println("-1");
System.out.println(max);
运货物问题：
N个货物分别重W1、W2、…Wn，（100&=W&=300）,一辆车可以运重量300的货，问需要多少辆车。
思路:先从小到大排序，i、j两个指针，i从0开始遍历去掉3的整数倍个100（每三个100增加一辆车），j从N-1开始去掉大于200的数（大于200的自己一辆车），i、j所指的货物若可以拼车，车数加一，i、j向中间移动，否则，车数加一,j向中间移动。
//采用排序之后双指针移动法(背包问题)
import java.util.ArrayL
import java.util.C
import java.util.S
public class PinDuoDuo3 {
public static void main(String[] args) {
Scanner in = new Scanner(System.in);
String s = in.nextLine();
String[] str= s.split("s+");
ArrayList&Integer& list = new ArrayList&&();
for(int i=0;i&str.i++){
list.add(Integer.valueOf(str[i]));
/* for(Integer l:list)
System.out.println(l);*/
Collections.sort(list);
int j=list.size()-1;
int num=0;
while(i&j){
if(list.get(i)+list.get(j)&300){
if(list.get(i)+list.get(j)&=300){
System.out.println(num);
变成靓号的最少代价
题意简单，号码长度为n，每个数字范围是0-9，同样的数字的个数大于等于k，则为靓号，找出成本最小且字典序最小的靓号。
代码如下，因为是最后一道，写的有些仓促，代码有点不忍直视。
主要思路就是首先用number数组记录每个数字出现的次数，然后遍历10种可能，就是将每个数字为靓号，共10种可能。用anscost和ansstr记录结果，然后每个数字比较字典序。重点在于如何修改，才能使得成本最低。
比如，对于要使得7的个数大于等于k，那么首先进行广度优先遍历，dif = 1..9，即往7的左右两边遍历，显然先替换大于7的会使得字典序更小，因此先7+dif，再计算7-dif，直到数字7的个数==k，然后记录原号码中每个数字中有多少个数要替换为7。然后从左往右替换大于7的数字，再从右往左替换小于7的数字即可。
#include&iostream&
#include&queue&
#include&string&
#include&algorithm&
#include&sstream&
int main(){
vector&int& number(10, 0);
vector&int& times(10, 0);
int anscost = -1;
bool flag =
cin&&n&&k;
for(int i = 0; i & i++){
str.push_back(c);
number[c-'0']++;
if(number[c-'0'] &= k){
if(flag) cout&&str&&
for(int i = 0; i &= 9; i++){
for(int ii = 0; ii &= 9; ii++) times[ii] = 0;
if(number[i] == 0)
int tmpcost = 0;
int t = number[i];
int dif = 1;
while(t & k){
if(i+dif &= 9){
if(number[i+dif] + t &= k){
times[i+dif] = k-t;
tmpcost += (dif)*(k-t);
times[i+dif] = number[i+dif];
tmpcost += (dif)*number[i+dif];
t += number[i+dif];
if(i-dif &= 0){
if(number[i-dif] + t &= k){
times[i-dif] = k-t;
tmpcost += dif*(k-t);
times[i-dif] = number[i-dif];
tmpcost += number[i-dif];
t += number[i-dif];
string sstr(str);
for(int j = 0; j & sstr.size(); j++){
int ttt = sstr[j]-'0';
if(sstr[j]-'0' & i && times[(int)(sstr[j]-'0')] & 0){
times[ttt] = times[(int)(sstr[j]-'0')]- 1;
sstr[j] = '0'+i;
cout&&" "&&
for(int j = sstr.size()-1; j &= 0; j--){
if(sstr[j]-'0' & i && times[(int)(sstr[j]-'0')] & 0){
times[(int)(sstr[j]-'0')]--;
sstr[j] = '0'+i;
if(anscost == -1){
else if(anscost & tmpcost){
else if(anscost == tmpcost){
if(ansstr & sstr){
cout&&anscost&&
cout&&ansstr&&
点击原文链接和大佬交流~
责任编辑：
声明：该文观点仅代表作者本人，搜狐号系信息发布平台，搜狐仅提供信息存储空间服务。
今日搜狐热点vb吧-百度贴吧--创造一片开源的天地！--我们崇尚开源分享和提倡技术讨论，当然如果你不开源也可以，只是不会得到更多的尊重，禁止一切伸手党和宣传党以及图片党，有问题大家一起交流~！
签到排名：今日本吧第个签到，
本吧因你更精彩，明天继续来努力！
本吧排名：
本吧签到人数：1980
可签7级以上的吧50个
本月漏签0次！
成为超级会员，赠送8张补签卡
连续签到：天&&累计签到：天
超级会员单次开通12个月以上，赠送连续签到卡3张
创造一片开源的天地！
吼吼吼大家好我是方程 不知道还有没有人记得我一年多以前发的某个预告帖： 后来这个DUI类模块并没有
1.窗体拖动 Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button Then Move Left - Current
pc端，根据账号密码，对接他的api，登录后得到一个token，获取到考勤的信息，解析为json 大概就这样，骗
我觉得现在做管理类软件开发还是挺赚钱的。最近给别人做了一个连锁的快餐管理系统，2个月时间，开发
vb6.0中，标题栏以及最大化最小化和关闭按钮的样式，要如何更换？有哪位大神知道？
经过了近一周的时间，这个插件终于做完了，可能还有一些细节问题，日后再慢慢改善吧。 本插件编写的初衷与用途：http://tieba.baidu.com/p/
哪个大佬会搞像元气骑士的那种随机刷怪代码，最好是用picture或image。是用数组搞定还是只能一个一个的
一楼概述:你们不觉得vb的默认字体很难看么? 给大家一个&最佳编程字体& 微软雅黑(中文)+Consolas(英文)的合成字体 我还会给你们提供我的关键字配色方案
一、VB6天生就支持多线程的论证、证据和历史： 网上一直有流传了将近十年的谣言，说VB6天生就不支持多线程。很久以前我也信以为真了，直到发现了老马
鉴于本吧的资源不完善，部分吧友仍然找不到vb6的下载地址，于是根据本人安装vb的经验来总结出一份教程
因要保证每桌都有人中奖所以自己搞了一个 搞了一个小程序。。。
RT，我所在的单位是一家大型国有建筑行业，同一时期内下属有几十个在建工程项目，虽然有自己的财务账
没有循环，没有分支，就一个顺序语句怎么就是执行不明白呢？
msgbox Split(rngSearch.Address(1, 0), &$&)(0) 有错么在excel的vb里显示对象变量或者with块变量未设置、 急在线
基本介绍 EXCEL荣耀是一款运行在微软Office Excel平台上的单机休闲小游戏。游戏类型为即时战斗。EXCEL荣耀拥
基本介绍 EXCEL荣耀是一款运行在微软Office Excel平台上的单机休闲小游戏。游戏类型为即时战斗。EXCEL荣耀拥
怎么不让LIST重复添加已经有的数据
怎么能用鼠标拖动正在播放的视频？ 用的是vb自带的mideaplayer控件，怎么才能用鼠标想拖到哪里，就拖到那
本人新手，看了好多，看不是很懂，有大神能详细说一下吗
看不见可以放大，求高手！！
开发语音是vb.net。在下初学者，麻烦大神赐教具体方法，太术语的话有可能理解不了，万分感谢！ 1.form之
麻烦吧里的大神耗费几分钟的时间帮我看一下出错的最后一句代码： Sub d8（） Dim arr，arr1（） arr=Range （
各位大神有知道这个答案是什么吗
请问这道题该怎么做，刚学信息技术不久，还不太明白
大佬们，怎么删除folder的item。。
小白一枚，刚接触VB，请教下各位大佬，要做界面，然后实现跟串口操作，有什么资料推荐吗？
哪位大佬能教我这第2题怎么做...
大佬们，请问vb的语音怎么能够实现控制朗读的进度呀？Set objSV=CreateObject(&SAPI.SpVoice&)
WebBrowser1.Document.All.Item(&2_11&).Value = &111& 这样老是错误 显示要求对象~怎么做？
当不会编程的时候，感觉，编程好难也很麻烦。当会编程了，发现好忙，而且根本停不下来，各种代码，
#include &stdio.h& int main() { int n,a,b,c,i=1,j; scanf(&%d %d %d&,&a,&b,&c); for(n=10;n&101;n++){ if((n%3==
游戏源码由@昭亭山赏雪 在本吧发布 http://tieba.baidu.com/p/ 我对这个游戏进行了优化和升级 并设置了1
师父们好，快8月15了，想叫什么月饼？ 有个问题问大家： 我想搞个试用期5天的软件，只会搞这个代码 Priv
楼主最近想学一下vb，就去下载了vb6.0(32位)，结果打开以后发生了这些情况： 该怎么解决啊？
帮忙解决一下这两个问题，感谢
会做的联系 2000块
本VB程序使用IE浏览器控件WebBrowser和网页版微信， 通过RichTextBox文本框来发送微信。在RichTextBox文本框中输
form1关闭的时候，form1上面显示的值，想传给form2。 我觉得是因为Form1关闭了，Form1上面的值都无效了才导致
求问菜单编辑器怎么设计子菜单
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim MM, CC, yljzxs, ccxs, bmjgxs
有没有办法给进程拍一个快照然后在需要的时候恢复它呢？比如说一个游戏（假设它不对任何文件进行写
有大神知道怎么编一个十二面骰子的程序嘛？就普通的骰子，求大神支个招
你可能感兴趣的吧...
发贴红色标题
签到六倍经验
兑换本吧会员
赠送补签卡1张，获得
助攻总额: 43W
贴吧热议榜
发表后自动分享本贴
使用签名档&预算5000左右，研究生码农组装机配置如下图，求大佬指教？ - 知乎有问题，上知乎。知乎作为中文互联网最大的知识分享平台，以「知识连接一切」为愿景，致力于构建一个人人都可以便捷接入的知识分享网络，让人们便捷地与世界分享知识、经验和见解，发现更大的世界。4被浏览365分享邀请回答赞同 2 条评论分享收藏感谢收起欢迎加入我们，一同切磋技术 &
用户名： &&&
密　码： &
共有 451 人关注过本帖
标题：【大佬求帮助】想用vb做一个像360加速球那样的 功能简单
等　级：新手上路
&&已结贴√
&&问题点数：10&&回复次数：4&&&
【大佬求帮助】想用vb做一个像360加速球那样的 功能简单
如题，本人小白懂一些vb代码。
想用vb做一个像360加速器那样的。
就实时显示电脑的下载速度和上传速度 显示在右下角托盘有个小三角形 像鲁大师温度监控那样显示在右下角的任务栏那里。
这个怎么做，百度的都是测速的 诚心想做 求教教
等　级：版主
威　望：141
帖　子：1680
专家分：9380
这个所涉技术较多，不一定有大佬愿意出手！（好像论坛禁止这类帖子吧）
不过还是可以给楼主一些思路：托盘代码可再vb6板块里找，以前有好多次这类的讨论。网络监控可找百度，输入关键字“vb6监控网络流量”或“vb6防火墙代码”，一般都能找到很多。
就酱，希望楼主能自力更生，完成作业。
能编个毛线衣吗？
等　级：新手上路
回复 2楼 wmf2014
好的谢谢！为什么禁止呢
等　级：贵宾
威　望：86
帖　子：908
专家分：5237
回复 3楼 qq
版规禁止求作业，伸手党。
如果有具体的思路和代码问题，欢迎来讨论交流
等　级：新手上路
回复 4楼 xiangyue0510
版权所有，并保留所有权利。
Powered by , Processed in 0.034941 second(s), 8 queries.
Copyright&, BCCN.NET, All Rights ReservedVB萌新求助大佬教学 - 『编程语言讨论求助区』
- 吾爱破解 - LCG - LSG |安卓破解|病毒分析|破解软件|www.52pojie.cn
后使用快捷导航没有帐号？
只需一步，快速开始
请完成以下验证码
请完成以下验证码
查看: 214|回复: 9
VB萌新求助大佬教学
阅读权限10
发帖求助前要善用【】功能，那里可能会有你要找的答案；
求助软件脱壳或者破解思路时，请务必在主题帖中描述清楚你的分析思路与方法，否则会当作求脱求破处理；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类改成【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人。
最近做的VB.net，使用listview控件，设置onwerDraw为True，view 设置为Details，接着不知道怎么实现重绘表格各项内容了，比如重绘图片所示表格第一列的背景色等等~有大佬能给个例子学习下吗，谢谢啦
(8.53 KB, 下载次数: 0)
11:21 上传
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
我也是新人路过
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
新手不建议学VB.NET，学习参考资料太少，直接学C++吧。
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
这个listview是vb.net的吧，不是vb
这个控件还是真的不太好用，首先，，，，先要把项（就是ListViewItem）中的UseItemStyleForSubItems参数设置成false，直接用代码实现就可以。
然后每一个格子的背景颜色会受到ListViewSubItem控件的控制，修改ListViewSubItem这个集合元素的BackColor就能实现修改背景颜色。
listview这个控件没有直接对列颜色的控制，所以需要你写一个判断，把UseItemStyleForSubItems全部改成false，然后把列号转变成ListViewSubItem的脚标，来单独控制每一个格子的颜色就可以了。。。
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
新手不建议学VB.NET，学习参考资料太少，直接学C++吧。
干什么活，用什么语言，，，，VB.net总体来说是最接近自然语言的计算机语言
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
干什么活，用什么语言，，，，VB.net总体来说是最接近自然语言的计算机语言
老手当然可以，新手什么都不会，这方便资料又少的可怜，学习之路少有人帮助。VB还可能存在大量项目，VB.NET有那么多项目吗？对老手来说可能感觉两者之间没什么区别，对新手来说有一点点区别，就能崩溃。
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
干什么活，用什么语言，，，，VB.net总体来说是最接近自然语言的计算机语言
另外想求教，vb.net有什么优势呢？哪类项目是vb.net的专长，身边没学这个的，所以比较好奇。
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
本帖最后由 Onlystone 于
17:13 编辑
另外想求教，vb.net有什么优势呢？哪类项目是vb.net的专长，身边没学这个的，所以比较好奇。
二次开发啊，，，二开VB.net和C#。。。。你搞清楚你要干什么再说学什么，90%以上的东西用所有语言都能实现，不要人云亦云
c#和vb.net本来就是一个东西＝＝。。。只是语法不一样
如果只是为了实现一般的功能，Cpp能做到的，VB.net一样可以做到。。。。。没有到非用cpp不可的时候，，我还是用.net解决
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
二次开发啊，，，二开VB.net和C#。。。。你搞清楚你要干什么再说学什么，90%以上的东西用所有语言都能实 ...
曾经有人说学SDK编程，我说SDK编程学习资料太少，相关项目源码很难找到，还不如学习MFC呢，只是对SDK简单的封装，大部分函数名都是一样的。。。
可是新手说，不学MFC，MFC=没饭吃，死活不学MFC。。。
我的意思是对于新手来说，要找一种学的人多，大量文字、视频教程资料多的科目先学。不然他遇到不懂的，你以后包给他回答吗？对于新手来说，界面变换一下可能就不会了。。你完全是用老手的眼光看待新手吧！
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限10
二次开发啊，，，二开VB.net和C#。。。。你搞清楚你要干什么再说学什么，90%以上的东西用所有语言都能实 ...
即然楼主不是新手，那么就可以随便学了，用VB给C#，二次开发？
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子分类或者标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
免责声明：吾爱破解所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络，版权争议与本站无关。您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容。如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。如有侵权请邮件与我们联系处理。
( 京ICP备号 | 京公网安备 87号 )
Powered by Discuz!
Comsenz Inc.