22问答网
所有问题
当前搜索:
vb怎么用
在
vb
中怎样用循环语句实现如下图形?界面上设置的特殊属性请具体说明,代 ...
答:
图形一:for i=1 to 6 for j=1 to 6 print "*";next j print next i 图形二:for i=1 to 6 for j=1 to i print "*";next j print next i 图形三:for i=6 to 1 step -1 for j=1 to i print "*";next j print next i 图形四:for i=1 to 6 print spc(6-i);...
VB
6.0
怎么
引用控件
答:
VB6.0ActiveX 控件是:1)通过工程-部件。2)在部件对话框勾选所需要的控件-确定,就可将所需ActiveX 控件添加到工具箱。3)双击工具箱所需控件,添加到窗体,然后双击窗体上的该控件,编写该该控件的应用程序代码。
求教下
VB
里面CIRCLE的用法
答:
为了用 Circle 方法画出圆弧,应以弧度为单位,给出定义弧线 start 和 end 的角度参数。画圆弧的语法是:[object.]Circle [Step](x, y), radius, [color], start, end[, aspect]如果 start 或 end 是负数将画出一个饼。Const PI = 3.14159265 Circle (3500, 1500), 1000, , –PI / 2...
VB
中
怎么用
函数MAX和MIN 求出一组数据的最大值和最小值
答:
您好,
VB
中没有MAX和MIN函数,不过你可以自己编程实现。给你一个求随机产生6个两位正整数的例子:Private Sub Command1_Click()Dim a(6) As Integer For i = 1 To 6 Randomize a(i) = Int(Rnd * 90) + 10 Print a(i);Next i Print Max = a(1)Min = a(1)For i = 1 To 6 If...
vb
中
怎么用
timer控件设置一个等待时间
答:
以下程序利用Timer,使得程序等待1秒(1000毫秒)后继续执行 Option ExplicitPrivate Sub Command1_Click() Cls '清屏 Timer1.Interval = 1000 '等待1000毫秒(1秒) Timer1.Enabled = True '启动定时器 Do While Timer1.Enabled '循环等待,直到定时器Timer1停止 DoEvents '...
VB
中数据的强制类型转换
怎么
实现
答:
VB使用
类型转换函数来实现强制将一个表达式转换成某种特定数据类型。类型转换函数,每个函数都可以强制将一个表达式转换成某种特定数据类型。语法 CBool(expression)CByte(expression)CCur(expression)CDate(expression)CDbl(expression)CDec(expression)CInt(expression)CLng(expression)CSng(expression)CStr(expression...
vb
里面
怎么
实现用键功能
答:
哦,那么我就来举一个例子吧!Private Declare Sub keybd_event Lib "user32"(ByVal bVk As Byte,ByVal bScan As Byte,ByVal dwFlags As Long,ByVal dwExtraInfo As Long)Const a = &H2 Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Me.Caption = KeyCode '按任何键,标题...
vb
有while循环吗?
怎么用
?
答:
有的:语法如下:while "条件语句"...循环体...wend 举例:i=0 while i<=100 s=s+i '求累加和 i=i+1 wend print s
怎么用VB
编程
答:
下载vb6-(新建-设计)OR (打开工程)-编译或打包
VB
boolean语句
怎么用
?
答:
看了半天也没见boolean语句,你的意思是条件句吧。上面定义的forecolor变量可能与窗体的属性Forecolor发生冲突,改个别的变量名试试。条件句逻辑上也不对,else 上下两块语句都是一样的,改成 if forecolor then r=hscroll1.value g=hscroll2.value b=hscroll3.value label4=forecolor=rgb(r,g,...
棣栭〉
<涓婁竴椤
7
8
9
10
12
13
14
15
16
11
涓嬩竴椤
灏鹃〉
其他人还搜