VB题练习题

来源：蜘蛛抓取(WebSpider) 时间：2018-05-24 16:10 标签：
VB程序练习题整理稿_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
赠送免券下载特权
10W篇文档免费专享
部分付费文档8折起
每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
VB程序练习题整理稿
&&郑大远程教育学院VB程序练习题整理好的题库
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
加入VIP
还剩10页未读，
定制HR最喜欢的简历
你可能喜欢&>&VB上机（操作题）练习题
VB上机（操作题）练习题
上传大小：69KB
VB上机（操作题）练习题，以及正确的答案代码和窗体设计
综合评分：0
{%username%}回复{%com_username%}{%time%}\
/*点击出现回复框*/
$(".respond_btn").on("click", function (e) {
$(this).parents(".rightLi").children(".respond_box").show();
e.stopPropagation();
$(".cancel_res").on("click", function (e) {
$(this).parents(".res_b").siblings(".res_area").val("");
$(this).parents(".respond_box").hide();
e.stopPropagation();
/*删除评论*/
$(".del_comment_c").on("click", function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_invalid/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parents(".conLi").remove();
alert(data.msg);
$(".res_btn").click(function (e) {
var parentWrap = $(this).parents(".respond_box"),
q = parentWrap.find(".form1").serializeArray(),
resStr = $.trim(parentWrap.find(".res_area_r").val());
console.log(q);
//var res_area_r = $.trim($(".res_area_r").val());
if (resStr == '') {
$(".res_text").css({color: "red"});
$.post("/index.php/comment/do_comment_reply/", q,
function (data) {
if (data.succ == 1) {
var $target,
evt = e || window.
$target = $(evt.target || evt.srcElement);
var $dd = $target.parents('dd');
var $wrapReply = $dd.find('.respond_box');
console.log($wrapReply);
//var mess = $(".res_area_r").val();
var mess = resS
var str = str.replace(/{%header%}/g, data.header)
.replace(/{%href%}/g, 'http://' + window.location.host + '/user/' + data.username)
.replace(/{%username%}/g, data.username)
.replace(/{%com_username%}/g, data.com_username)
.replace(/{%time%}/g, data.time)
.replace(/{%id%}/g, data.id)
.replace(/{%mess%}/g, mess);
$dd.after(str);
$(".respond_box").hide();
$(".res_area_r").val("");
$(".res_area").val("");
$wrapReply.hide();
alert(data.msg);
}, "json");
/*删除回复*/
$(".rightLi").on("click", '.del_comment_r', function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_comment_del/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parent().parent().parent().parent().parent().remove();
$(e.target).parents('.res_list').remove()
alert(data.msg);
//填充回复
function KeyP(v) {
var parentWrap = $(v).parents(".respond_box");
parentWrap.find(".res_area_r").val($.trim(parentWrap.find(".res_area").val()));
评论共有0条
VIP会员动态
CSDN下载频道资源及相关规则调整公告V11.10
下载频道用户反馈专区
下载频道积分规则调整V1710.18
spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip
资源所需积分/C币
当前拥有积分
当前拥有C币
输入下载码
为了良好体验，不建议使用迅雷下载
VB上机（操作题）练习题
会员到期时间：
剩余下载个数：
剩余积分：0
为了良好体验，不建议使用迅雷下载
积分不足！
资源所需积分/C币
当前拥有积分
您可以选择
程序员的必选
绿色安全资源
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验，不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验，不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
您的积分不足，将扣除 10 C币
为了良好体验，不建议使用迅雷下载
无法举报自己的资源
你当前的下载分为234。
你还不是VIP会员
开通VIP会员权限，免积分下载
你下载资源过于频繁，请输入验证码
您因违反CSDN下载频道规则而被锁定帐户，如有疑问，请联络:!
若举报审核通过，可返还被扣除的积分
被举报人：
举报的资源分：
请选择类型
资源无法下载 （ 404页面、下载失败、资源本身问题）
资源无法使用 （文件损坏、内容缺失、题文不符）
侵犯版权资源 （侵犯公司或个人版权）
虚假资源 （恶意欺诈、刷分资源）
含色情、危害国家安全内容
含广告、木马病毒资源
*详细原因：
VB上机（操作题）练习题扫二维码下载作业帮
3亿+用户的选择
下载作业帮安装包
扫二维码下载作业帮
3亿+用户的选择
VB练习题从键盘输入任意三个数A,B,C,将其值按由大到小的顺序显示出来.
作业帮用户
扫二维码下载作业帮
3亿+用户的选择
Private Sub Form_Load()Dim x As Integer,y As Integer,z As IntegerDim diyige As IntegerDim dierge As String,disange As String,disige As Stringdiyige = InputBox("请输入A:","数据输入")dierge = InputBox("请输入B","数据输入")disange = InputBox("请输入C","数据输入")x = Val(diyige)y = Val(dierge)z = Val(disange)If x > y And y > z ThenPrint x,y,zElseIf y > z And z > x ThenPrint y,z,xElseIf z > x And x > y ThenPrint z,x,yEnd IfPrint "你输入的数据按从da到xiao的顺序是:"End Sub
为您推荐：
其他类似问题
Private Sub Form_Click() a = InputBox("A")b = InputBox("B")c = InputBox("C")If b > a Then
d = a: a = b: b = d End If If c > a Then
d = a: a = c: c = d End If If c > b Then
d = b: b = c: c = d End If Print a, b, c End Sub
扫描下载二维码VB期末练习题库_中华文本库
第1页/共197页
1. 参与运算的两个表达式均为True,运算结果也为True,则该逻辑运算符为:
2. 为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应
将列表框的Multiselect属性设置为().
3. 要使标签能够显示所需要的东西,则在程序中应设置其哪一属性的值().
4. 能够获得一个文本框中被选取文本的内容的属性是().
5. 任何控件都具有的属性是().
6. 为了使列表框中的项目按字母顺序排列,应设置哪个属性?
7. 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()
Static x As Integer
Print x, y
程序运行后,连续四次单击Command1按钮后,窗体上显示的是
第1页/共197页
寻找更多 ""

我要回帖

 

随机推荐