www.ndwl.net > VB语言题目

VB语言题目

Private Sub Form_Load()labYear.Caption = Year(Date)labMonth.Caption = Month(Date)labDay.Caption = Day(Date)labCalDay.Caption = DateDiff("D", Date, Year(Date) & "-10-1")End Sub

Private Sub Command1_Click() If Len(Text1) >= 2 Then Text1 = Left(Text1, 2) End If End Sub Private Sub Command2_Click() Text1 = "" End Sub Private Sub Form_Load() Label1.Caption = "新字符串" Command1.Caption = "左边2个字符" Co...

阿喵你怎么还提问啊,我已经全部回答过了吧?你还有什么需要帮助的,请留言。

1,对 2,错 'http://baike.baidu.com/view/977550.htm,这觉得有一点点的错 3,错 '没global吧?我还没见过有这样定义,global英文是全局的意思 4,对 5,对 6,c '一定是这样的 7,b '返回找到位置 8,a '我印象中是,如果非数值型未赋值就选b

这个我会做

第11题 实际上是求1到20的质数个数,a(n)=true表示n是质数,false表示n不是质数 第一段循环是先假设2到20都是质数 第二段循环从2开始到20,每个质数的所有20以内的倍数都被设置成false,于是循环完成后所有等于true的都是质数。1到20有8个质数所...

(1)4 (2) ①List1_Click() ②Len(cp) 或者 Len(Text1.Text) ③End If

第1次调用proc(2): a=a+1=0+1=1 b=b+1=0+1=1 proc=a*b+i=1*1+2=3 第2次调用proc(2): a=a+1=0+1=1 b=b+1=1+1=2 proc=a*b+i=1*2+2=4 第3次调用proc(2): a=a+1=0+1=1 b=b+1=2+1=3 proc=a*b+i=1*3+2=5 所以输出结果为 3 4 5 关键点在于a是局部变...

在vb中true的值为-1,false的值为0, 也就是说如果a=0成立,则a=0的值为true, 把true用于算数运算时它是-1 如果四个逻辑表达式中,有三个为真,则它们的和为-3

回答详见图片

网站地图

All rights reserved Powered by www.ndwl.net

copyright ©right 2010-2021。
www.ndwl.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com