ldcf.net
当前位置:首页 >> VB程序题目,求答案,急~~~~~~~~ >>

VB程序题目,求答案,急~~~~~~~~

你这小子,是不是在搞自修啊, 我看到你在网上放了无数个类似的题目啦, 这么简单的问题,自己不动脑筋,光求个答案敷衍教师了事啊 建议大家都不要为这点小分误了程序员这个行当

D B A D D A D D B A C D C C

通过Keypress事件做,Keyascii是Ascii吗,通过按下键盘系统会检测到他的Ascii值,再把它转换成你想要替换的就行了,很简单,不想帮你写,自己动手丰衣足食吧。

在属性窗体内找到“caption”选项,将其属性值改为‘’VB程序设计‘’就行了。呃,是加载时显示的话也可以直接写程序,如图。

x=inputbox("x=") if x=int(x) then print x;"是整数" else print x;"不是整数"

8、输入一个数X,如果X>=0,则Y=1-2*X,否则的话Y=1+X 9、循环,直到i大于7,每次循环i增加3,X增加5 10、RND函数是返回一个0—1之间的随机数,所以取整后X为4(只取整数部分),输出结果必为GOOD 11、循环,每一次循环X=(X+3)*(X+4),N为循环次...

单击窗体后 List1 中显示两项,它们分别是:"北京" 和 "天津" 代码解释请参考注释: Private Sub Form_Load() List1.AddItem "北京" ' 索引号 0 List1.AddItem "上海" ' 索引号 1 List1.AddItem "天津" ' 索引号 2 List1.AddItem "重庆" ' 索引...

Option Base 1 Dim intArray(5, 5) As Integer Private Sub Command1_Click() Randomize Dim i As Integer, j As Integer Me.Picture1.Cls For i = 0 To 2 Me.Text1(i).Text = "" Next i For i = 1 To 5 For j = 1 To 5 intArray(i, j) = Int(Rn...

创建两个窗口,在窗口1上添加Listbox .Text与Label控件,然后“工具/菜单编辑器”创建菜单。窗口2上添加两个按钮,分别命名为Btn_draw和Btn_comback。完成后输入如下代码: 窗口1代码: Option Explicit Private Sub Menu11_Click() '产生 Dim Int...

Private Sub Command1_Click() '调用实例 Dim str As String MsgBox return_str(5) End Sub Private Function return_str(number As Integer) As String '通用函数 Dim str As String For i = 1 To number Dim str_temp As String str_temp = ""...

网站首页 | 网站地图
All rights reserved Powered by www.ldcf.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com