- 博客(11)
- 收藏
- 关注
原创 实验十一:出现、删除
一、实验目的设计一个程序使其新出现一个东西并能删去二、实验内容设计一个程序使其新出现一个东西并能被删除,下面是其具体过程Dim with.events mytextbox As VB.TextBoxPrivate Sub Command1_Click()Dim myTextBox As VB.TextBoxset mytextbox = me.controls.Add
2012-05-30 17:16:26 615
原创 试验十:随机生成10个不同的数
一、实验目的: 随机生成10个不同的数二、实验内容: 下面再写一种随机生成10个不同的数的另一种方法并且分为两部分 Private Sub Command1_Click() n = InputBox(请输入一个正整数) dim str2 As string call getNI
2012-05-17 11:28:26 928
原创 实验九:随机生成10个不同的数
一、 实验目的 随机生成10个不同的数二、 实验内容 随机生成10个不同的数的具体过程 Private Sub Command1_Click() Dim a(10) as Integer Dim printstr As string a(1) = Int(Rn
2012-05-14 20:22:51 398
原创 实验八:给定10个数输出最大值
一 实验目的:求从给定的10个数中输出最大值二 实验内容:10个数中输出最大值的具体步骤为 Private Sub Command1_Click ( ) Dim f(9) As Integer Dim mystr As String mystr = " " for i = 0 to 9 f(i) = I
2012-05-10 09:31:15 441
原创 实验七:三位数输出最大数
一 实验目的:求三位数输出最大数二 实验内容:求三位数输出最大数的具体步骤为Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a = 23 b = 89 c = 56
2012-05-10 09:08:12 659
原创 实验六:两位数输出最大数
一 实验目的:两位数输出最大数二 实验内容:实现两位数输出最大值的具体步骤为Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = 25 b =2 5 if a > b Then print aelse
2012-05-10 08:42:16 342
原创 实验五:能动的图形
实验五:能动的图形一、 实验目的生成能动的图形二、 实验内容用VB绘制图形并使其运动绘制圆形并运动的程序代码Dim g As BooleanDim x As LongPrivate Sub Command1_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Form_Load()g = True
2012-03-27 22:03:15 242
原创 实验四:随机生成图形
实验四:随机生成图形一、 实验目的让程序随机不定时间生成随机种类的图形并生成多个二、 实验内容Private Sub Command1_Click() Timer1.Enabled = TrueEnd Sub Private Sub Timer1_Timer()Randomize Cls Dim MaxX A
2012-03-27 21:57:02 378
原创 实验三:生成随机数
实验三:生成随机数实验目的:1. 了解VB数据类型的基本概念2. 掌握变量的定义方法3. 掌握运算符和表达式用法一. 实验内容:生成指定范围内的随机整数。用Int和Rnd函数生成指定范围的随机整数,用randomize函数初始化随机数发生器,用Val函数将数字字符串转换为数值。二. 实验步骤:1. 在窗体上放置三个文本框并在其后输入三个文本框,分别用
2012-03-27 21:55:10 483
原创 实验二:大小写的转换
实验二:大小写的转换一、实验目的:1.明确赋值语句的意义,弄清赋值表达式与判断相等关系表达式的区别。2.熟悉数据的输入与输出的办法,学习使用输入框和消息框。二、实验内容: 字母大小写转换。程序运行时单击“转大写”按钮,文本中英文全部转化为大写,单击“转小写”按钮,转为小写,单击“复原”按钮,复原为初始状态。三、 实验步骤:1. 在窗体中放置三个命令按钮,在属性值中
2012-03-27 21:53:06 828
原创 实验一:显示各位数
实验一:显示各位数一、实验目的:充分认识VB的语言及其能够处理的数据类型。二、 实验内容:1. 做三位数的显示,在窗体中放置三个标签,并在其属性值中分别输入“个位”,“十位”“百位”,并放置三个文本框,用于显示各位数,一个命令按钮,将其属性值设置为“显示”点击显示个位,十位,百位。2. 编写程序代码:双击命令按钮,输入:Dim star as stringSta
2012-03-27 21:50:56 179
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人