问答题

在名称为Form1的窗体上画一个命令按钮，名称为Cmd1，其标题为“向右移动本按钮”。编写适当的事件过程，使得程序运行时，每单击命令按钮一次，按钮向右移动100。
程序运行时的窗体界面如下图所示。

【参考答案】

第一步：建立工程和添加窗体
单击考试界面的“功能”选项，从弹出的菜单中选择&ldquo......

(↓↓↓ 点击下方‘点击查看答案’看完整答案、解析 ↓↓↓)

<上一题目录下一题>

热门试题

问答题

在名称为Form1的窗体上画一个命令按钮，名称为Cmd1，标题为“扩大两倍”。编写适当的事件过程，程序运行后，如果单击Cmd1命令按钮，则可以使命令按钮的长度和宽度各扩大到原来的2倍。注意：不得使用任何变量。程序运行时的窗体界面如下图所示。

问答题

在考生文件夹下有一个工程文件sjr3.vbp，相应的窗体文件为sjt3.frm。在窗体上有一个名称为Text1的文本框，其Muhiline属性为True。程序运行后，如果单击窗体，则用随机函数产生16个0到99的整数，并按4行4列的矩阵形式在文本框中显示出来，然后在文本框中输出矩阵对角线上的数。程序运行的情况如下图所示。这个程序不完整，请把它补充完整，并能正确运行。试题源程序如下： 1 Option Base 1 2 Private Sub Form Click( ) 3 Dim Mat(4，4)As Integer 4 Dim N As Integer, M As Integer 5 Dim S As String, T As String 6 N=4 7 M=4 8 Randomize 9 S= 初始矩阵为： 10 For i=1 To N 11 S=S & vbCrLf 12 For j=1 To M 13 ’Mat()=Int(Rnd*100) 14 ’S=S & & 15 Next J 16 Next i 17 S=S & vbCrLf & 矩阵对角线上的数为： & vbCrLf 18 Print 19 T= 20 For i=1 To N 21 For j=1 To M 22 ’If Then 23 ’T=T & & 24 End If 25 Next j 26 Next i 27 Text1. Text=S + T 28 End Sub

相关试题